Extender funcionalidad evento

[kamuspik]

He encontrado en la guía del desarrollador de componentes de Delphi un caso análogo al que me interesa, pero respecto al evento Onclick:

Código Delphi [-]
procedure Click override { forward declaration }
...

procedure TMyControl.Click;
begin
inherited Click; { perform standard handling, incluiding calling handler }
... { your customizations go here }
end;

Espero que esto ayude a mi pobre explicación.

Un saludo.