KeyLogger

[ScarFace01]

Ich weiß, das Thema ist schon recht alt aber ich bin halt gerade bei diesem Thema *g

Zitat von flomei:

...
ich hab da auch ein kleines Problem:

Zitat:

Test ABC 123

Daraus macht dein Programm:

Zitat:

[Delphi-PRAXis :: Antwort schreiben - Mozilla Firebird]
TTeesstt AABBCC 112233

Woran liegt das???
Bis auf diesen kleinen Bug...

Zitat von Assarbad:

Dies ist kein Bug. Man muss nur zwischen Keyup und Keydown filtern ... dann haste kein Doppler mehr drin.
...

Das ist im Moment leider auch mein Problem! Wie kann ich das denn filtern?

Ich dachte vielleicht so, weil ich sowas in der Art in nem anderen SRC gesehen habe:

Code:

case ((lParam and $80000000) = 0) of
   True: //NIX! ; // Hier wurde die Taste gedrückt! (WM_KEYDOWN)
else // Hier wurde die Taste wieder los gelassen! (WM_KEYUP)
begin
   memo1.text:=memo1.text+char(msg.wParam);

oder vielleicht so:

Code:

else If Msg.wParam = WM_KEYUP then
      begin
        memo1.Text := memo1.Text + Char(Msg.wParam);
      end else If Msg.wParam = WM_KEYDOWN then
      begin
        //NIX!
      end else
        //memo1.Text := memo1.Text + Char(Msg.wParam);

Leider funzt das nicht so! Könnte mir da jemand weiter helfen? Danke!