Delphi - Ayuda soy novato

 
Vista:
Imágen de perfil de Willy

Ayuda soy novato

Publicado por Willy (9 intervenciones) el 28/08/2003 21:31:50
Hola programadores.
Como puedo manejar el MaskEdit, pues deseo introducir solo números, ya cambie su propiedad EditMask con 0000 pero acepta siempre y cuando digite cuatro números, si son menos el programa se cualga cuando lo ejecuto, como puedo hacer para que me acepte 1, 2, 3 o más números.
Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Ayuda soy novato

Publicado por DAM (3 intervenciones) el 29/08/2003 21:31:16
Tenés 2 cosas para hacer:
podés poner en el Imput Mask del EditMask 99999999999999999;0;_ o más 9s deacuerdo como quieras de largo pero aparece el _ como espacio en blanco.
Lo mejor es restringir la entrada de los caracteres indeseados en la propiedad ONKeyPress del MaskEdit como está mas abajo. Todos estos eventos están en la segunda solapa del Object Inspector

procedure TForm1.MaskEdit1KeyPress(Sender: TObject; var Key: Char);
begin
if not (key in ['0'..'9'] ) then
key:=#0;
end;
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar