[lmikle]

Надо написать в классе формы процедуру типа TNotifyEvent и присваивать ее нужному обработчику.

например:

Код:

TForm1 = class(TForm)
...
protected
  procedure ButtonClick(Sender : TObject);
...
end;

...

begin
  MyButton := TButton.Create(Self);
  MyButton.OnClick := ButtonClick;
end;

procedure TForm1.ButtonClick(Sender : TObject);
begin
  ShowMessage('My runtime button clicked!');
end;