![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
![]() |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
![]() Hola a todos,
Teno un problema que no he podido solucionar, Necesito hacer validaciones de fechas a partir de String: Try FechaArchivo.Date := StrToDate(StrFecha); bandFecha := True; Except On EConvertError Do ShowMessage('Error'); End; A lo que he leido si existe una fecha invalida (p. ejem. 30/02/2004) se genera una excepción y se captura con EConvertError, el detalle es que no lo hace. Alguien podría ayudarme si estoy mal o alguna otra opción para poder hacer la validación de las fechas? Gracias de antemano Saludos, Francisco Javier Bucio |
#2
|
|||
|
|||
![]() mmmmmm
y si validaras el string antes de pasarlo osea si chechas que si estas en el mes 1,3,5,7,8,10,12 el numero mayo de dias sera 31 y si son el mes 4,6,9,11 el numero sera 30 si es el mes es el 2 sera 28 pero si le aplicas mod al año y sale 0 esto quiere decir que es año bisiesto y sera de 29, esto es lo que se me ocurre en este instante. espero te sirva de algo ![]() |
#3
|
|||
|
|||
![]() Gracias Quetzal,
Si, esa sería un forma de hacerlo, aunque pensé que si podía capturar la excepcion delphi, pero mientras encuentro algo, tendré que hacerle así, jeje Muchas gracias |
#4
|
||||
|
||||
Si deseas capturar la excepcion, porque no simplemente pones la clausula EXCEPT sin el tipo de error que pones, es decir el codigo inicial quedaria asi:
Código:
Try FechaArchivo.Date := StrToDate(StrFecha); bandFecha := True; Except ShowMessage('Error'); End;
__________________
Optimus Prime |
#5
|
||||
|
||||
Cita:
En un caso sencillo quizá no pase nada pero para prevenir futuros dolores de cabeza es bueno evitar este tipo de técnicas. // Saludos |
#6
|
||||
|
||||
Cita:
// Saludos |
![]() |
|
|
![]() |
|