Probleme mit FormatSettings.ShortDateFormat

[MetalChris]

Wir stellen zurzeit auf Delphi XE2(Update4) um, dabei ist uns afgefallen, dass bei ShortDateFormat das falsche Format zurückgegeben wird. Bei den älteren Delpiversionen wird der Wert korrekt zurückgegeben.

Code:
TestLabel.Text := FormatSettings.ShortDateFormat;

Rückgabewert:
Bei Delphi 7 und 2009 -> 'dd.mm.yyyy'
Bei Delohi XE2 -> 'dd/mm/yyyy'

[Bernhard Geyer]

Vermutlich dieser Windows-Fehler

[pmoegenb]

Dann stell's mal so richtig:

FormatSettings.ShortDateFormat := 'dd.mm.yyyy';

[MetalChris]

Also an Windows kann es nicht liegen, da Delphi 2009 es auf dem Testrechner richtig ausgegeben hat. Nur wenn ich das Projekt mit XE2 compiliere, dann gibt er es falsch zurück. Muss also an XE2 liegen.

[Iwo Asnet]

Ich habe mich auch gewundert und einmalig in den Windows-Einstellungen das Datumsformat hin- und wieedr zurück verändert. Nu is Ruh.

[MetalChris]

Das hab ich auch schon versucht, hab es erst auf en.US gestellt und dann wieder auf de.deu.
Ich hab es sogar schon mit resetten auf die Originalwerte der erweiterten Datumseinstellungen versucht, aber er gibt immer noch das falsche Format zurück.

[Ralle1]

Ich stelle exkat das gleiche Problem auch bei mir im Zuge einer Umstellung von Delphi2007 nch XE2 fest.

2007 -> ShortDateFormat='dd.mm.yyyy' und DateSeparator='.'
XE2 -> ShortDateFormat='dd/mm/yyyy' und DateSeparator='.'

MetalChris, wie hast du das Problem letztlich gelöst, durch StringReplace?
Ist es ein Delphi Bug oder wie zu erklären? Gibt es elegantere Lösungen?

Vielen Dank

[MetalChris]

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.