[Любезный]

Попробуй так.

Код:

var FS: TFormatSettings;
...
GetLocaleFormatSettings (0, FS);
FS.DateSeparator:='/';
FS.ShortDateFormat:='DD/MM/YY';
FS.LongTimeFormat:='HH:mm';
Edit1.Text:=DateToStr (Date, FS);
Edit2.Text:=TiimeToStr (Time, FS);