editkeypress zahlen und zeichen

[himitsu]

eine Möglichkeit wäre sich den Wert einfach mal anzeigen zu lassen.
aber warum viele nicht auf sowas kommen?

Delphi-Quellcode:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  Label1.Caption := IntToStr(Ord(key));
end;