[gendelphi]

O sin necesidad de declarar 3 variables:

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