Validar campo Date en Delphi 5
 

HOLA QUE TAL

sucede que cree una tabla en Paradox7 para usarse en Delphi 5, en esa tabla cree un campo de tipo Date. todo va bien.

ya en delphi, a ese campo le asigne una mascara de entrada de la siguiente forma:
- di doble click sobre el componente TTable enlazado con la tabla ya mencionada
- seleccione el campo de tipo date y en la propiedad Edit Mask puse 99/99/9999.
para insertar la fecha.

la pregunta es còmo hago para validar cuando se inerta una fecha inexistente, el sistema lo hace pero envia el mensaje en ingles, y yo quiero cambiarlo por uno propio, utilizo el siguiente còdigo en el evento OnSetText del campo Date

Código Delphi [-]
 Try
   Except
     On Ex:EConvertError do
     Begin
       Showmessage('Error...')
       DBEdit3.SelectAll;
       DBedit3.Setfocus; //Es el DBEdit que corresponde a ese campo
     End;
   End;

Me manda el error, pero no se posiciona en el DBEdit, y cuando he logrado posicionarlo de otras formas, me desactiva la máscara y solo me deja escribir un caracter sobre el DBEdit

Si alguien pued ayudarme lo agradecería mucho

SALUDOS HASTA LUEGO:confused:

cual mensaje en Ingles tira??

tienes k tomar en cuenta que si corres el programa desde delphi el debuger hara saltar las excepciones siempre.

asi como creaste la mascara del campo de fecha, tambien te sale la pestaña de eventos, y ahi viene OnValidate, donde validas el campo y lanzas una excepcion con tu mensaje personalizado, la otra, busca un componente freeware para la fecha, hay muchos y te evitan la pena de las fechas incorrectas y se ven bonitos

Hola:

Quizás te conviene para estos fines el control TDateTimePicker...

Hasta Luego..

El mensaje que me arroja es excepcion class EConvert Error with the massage "10/50/2000 is not a valid date"

Saludos

1ro: Deber fijarte en la configuración regional de tu ordenador

2do: 10/50/2000 No es una fecha validad, ni al derecho ni alrevez:confused:

3ro: Esta ejecutando tu aplicación por el IDE (con delphi)?
Como dice lucasart usa un TDateTimePicker...

Suerte

Me dices que use un TDateTimePicker, pero cómo es que lo voy a enlazar con el campo fecha de la base de datos?

si pense en utilizar un maskedit y manipular ambos componentes, pero es muy engorroso y a veces muy tardado.

SALUDOS