Einer zur Laufzeit erzeugten Komponente eine Ereignisroutine

[SirThornberry]

die Forumsuche hätte dir geholfen...

Delphi-Quellcode:

procedure TmeineClasse.fOnclickProc(Sender: TObject);
begin
[...]
end;

[...]
var LButton: TButton;
begin
  LButton := TButton.Create(Self);
  LButton.OnClick := fOnClickProc;
  [...]
end;