Foros Club Delphi - TDateTimePicker

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - TDateTimePicker (https://www.clubdelphi.com/foros/showthread.php?t=5548)

Hola a Todos;

Tengo un problema con este componente y es cuando pongo la propiedad ParseInput:= true, no encuentro la formo de controlar los errores, es decir, si borro el contenido y lo escribo a mano, a parte de que me deja meter lo que quiera(letras,caracteres,...) si pincho para que me habra el calendario me sale el siguiente error:

Exception class EconvertError with message "is not a valid date and time"

¿Sabeis alguna forma de controlar este error y tambien la forma de que solo pueda introducir numeros y el caracter '/' ?

Muchas gracias a todos.

Pues yo hago la prueba y es cierto, que me deja introducir lo que quiera pero cuando abandono el control restaura la fecha del día y no me reporta ningún error.

TDateTimePicker.OnUserInput

Lo cierto es que este evento es el que se habilita al ponerlo a True,

Cita:

Occurs when the user types directly into the component’s edit box.

type TDTParseInputEvent = procedure(Sender: TObject; const UserString: string; var DateAndTime: TDateTime; var AllowChange: Boolean) of object;
property OnUserInput: TDTParseInputEvent;

Description

This event occurs only if ParseInput is set to True. Write an OnUserInput event handler implement special processing that needs to occur when the user types directly into the TDateTimePicker (rather than selecting with the drop-down calendar or scroll arrows). UserString is the string that the user types, and DateAndTime represents the value of the Date or Time property.

Por lo tanto si es que te reporta errores no tendrias más que interceptar este evento y poner el código de comprobación apropiado.

Incluso el evento OnChange u OnKeyPress para controlar el tipo de caracteres que se introduce.

Un Saludo.

lo que podrias hacer es que en la propiedad keypress coloques un codigo para que solo acepte numeros y //.

espero que sirva de algo....