Código Delphi [-] var fecha: TDate; begin fecha:= Now; Edit1.Text:= FormatDateTime('mm',fecha)+' '+FormatDateTime('dd',fecha)+ ' '+FormatDateTime('yyyy',fecha) ; end;
var fecha: TDate; begin fecha:= Now; Edit1.Text:= FormatDateTime('mm',fecha)+' '+FormatDateTime('dd',fecha)+ ' '+FormatDateTime('yyyy',fecha) ; end;