Ich habe mir einfache eine Funktion geschrieben, die ich beim Programmstart aufrufe. Diese ersetzt dann das / mit dem im System festgelegten DateSeperator.
Delphi-Quellcode:
FormatSettings.ShortDateFormat := StringReplace(FormatSettings.ShortDateFormat, '/', FormatSettings.DateSeparator);
FormatSettings.LongDateFormat := StringReplace(FormatSettings.LongDateFormat, '/', FormatSettings.DateSeparator);
Dadurch hat man dann immer das richtige Format.