[xomen]

Código Delphi [-]
var
  Fecha : string;


Fecha := FormatDateTime('dd/mm/yyyy',Date);

Ojala sirva de algo. Saludos