Ich bin auf Merkwürdigkeiten bei der Verwendung von FormatSettings.ShortDateFormat gestoßen.
Ich habe ein Programm von
RAD Studio 2007 auf
RAD Studio Athens umgestellt (zwar C++, aber das sollte keinen Unterschied zu Delphi machen).
In diesem alten Thema ...
https://www.delphipraxis.net/169768-...ateformat.html
... habe ich folgende Aussage zu FormatSettings.ShortDateFormat gefunden:
Zitat:
Bei Delphi 7 und 2009 -> 'dd.mm.yyyy'
Bei Delphi XE2 -> 'dd/mm/yyyy'
Mit
RAD Studio 2007 hatte ich auch immer den Wert "dd.mm.yyyy". Aussage passt hier also.
Mit Athens erstellt ist es bei mir und einem Teil der Anwender allerdings 'dd.mm.yyyy' und bei einigen Anwendern 'dd/mm/yyyy'. Also der Wert nicht immer identisch.
Frage 1: Weiß jemand wie dieser Unterschied zustande kommt (Windows-Version/-Einstellungen/...)?
Nun könnte man meinen, dass das in der Praxis keinen Unterschied macht, sofern man dazu noch FormatSettings.DateSeparator berücksichtigt.
Ich verwende eine Datumkonvertierung ähnlicher Art (hier vereinfachter Code):
Code:
UnicodeString ConvertDate( UnicodeString Datum )
{
TDateTime dt;
FormatSettings.DateSeparator = '.';
FormatSettings.ShortDateFormat = "dd/mm/yyyy"; // alternativ "dd.mm.yyyy"
dt = StrToDateDef( Datum , -1 );
if ( (int)dt != -1 ) {
FormatSettings.DateSeparator = '.';
FormatSettings.ShortDateFormat = "dd.mm.yyyy";
Datum = DateTimeToStr( dt );
}
return( Datum );
}
Ich übergebe der Funktion den Wert "1902". Was wäre als Ergebnis zu erwarten?
Bei Verwendung von ...
Code:
FormatSettings.ShortDateFormat = "dd/mm/yyyy";
... erhalte ich den Rückgabewert "19.02.2024".
Bei Verwendung der Alternative ...
Code:
FormatSettings.ShortDateFormat = "dd.mm.yyyy";
... den Rückgabewert "1902" - also den Eingabewert, weil die StrToDateDef-Funktion -1 zurückliefert.
Ich finde die Ergebnisse überraschend.
Frage 2: Bug, Feature oder Denkfehler meinerseits?
Gruß, Dirk