Código Delphi
[-]
DateTimePicker.Date:= Date + 30;
dMiFecha:=DateTimePicker.Date;
Eso ahora está bien.
Si te dice que "Date" no lo reconoce, usa:
Código Delphi
[-]dMiFecha:=Trunc(DateTimePicker.DateTime);
Creo recordar del foro que, aunque usemos "Date", el datetimepicker incluye la fecha y hora.
Saludos