Endlosschleife unterbrechen

[gangs-taas]

hey,
ich hab eine frage ^^
wenn ich auf einen Button klick beginnt eine Endlosschleife.
Ich möchte, dass diese aufhört, sobald ich auf eine bestimmt taste auf der Tastatur
z.b. '.' drücke.
ich weiß abern icht wie ich das hinbekommen soll...
ich hoffe ihr versteht mein problem und könnt mir helfen ^^

[mkinzler]

Dazu müsste man wissen, wie die Endlosschleife entsteht (Code)

[uwewo]

Für was benötigst Du überhaupt eine Endlos Schleife???

[gangs-taas]

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Tags := 1  ;
  sleep(1000);
  Repeat
    keybd_event(Ord('Y'), 0, 0, 0);
    keybd_event(Ord('Y'), 0, KEYEVENTF_KEYUP, 0);
  Until Tags = 1000 ;
end;

also ich möchte, dass er hat solange y drückt bis ich auf den . drücke und dann erst wieder mit dieser schleife anfängt wenn ich wieder auf button1 drücke ...


EDIT
es ist ja nicht absichtlich ne endlosschelife. Sie soll ja enden ich das durch den '.' bestimme ...

[mkinzler]

Und woe änderst du Tags?

[gangs-taas]

naja eigendlich wollte ich das durch nen klick auf einen zweiten button ändern aber das geht nicht weil das ständige 'y' drücken verhindert, dass ich wieder in das programm komme => ich kann nicht auf den button drücken ...
und deswegen hab ich mir überlegt das irgendwie aders zu machen z.b. mit druck auf eine bestimmte taste ...
und da weiß ich nicht wie ich das machen soll...

[mkinzler]

da du die Methode nicht mehr verlässt, werden die Events der anderen Buttons auch nicht mehr ausgelöst.

[gangs-taas]

hast du ne idee wie ich es denn dann beenden kann ?

[mkinzler]

Die ganze Sache anders lösen.

[gangs-taas]

hm.. ich weiß nicth wie xD

aber trotzdem danke für denn tipp
so nun muss ich wieder off gehn

wenn dir oder anderen noch was hilfreiches einfällt wäre ich sehr dankbar ^^

[xy124]

bau in die schleife application.processmessages ein und dann wird dein Button2-Ereignis(on cliock) in dem du tags auf 1000 setzt mit berückscihtigt!

[gangs-taas]

hey,
vielen dank erst mal für den Tipp
leider weiß ich nicht was das ist und finde auch nichts im internet

ja ich weiß google ist mein freund
aber ich denke ich suche vlllt irgendwie falsch

könntest du mir entweder erklären was das ist oder nen link geben wo ich das nachlesen kann ?

bitt ? ^^


danke schonmal

[DeddyH]

Konsultiere doch einfach die Online-Hilfe von Delphi, dafür ist sie schließlich da.

[gangs-taas]

hey,
bei mir funktioniert die hilfe irgendwie nicht richtig...
hab vista und hab mal gelesen, dass das darna liegt ...

[mkinzler]

http://docs.codegear.com/

[DeddyH]

Das gilt aber nur für das HLP-Format (bis einschließlich Delphi 7). Allerdings gibt es dafür von Microsoft einen Patch, den Du Dir installieren solltest. Weder Google noch die DP noch andere Foren können schließlich die Online-Hilfe komplett ersetzen.