Gibt es waitkey() in Delphi

[Spiderpig_GER_15]

Hi

ich hab ein bisschen erfahrung in Basic, da gibt es waitkey, eigentlich recht nützlich, in delphi ist mir das so aber noch nicht begegnet, vllt heißt es ja anders oder so desshalb hier meine frage:

Gibt es das?

Also es wäre halt einfach eine Pause im Programmablauf bis eine Taste gedrückt wird.

Also ich kanns natürlich auch mit einer etwas umständlicheren Version machen (über Keydown etc.) aber wenn es das gäbe würd ich natürlich das benutzen

MfG Spiderpig

[Dunkel]

Du musst vom sequentiellen Programmablauf in BASIC weg kommen, hin zur ereignisorientierten Programmierung von Windows (oder anderen modernen Betriebssystemen)!
Natürlich kannst Du sowas wie (Pseudocode)

Delphi-Quellcode:

  while (GetAscynkKeyState <> 0) do nothing;

machen, OnKeyDown-, OnKeyPress- oder OnKeyUp-Eriegnisbehandlungen sind aber ein schönerer und besserer Programmierstil.

[Spiderpig_GER_15]

naja, so wie ich es jetzt mache, mit keyUp, brauch ich halt extra noch ne zweite variable, und wenn die true ist und dann was gedrückt wird soll das ausgeführt werden. Ich fänd waitkey trotzdem besser ;)

[Namenloser]

Hagen benutzt in seiner Delay-Funktion das hier:

Delphi-Quellcode:

MsgWaitForMultipleObjects(1, Event, False, Milliseconds, QS_ALLINPUT) <> WAIT_TIMEOUT

Ich könnte mir vorstellen, dass du das durch Abänderung auch dazu bringen kannst, zu warten, bis eine Taste gedrückt wird. Wäre in diesem Fall ressourcenfreundlicher als die Schleife.

[Spiderpig_GER_15]

das könnte sehr gut sein, nur glaube ich nicht das ich im Stande bin die so umzuändern das sie dafür funktioniert.

Aber Freiwillige vor!!! :zwinker:

:mrgreen:

[Sherlock]

Für die guten alten Konsolenapps gibts doch bestimmt noch

Delphi-Quellcode:

repeat...until KeyPressed;

oder etwa nicht?

Sherlock