Einzelnen Beitrag anzeigen

Benutzerbild von Assun
Assun

Registriert seit: 3. Feb 2005
Ort: Hilzingen am Bodensee
469 Beiträge
 
Delphi 2005 Personal
 
#11

Re: "Bitte eine Taste drücken" und dann Virtual Ke

  Alt 1. Dez 2005, 21:49
Zitat von BenjaminH:
Zitat von Assun:
Delphi-Quellcode:
procedure TForm1.TastenKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
Tasten.Text := chr(Key);
end;
Wenn du willst, dass nur chr(Key) als Eingabe angesehen werden soll mache das einfach so:
Delphi-Quellcode:
procedure TForm1.TastenKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
Key := chr(Key);
end;

dein Beispiell geht leider nicht

und ich will das net per showmessage machen sondern so dass es direkt da steht.

also müsste es das beispiel sein, aber er bringt mir nen error :

[Fehler] MultiKey_uMain.pas(164): E2010 Inkompatible Typen: 'Word' und 'Char'
Sebastian Dietrich
http://Assun.de - bald komplett überarbeitet
  Mit Zitat antworten Zitat