为什么在线程中创建的Ado对象不能使用？在线等待！！！

Question

在线程中创建的Ado对象不能使用，调试时出现 '....未调用coInitialize 初始化..'的对话框。
如：
var 
  AdoDS:TAdoDataset;
begin
  AdoDs:=TAdoDataSet.create(nil);  {出现错误！！！}
  AdoDs.connectionString := '....';
  AdoDs.commandText := '....'
  AdoDS.open;
end;

Answer 1

  AdoDs:=TAdoDataSet.create(nil);  
改为   AdoDs:=TAdoDataSet.create(application);

Answer 2

线程单元内加入下面的语句.initialization
    CoInitializeEx(nil,COINIT_MULTITHREADED);
finalization
    CoUninitialize();