1、在Ado创建和销毁时要用
uses ActiveX;
CoInitialize(nil);和CoUninitialize;

2、执行查询的时候，如果需要长时间处理，要把查询放到一个过程里，同步执行。如：
procedure TData.Execute;
begin
while not Terminated do
begin
Synchronize(ReqStockMinuteAlll);
Sleep(3000);
end;
end;

3、ADO控件都要在线程里手动创建