Ей-това:
DateSeparator := '.';
ShortDateFormat := 'dd.mm.yyyy';
DecimalSeparator := '.';
LongMonthNames[1] := 'ЯНУАРИ';
LongMonthNames[2] := 'ФЕВРУАРИ';
...
LongMonthNames[12] := 'ДЕКЕМВРИ';
помага в повечето случаи. Поставя се в главната форма на
програмата, при обработка на събитието OnCreate.