| Pregunta: | 10622 - VALIDACION DE FECHAS |
| Autor: | Claudia Garcia |
| Hola,
No se como validar una fecha que es introducida por el usuario desde un campo tipo texto. Lo que pretendo es que el sistema no me mande un mensaje de error cuando la fecha no sea escrita correctamente, esto es, en el momento de querer guardarla en la tabla correspondiente. De antemano, gracias por su ayuda. | |
| Respuesta: | omar hamden |
| Hola...creo que lo que quieres hacer se puede resolver mucho mas facil usando otro objeto...el (TDateTimePicker) aquí podras posicionar la fecha y hasta la hora (en checked), sin probabilidad de error.
Hasta Luego..!!! | |
| Respuesta: | qdevelop2000 Professional Solutions |
| Suponiendo que el campo es un campo de nombre "Fecha" de la tabla de nombre "Table", pon esto en el onSetText del campo:
procedure TForm.TableFechaSetText(Sender: TField; const Text: String); var fecha:TDateTime; begin if not (Table.State in [dsInsert, dsEdit]) then exit; try Sender.AsString := Text; except ShowMessage('Error en formato del campo fecha'); Abort; end; end; Para cualquier duda utiliza nuestro email... | |