[dec]

Hola,

También algo así parece ir:

Código Delphi [-]
  // Sin espacios en las fechas
  DateSeparator := #0;
  // La prueba de que funciona 
  ShowMessage(DateToStr(Date));