高分请教大家一个Windows消息机制的问题，请进。。。

Question

我想SQL查询过程是在SQLSERVER上，查询结束后才返回结果值，在这个过程中客户端是监视不到的。

Answer 1

使用ＰｒｏｃｅｓｓＭｅｓｓａｇｅｓ：for i := 0 to YourQueryCount do
begin
  ProgressBar.Position := ProgressBar.Position + 1;
  ProgressHint.Caption :=
   Format('%d%%',[Round(100 * ProgressBar.Position / ProgressBar.Max)]);  Application.ProcessMessages;
end;

Answer 2

用ADO组件异步执行时可在它的一个事件里写代码实现