Código Delphi [-]
var
Fecha: TDate;
...
...
Fecha:= DateTimePicker1.Date;
Edit1.Text:= DateToStr(Trunc(Fecha));
Ah me equivoque....
__________________
Herr Heins Faust
Última edición por Faust fecha: 20-05-2008 a las 01:04:05.
Razón: Perdón... me equivoque, es que no leí bien...
|