Código Delphi
[-]
constructor THostPanel.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
self.OnClick := EventoClick;
end;
Si me lo permitís, en este caso yo guardaría un apuntador al evento original;
Porque si desde el IDE programan ese evento, perderás el apuntador a tu código.