Einzelnen Beitrag anzeigen

Benutzerbild von olee
olee

Registriert seit: 16. Feb 2008
Ort: Boppard
540 Beiträge
 
Turbo Delphi für Win32
 
#1

OnKeyDown - Taste Halten verhindern

  Alt 31. Jul 2009, 13:24
Hi ich hab ein kleines Problem:

Ich will im OnKeyDown einen DblKlick von Tasten abfragen.

Mein Problem ist jetzt, dass OnKeyDown beim haten einer Taste nach ner Weile mehrfach
hintereinander ausgelöst wird
(Also wie im Texteditor wenn man z.B. A hält kommt erst eins und nach ner Weile viele As)

Hat einer ne Idee, wie ich das verhindern kann?

Delphi-Quellcode:
[OnKeyDown]
begin
  If (LastKey = Key) and (LastKeyDownTime + 500 > GetTickCount) then
  begin
    DblPressedKey := Key;
    exit;
  end;
  LastKeyDownTime := GetTickCount;
  LastKey := Key;
end;
MFG
Björn Zeutzheim
Codename: Performancepumpe
  Mit Zitat antworten Zitat