DBの問合せ中にイベントを発生させるには？

解決

超初心者 2005-12-07 02:19:36 No: 19066

QueryでSQL発行し、
DB問い合わせ中（マウスカーソルが SQLの砂時計状態）に
Buttonを押下しイベントを発生させ処理をBreakさせたいのですが
DB問い合わせ中だとボタンも押せない状態になるのでイベントを発生させることができません。
なにか方法はありませんか？

  with Query1 do
  begin
    SQL.Clear;
    SQL.Add('SELECT * FROM ' + sTbale);
    Prepare;
    Open;
    while not(Eof) do
    begin

      この辺でイベントを認識しBreakさせたい！

      Next;
    end;
    Close;
    UnPrepare;
  end;

HOta 2005-12-07 03:10:00 No: 19067

問い合わせ後のDataSetだと問題なくBreakできます。
この構文だと問い合わせ後になっています。

超初心者 2005-12-07 17:24:34 No: 19068

HOtaさん
ありがとうございます
説明不足のようでした。m(_ _)m

上記の位置でイベントを発生させるのではなく

while文でループしている場合マウスがSQLの砂時計状態でボタン等が押せません
これをどうにか押下できるようにしイベントを発生させたいのですが何か良い方法はありませんか？

えーと 2005-12-07 17:30:09 No: 19069

Application.ProcessMessageはどうでしょう？

超初心者 2005-12-07 18:58:31 No: 19070

えーとさん
思った通りの処理ができました
ありがとうございました。