procedure in procedure aufrufen

[Sharky]

Zitat von BastardOp:

habs nur mal als bsp test2 genannt aber im richtigen code ist es meisten ein button

Dann rufe doch einfach .Click des Buttons auf

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage('Button 1 geklickt');
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  ShowMessage('Button 2 geklickt');
  Button1.Click;
end;

Besser wäre es aber die Funktionen des Programmes von der GUI zu trennen. Sprich. Du schreibst Dir eine Methode die "etwas macht" und diese rufst Du dann im .OnClick der Buttons auf.