Edit Felder mit Rechenfunktionen erstellen aber wie?

[Duffy Duck]

also, habe den Code eingegeben... beim compilieren erhalte ich bei dieser Zeile einen Fehler, was das immer auch heissen mag....

procedure TForm1.AllEditKeyPress(Sender: TObject; var Key: Char);