Cita:
Empezado por cacu
Estoy tratando de derivar un componente y poder modificar el evento onclik del TButton, que cuando se ejecute este evento me aparesca un mensaje...
|
Como ya te han dicho, para sacar un mensaje puedes usar el evento estandard del componente.
Si realmente necesitas derivarlo, entonces, en ese caso, nunca debes utilizar los eventos del componente, para eso debes utilizar métodos virtuales o mensajes.
En el caso de TButton, hay un evento que puedes sobreescribir:
Código Delphi
[-]
procedure Click; override;
Crea este método en la parte public de tu componente y programa lo que necesites (no olvides de llamar al inherited); Algo así:
Código Delphi
[-]
procedure TMiButton.Click();
begin
inherited Click;
... <= Tu mensaje
end;