ado open 大量数据时 怎么防止界面 无响应

ado open 大量数据时 如何防止界面 无响应
adoquery adotable 


procedure TForm1.ADOTable1FetchProgress(DataSet: TCustomADODataSet;
  Progress, MaxProgress: Integer; var EventStatus: TEventStatus);
begin
  ShowMessage(IntToStr(MaxProgress ) );
end;



怎么 代码就不进这里 不执行 


大家是怎么做的 ？

------解决方案--------------------
没有用过

adoquery的execute options属性你看看好像是eoAsyncFetch=true,或者你调一下其它的选项看看
------解决方案--------------------
随着现在硬件的更新换代，个人比较建议程序要相应的进行一些并行化处理。而且线程化处理得好的话，结构会显得比较清晰。