処理と処理の間に時間を持たせる方法


なほ  2007-03-19 14:48:36  No: 25419  IP: 192.*.*.*

Delphiで質問があり書かせていただきました。

同じ関数内に、処理Aと処理Bがあるときに処理Aが
完了してから、2〜3秒後くらいに、処理Bを行うという
方法を探しています。

ぜひお願いします。

編集 削除
もにゃ  2007-03-19 15:25:03  No: 25420  IP: 192.*.*.*

FAQですが、
時間を持たせるというのはプログラミングでは1通りではありません。
また精度を追求すると以外に難しくなります。
アイドリング?停止?精度は?スレッド?
一番簡単なのはsleep(2000)

編集 削除
deldel  2007-03-19 15:55:42  No: 25421  IP: 192.*.*.*

こんなのもあります。

var
  StartTime, WaitTime: TDateTime;
begin
  WaitTime := 2/24/60/60; //2秒待つ

  StartTime := Now;
  while True do begin
    Application.ProcessMessages;
    if StartTime + WaitTime < Now then Break;
  end;
end;

編集 削除
fff  2007-04-12 10:38:33  No: 25422  IP: 192.*.*.*

なんのためにそれをやりたいかわからないので適切な方法がわからない。

編集 削除