Delphi 动态连接库调用Activex方法

(1) 如果发现无法初始化Activex可以在调用单元添加如下代码

initialization
  CoInitialize(nil);
finalization
   CoUnInitialize(); 

 (2)如果还是无法使用，可改成如下代码

initialization
  CoUnInitialize(); 
  CoInitializeEx(nil,COINIT_MULTITHREADED);
finalization
   CoUnInitialize();