como iniciar el DBDateTimePicker con la fecha actual

[[AzidRain]]

coloca un Uses DateUtils; al inicio de tu unidad y
pones la propiedad date a la fecha actual

Código Delphi [-]
TDatetimePicker.Date := Today; // Sustituir TDateTimePicker por el nombre de tu variable
//o
TDatetimePicker.Date := Now;