DateTimePicker

[Casimiro Noteví]

Pero ¿dónde lo has puesto?

[Spynosa]

utiliza el evento onDropDown

Código Delphi [-]
procedure TForm1.DateTimePicker1DropDown(Sender: TObject);
begin
   DateTimePicker1.Date := now;
end;

[marcoszorrilla]

Con lo que te indiqué anteriormente tiene que funcionarte, yo lo utilizo de este modo desde siempre.

Un Saludo.

[Casimiro Noteví]

Empezado por Spynosa

utiliza el evento onDropDown

No, antes, como te han indicado, por ejemplo, al abrir el form, en el onshow

[ecfisa]

Hola.

Yo también usé siempre la asignación en la creación del form, pero cuando instalé Delphi 7 en Windows 8 me llevé la sorpresa de que al poner el componente en el form ya tiene la fecha actual (desconozco el por qué).

Saludos

[marcoszorrilla]

Lo que dice Ecfisa es cierto.

Un Saludo.

[Parsec]

Gracias a todos por la respuesta, para resolver este asunto he utilizado el componente MonthCalendar (mencionado por Casimiro) y lo he asociado al DateTimePicker1 y DateTimePicker2, de forma que cuando uno recibe el foco sitúo el MonthCalendar debajo de él, (el MonthCalendar presenta el mes en el que no encontramos y los DateTimePicker el 30/12/1899), (ver imágenes), cuando selecciono una fecha la llevo al DateTimePicker1 o DateTimePicker2 según el que tenga el foco. Es un poco rollo pero ha quedado perfecto para lo que necesito.