Delphi - CODIGO MASKEDIT

 
Vista:

CODIGO MASKEDIT

Publicado por PAULITA TEVERE (1 intervención) el 10/02/2006 22:03:08
Quisiera saber el codigo y la mascara para trabajar fecha en este control y al hacer enter se vaya el focus a un control Button
procedure TForm1.mask_fechaKeyPress(Sender: TObject; var Key: Char);
begin
------------------------------------// codigo etc…
end;

end.

Espero su ayuda
Gracias
Chaoooo…
PAULITA TEVERE
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:CODIGO MASKEDIT

Publicado por Seba (11 intervenciones) el 11/02/2006 01:15:17
Haber si entendi bien ,
prueba esto:

procedure TForm1.mask_fechaKeyPress(Sender: TObject; var Key: Char);
begin
//para validar la fecha: usa la función IsValidDate que da verdadero si los parámetros //conforman una fecha válida, caso contrario falso
if key = Char (VK_RETURN) then ControlButton.setFocus // si presionas enter tienes el
// foco en el boton.
end;

No se cual es tu caso pero para ingresar fechas lo mas facil es el componente DateTimePicker de la paleta win32. Ya ingresa la fecha en un buen formato, validada y tiene una linda interfaz.

Suerte !!

Seba.
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

RE:CODIGO MASKEDIT

Publicado por paulita tevere (1 intervención) el 12/02/2006 01:00:21
quiero que el maskedit tenga la siguiente mascara __/__/____ cuando en propiedades: en texto le pongo esa mascara. luego despues de compilarlo cuando escribo en el maskedit me lo borra no escribe encima de el como debe ser
lo mismo ocurre cuando le pongo ##/##/#### en propiedades: editmask
por defecto me sale ## - ## - ####
como ustedes se daran cuenta la opcion seria hacerlo atraves de codigo y no se como hacerlo
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