Prozedur in einer Prozedur starten

[KesseK]

Zitat von Andidreas:

aloha in der dp

probiers mal so, so sollte es gehen wenn ich gerade keinen denkfehler gemacht hab

Delphi-Quellcode:

procedure TForm1.onkeypress(Sender: TObject; var Key: Char); 
begin 
  if not (key in[#8,#13,#49..#58]) then key := #0; //Eingabe auf Ziffern beschränken 
  if key in [#13] then 
    begin 
      StrButton.Click(Sender: TObject); 
    end; 
end;

edit:
mist luckie war mal wieder schneller und ich hatte nen punkt vergessen

Wenn ich das "StrButton.Click(Sender: TObject);" einsetz dann bekomme ich folgenden Fehler:
[Fehler]Projekt.pas(63):Zu viele Parameter

Was mach ich falsch?