Código Delphi [-] var dFecha: TDate; sFecha: string; begin dFecha := DateTimePicker1.Date; sFecha := DateTimeToStr(DateTimePicker1.Date); {...}
var dFecha: TDate; sFecha: string; begin dFecha := DateTimePicker1.Date; sFecha := DateTimeToStr(DateTimePicker1.Date); {...}