2019-06-24 Delphi在多线程中使用其他窗体上的控件

顶部  的  uses  加入  ActiveX;

下面的线程程序中

前面加入：

CoInitialize(nil);

后面加入：

CoUninitialize;

------

procedure HLCJ.Execute;

begin

CoInitialize(nil);

//要使用的控件

CoUninitialize;

end;

--------------