delphi xe2报CoInitialize has not been called错误
启动个线程 线程里面用到adoquery 在创建的时候(adoquery := tadoquery.create(nil))
报以上错误, 网络上也找了些资料 说是adoquery属于com控件 在初始化的时候 需要加入以下代码:initialization//OnCreate前运行,只运行一次
  CoInitialize(nil);
finalization//OnDestory后运行,只运行一次
  CoUnInitialize;并添加activex单元
但是错误依然存在
我在线程里面也调用了这个com初始化 错误还是一样 
实在解决不了 还请大家指教 谢谢。