Delphi 提示“尚未调用CoInitialize”的解决方法

这个一般是在使用COM或者调用ADO控件时出现的错误，所以，调用com,ole函数库前就要coinitialize

 

uses ActiveX;


procedure Test;
begin
//在出现问题的函数或过程最前端，添加
CoInitialize(nil);

//do something...

//最后一句添加
CoUninitialize;
end;

//问题就解决了！