timer per tastendruck beenden

[Wadim]

Zitat:

Zitat von Spider

Delphi-Quellcode:

if (Key = 's') or (Key = 'S') then
  Timer1.enabeled := false;

Das kommt in On keypress oder in on Key down!

geht auch nicht?

[Christian Seehase]

Moin Wadim,

der Thread "Hotkey" dürfte reichlich Informationen enthalten.

[Die Muhkuh]

Mach das mal so:

Platziere eine Gauge und ein Timer!
In das OnTimer-event von Timer schreibst du:

Delphi-Quellcode:

Gauge1.progress := Gauge.progress + 1;

dann stellst du denn intevall vom Timer auf 200.

Danach machst du auf der Form ein OnKeyPress-Event (ist auf der form im OI inter ereignisse)!
In dieses onkeypress schreibst du:

Delphi-Quellcode:

if Key = 's' then
    Timer1.enabled := false;

Dann auf 's' (kleines s) drücken und es müsste anhalten!

Spiddi

[Christian Seehase]

Moin Spider,

für den Fall, dass das Programm aktiv ist, also den Tastaturfokus hat hast Du natürlich recht, aber Wadim möchte den Timer auch abschalten, wenn sein Programm nicht aktiv ist, und in diesem Falle würde das OnKeyPress nicht ausgeführt.