Einzelnen Beitrag anzeigen

thomas2009
(Gast)

n/a Beiträge
 
#5

Re: Codes für KeyPress Ctrl shift delete Pfeil

  Alt 21. Jan 2009, 14:25
OK, nun möchte ich den Code nicht in OnkeyDown :
Delphi-Quellcode:
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if Key = Ord('C') then caption:='Taste C'; // OK
end;
sondern in Onkeypress möchte ich den Code verwenden
Delphi-Quellcode:
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if key =#27 then caption:='esc'; // OK
if key = Ord('c') then caption:='Taste C'; // Passiert nichts
if key =#43 then caption:='Taste C'; // auch nichts


end;
  Mit Zitat antworten Zitat