Procedimiento externo

[ethangio]

Empezado por Casimiro Notevi

Pues tendrá que usar ese

... Les agradezco de corazón el tiempo que se tomaron para leer este hilo y la ayuda prestada.


Soy de la idea de evitar usar componentes de terceros a menos que sean muy necesarios y en este caso pues creo que no lo es y tendré que hacer en cada Form un evento OnKeyPress para todos los TEdit que requieran la validación :

Código Delphi [-]

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); 
begin

      proc_func.Numero(Sender, Key);
end;

Saludos desde Puebla, México.