Man könnte auch folgenden Code als Workaround nehmen (falls es bei mehreren passiert):
Delphi-Quellcode:
type
TLocaleInitializer = class
public
class procedure Initialize;static;
end;
class procedure TLocaleInitializer.Initialize;
begin
SetThreadLocale(LOCALE_USER_DEFAULT);
GetFormatSettings;
end;
Und es in einem Initialization Teil aufrufen, kommt aus diesem
QC-Eintrag:
#80189