Da gibt es zwei Möglichkeiten.
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
begin
...
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
Button2Click(nil);
end;
oder
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
begin
...
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
Button2Click(Sender);
end;
Sender ist das Objekt von der die Prozedur aufgerufen hat. Bei Button3Click wahrscheinlich Button3. Das kann man ganz sicher erkennen mit
Delphi-Quellcode:
procedure TForm1.Button3Click(Sender: TObject);
begin
if Sender = Button3 then ShowMessage('Button3 wurde geklickt');
Somit ist die zweite Methode allgemein nicht falsch. Wenn es aber keine Rolle spielt, dann einfach nil als Parameter mitschicken.