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

解決


超初心者  2005-12-06 17:19:36  No: 19066  IP: 192.*.*.*

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-06 18:10:00  No: 19067  IP: 192.*.*.*

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

編集 削除
超初心者  2005-12-07 08:24:34  No: 19068  IP: 192.*.*.*

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

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

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

編集 削除
えーと  2005-12-07 08:30:09  No: 19069  IP: 192.*.*.*

Application.ProcessMessageはどうでしょう?

編集 削除
超初心者  2005-12-07 09:58:31  No: 19070  IP: 192.*.*.*

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

編集 削除