Suchen einer Methode

[Christian18]

Hallo,

ich habe es gerade selber herrausgefunden.

Ich habe es so gemacht:

Delphi-Quellcode:

procedure TForm1.Neu(Sender: TObject);  // Diese Methode soll gefunden werden.
begin
  ShowMessage('Neu');
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  TProcedure(Form1.MethodAddress('Neu'));  // Methode finden und ausführen
end;

MFG Christian18