Also ich möchte folgendes machen. Es soll diese Prozedur aufgerufen werden.
Delphi-Quellcode:
procedure TForm1.PlusClick(Sender: TObject);
begin
Zwischenergebnis:=StrToFloat(sEdit1.Text);
sEdit1.Text:='';
Zeichen:=1;
Kom:=0;
end;
Und zwar von dieser hier.
Delphi-Quellcode:
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if (Key in ['+']) then
hier soll sie aufgerufen werden
end;
Allerdings wollte das nicht gehen, da dann kam nicht ausreichend Parameter oder so.