[[maeyanes]]

Hola...

Tienes que crear un método en la clase que tenga la siguiente firma:

Código Delphi [-]
TMyClass = class(TObject)
private
  procedure MyOnClickEvent(Sender: TObject);
  //...
end;

// Ahora lo asignamos...

MyButton.OnClikc := MyOnClickEvent;

Saludos...