Wie übergebe ich eine Prozedur als Parameter?

[jbg]

Du musst dafür nur den Typen des Methodenzeigers kennen, der in deinem Fall TNotifyEvent ist.

Delphi-Quellcode:

procedure machwas(AEvent: TNotifyEvent);
begin
  Button1.OnClick := AEvent;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  machwas(ButtonClick);
end;