MaskEdit

[andres1569]

Hola:

También abogo por la propuesta de Román. Todo lo que pueda hacer el componente sin mediación de terceros, mejor que mejor.

Por cierto, la técnica que se emplea en dicha solución para redefinir un método de un componente sin necesidad de instalarlo es la que se expone en el truco Clases interpuestas de la web de Ian Marteens (dicho sea de paso, creo que Marteens recibe mucha y buena publicidad en estos foros, no estaría mal que se pasara por aquí alguna vez ).

Saludos

[AGAG4]

type
TMaskEdit = class(Mask.TMaskEdit)
protected
procedure ValidateError; override;
end;

TForm1 = class(TForm)
{ métodos y propiedades }
end;

implementation

procedure TMaskEdit.ValidateError;
begin
MessageBeep(0);
raise EDBEditError.Create('Formato incorrecto');
end;
end.

**No me funciona en esta, lo que pasa es que me marca error en "procedure ValidateError; override;"

[roman]

¿Qué error te marca?

// Saludos

[pablo_madrid]

hola, soy nuevo en el foro y esto es un poco antiguo pero me seria util conseguir que funcionase. A mi tambien me sale un error al poner el codigo de Roman y es el siguiente:

[Error] Unit1.pas(11): Unsatisfied forward or external declaration: 'TMaskEdit.ValidateError'
[Fatal Error] Project1.dpr(9): Could not compile used unit 'Unit1.pas'

A que puede ser devido? gracias.