请问我要是用这个 windows 函数要怎么使用阿 InitCommonControlsEx

Question

没有InitCommonControlsEx而只有：InitCommonControls。
uses commctrl;procedure TForm1.Button1Click(Sender: TObject);
begin  
  InitCommonControls;
end;
—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样，改为“=”或者去掉';
I.Desire := '加不加分随你';
—————————————————————————————————
　　　　　　　

Answer 1

BOOL InitCommonControlsEx(
    LPINITCOMMONCONTROLSEX lpInitCtrls
);
有这个函数的定义，用这个函数可以使用windows定义的类
然后可以实现一些地层的功能。

Answer 2

Requirements 
  Version 4.70 and later of Comctl32.dll  Windows NT/2000: Requires Windows 2000 (or Windows NT 4.0 with Internet Explorer 3.0 and later). 
  Windows 95/98/Me: Requires Windows 98 (or Windows 95 with Internet Explorer 3.0 or later). 
  Header: Declared in commctrl.h. 
  Import Library: comctl32.lib.