Escribiendo codigo en procedimientos

[JulioGO]

Hola forofos:

Despues de haber leido el foro Ocultar propiedades, en la cual me recomendaban crear un componente derivado de TCustomComboBox en vez de TComboBox; necesito escribir codigo en el procedimiento KeyPress. Dicho procedimiento lo declaro de la siguiente manera:

...
published
procedure OnKeyPress(Sender: TObject; var Key: Char); override;
end;

...

procedure TMiComponente.OnKeyPress(Sender: TObject; var Key: Char);
begin
{Aqui va el codigo}
...
end;

end.


Pero no funciona y Delphi me envia el siguiente mensaje:

"Method OnKeyPress not found in base class"

Alguien sabe como puedo solucionar este impase.

Saludos.

[Al González]

¡Buen día a todos!


..."Method OnKeyPress not found in base class"...
Efectivamente, la clase TCustomComboBox no define ni hereda ningún método llamado OnKeyPress (OnKeyPress es el nombre de una de sus propiedades evento).

El método que puedes redefinir es, si no mal recuerdo (estoy ahora en un café Internet), KeyPress.

Algo que utilizo frecuentemente cuando derivo nuevos componentes es abrir las unidades que definen las clases ancestrales y observar las declaraciones que éstas tienen en la sección Protected (donde generalmente se colocan los métodos virtuales).

Espero esto sea de utilidad, seguimos en contacto.

Al González :).