Unter einer Procedure eine andere Procedur aufrufen

[terence14]

Ich verwende folgende Möglichkeiten:

Delphi-Quellcode:

procedure TForm1._procedure1(Sender: TObject);
begin
// mach was
end;

procedure TForm1._procedure2;
begin
//mach was
end;

procedure _procedure3;
begin
//mach was
end;

procedure TForm1.bButton1Click(Sender: TObject);
begin
_procedure1(Sender);

_procedure2;

_procedure3;
end;

MfG,
terence