auf Taste warten

[Matrix Scripter]

Hallo! :)
Ich will das ein bestimmter Teil solange ausgeführt wird bis die ESC Taste gedrückt wird..
Wie könnte man das machen? :oops:

mfG Matrix Scripter

[Win32.API]

Hi,
man könnte das so machen:

Delphi-Quellcode:

while not boolean(getasynckeystate(27)) do
 begin
  Application.ProcessMessages;
  delay(10);
end;

delay

Win32.API

[Die Muhkuh]

Zitat:

Zitat von Win32.API

Hi,
man könnte das so machen:

Delphi-Quellcode:

while not boolean(getasynckeystate(27)) do
 begin
  Application.ProcessMessages;
  delay(10);
end;

delay

Win32.API

Kann man das Application.ProcessMessages nicht weglassen, da es doch schon in der Delay-Funktion steckt?

[Win32.API]

Hi,
Ja eigentlich schon hatte es zuerst nur ohne delay... :oops:

Win32.API