hay,

ich will das wenn man ein zeichen eingibt, dass die dann in einem string gespeichert werden.
eigentlich dachte ich mri das sei etwas vom einfachsten, aber es war doch nicht so leicht...

dann hab ich mir überlegt was ich in der suche eingeben könnte, dann hab ich irgendwann mal keylogger eingegeben und bin auf ein projekt von lukie gestossen.

und da luckie ja einer der besseren coder hier ist, ist der code auch anspruchsvoller, ich will auch keinen so keylogger haben nur en einfache funktion.

hier mal mein code(der leider ned funzt...):

markieren

Delphi-Quellcode:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
var
ez: string;
begin
ez:=Key;
end;

irgendwie sind die typen incompatibel, aber ich weiss ned wie man die compatibel macht...



mfG toredo

ez := Chr(Key);

hay,

hab ich mich jetzt verdrückt, oder kann es sein, dass wenn man ne F-Taste drückt, dass dann der variable ein buchstabe zugeteilt wird?



mfG toredo

ähm... du solltest dir mal die virtual key-codes zur gemüte führen. Am besten erstellst du dann ein Lookup-array, in etwa so:

const virtualKeys = array[1..$FE] of string = ('LEFT_MOUSE','RIGHT_MOUSE','CANCEL',......) dann kannst dus so machen:

markieren

Delphi-Quellcode:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
var ez: string;
begin
ez := 'VK#' + inttostr(Key) + '=' + virtualKeys[Key];
// Ausgabe bei Key = 1:
// 'VK#1=LEFT_MOUSE'
end;