Wartepause

[deusmac]

Ich möchte innerhalb einer Prozedur eine Pause von einer definierten Zeit haben. Wie stelle ich das an und kann man währenddessen das Programm weiter benutzen (Andere Buttons clicken etc.)?

[fkerber]

Hi!

Schau mal, ob das mit Delay geht.
Wenn nicht musst du es glaube ich mit Threads machen, kenn mich da aber leider (noch) nicht aus, sorry.

Ciao fkerber

[Luckie]

Such mal nach delay.

[deusmac]

Danke schon mal. Und wie geht das mit einfrieren des Programmes?

[gekmihesg]

ich würd das nehmen

Delphi-Quellcode:

procedure Wait(time: word);
var Start: Integer;
begin
  Start:=GetTickCount;
  while GetTickCount-Start <= time do
    application.ProcessMessages;
end;

[Luckie]

Klick mal auf doe Links, die wir gepostet haben. :roll:

Wenn es einfrieren soll, nimm Sleep. Aber warum sollte man das wollen? :gruebel: