Hola
Aparte de lo que Bien dice Dec.
Se puede hacer algo asi:
Código Delphi
[-]
var
Mes, dia, anio: TDate;
begin
Mes:= Now;
dia:= Now;
anio:= Now;
Edit1.Text:= FormatDateTime('mm',Mes)+' '+FormatDateTime('dd',dia)+' '+FormatDateTime('yyyy',anio) ;
end;
Todo en un edit o en varios, como quieras.
Saludos