Ich habe ein Programm mit XE2 geschrieben (Konsole), diese Programm ist ein Server das mit jeder Verbindung einen neue Thread erstellt.
Jetzt zum Problem, ich nutze beim Start des Main Threads folgenden Code
Delphi-Quellcode:
Settings := TFormatSettings.Create(LANG_GERMAN);
For i := 0 to High(FormatSettings.LongMonthNames) do
Begin
FormatSettings.LongMonthNames[i] := Settings.LongMonthNames[i];
End;
For i := 0 to High(FormatSettings.LongDayNames) do
Begin
FormatSettings.LongDayNames[i] := Settings.LongDayNames[i];
End;
For i := 0 to High(FormatSettings.ShortMonthNames) do
Begin
FormatSettings.ShortMonthNames[i] := Settings.ShortMonthNames[i];
End;
For i := 0 to High(FormatSettings.ShortDayNames) do
Begin
FormatSettings.ShortDayNames[i] := Settings.ShortDayNames[i];
End;
FormatSettings.ShortDateFormat := 'dd.mm.yyyy';
FormatSettings.DateSeparator := '.';
FormatSettings.TimeSeparator := ':';
FormatSettings.DecimalSeparator := ',';
Um die Länder Einstellung des Programm auf Deutsch einzustellen.
Das geht aber nicht immer ab und zu ist das Programm dann Englisch und bleibt auch dabei bis es wieder neu gestartet wird.
Muss ich die Einstellungen für jeden Thread einzeln machen oder was ist das Problem.