Verständnisfrage zu TFormatSettings

[Sherlock]

Du machst gar nichts falsch. Das Delphi macht auch nichts falsch. Der Anwender hat auf seinem System eben für "De-de" das Datumsformat genauso eingestellt. Weder Windows noch Delphi wollen Ratespiele betreiben und lesen immer aus den Einstellungen die Formate aus. Wenn da was geändert wurde, ist das so, weil der Anwender es so wollte. Das muss man respektieren, sonst bekommt man unter Umständen zornige Anrufe...

Sherlock

[alda]

Zitat von Sherlock:

Du machst gar nichts falsch. Das Delphi macht auch nichts falsch. Der Anwender hat auf seinem System eben für "De-de" das Datumsformat genauso eingestellt. Weder Windows noch Delphi wollen Ratespiele betreiben und lesen immer aus den Einstellungen die Formate aus. Wenn da was geändert wurde, ist das so, weil der Anwender es so wollte. Das muss man respektieren, sonst bekommt man unter Umständen zornige Anrufe...

Sherlock

Die Frage ist wofür er es benutzt. Wenn es um das Serialisieren von Daten geht, sollte man das schon klar definieren - denn sonst hast Du Probleme beim Deserialisieren

[freejay]

Danke für die Antworten.

Mir ging es darum, dass Daten überall auf die gleiche Weise gelesen und geschrieben werden.

Ich dachte für die Defaulteinstellungen des Users würde man eine andere "Locale" verwenden und sowas wie "de-DE" wäre fix.

Ich werde wohl den Vorschlag von alda umsetzen und meine FormatSettings selbst (und dann fix) definieren.

Danke nochmal!

[Der schöne Günther]

Sehr gute Absicht, es nicht wie Embarcadero zu machen und nicht auf deutschen Systemen z.B. in XML-Dateien plötzlich "3,14" statt "3.14" zu schreiben!

Ich würde dir nur empfehlen, dich an EN-US zu orientieren. Macht jeder so. Du kannst, auf Windows, im TFormatSettings-Konstruktor auch LOCALE_INVARIANT als Parameter angeben, das entspricht, soweit ich weiß, EN-US.

[Sir Rufo]

Zitat von Der schöne Günther:

Ich würde dir nur empfehlen, dich an EN-US zu orientieren. Macht jeder so. Du kannst, auf Windows, im TFormatSettings-Konstruktor auch LOCALE_INVARIANT als Parameter angeben, das entspricht, soweit ich weiß, EN-US.

Wieso das denn? Nur weil alle das so machen?

Da bin ich doch wohl zu einfach organisiert, denn ich baue mir so ein TFormatSetting exakt nach der Vereinbarung auf und mache das nicht abhängig von irgendwelchen diffusen Änderungen, die irgendwie von aussen die Anwendung beeinflussen.

[freejay]

Zitat von Der schöne Günther:

Du kannst, auf Windows, im TFormatSettings-Konstruktor auch LOCALE_INVARIANT als Parameter angeben ...

Das würde ich auch machen, wenn es sich um ein neues Programm handeln würde. Da es aber schon lange besteht und jetzt (Stichwort "internationale Zusammenarbeit") auch in anderen Ländern benutzt order evtl. nur supported werden muss, müssen überall die deutschen Einstellungen für Datumswerte gelten.

Wie's scheint funktioniert es jetzt damit:

Delphi-Quellcode:

  fs := TFormatSettings.Create('de-DE');
  fs.DateSeparator := '.';
  fs.TimeSeparator := ':';
  fs.ShortDateFormat := 'dd/MM/yyyy';
  fs.LongTimeFormat := 'hh:mm:ss';

Dann auf zum nächsten Problem...

[A.Griffin]

Ich habe ein ähnliches Problem. Ich habe vorher in Delphi 7 in meiner MainForm einfach im FormCreate : DecimalSeparator := '.'; gesetzt und das hat es dann für alle Units auch gemacht. Jetzt habe ich meine Software für Delphi 10.2 umgeschrieben und bekomme es nicht hin, dass StrToFloat geht. Ich gebe in meinem Beispiel Trunc(StrToFloat(edtXStart.Text) * 10); ein. Wobei gerade edtXStart.Text := '61.0' sind. Es sollte am Ende also 610 rauskommen. Ich bekomme aber immer "Exception class EConvertError with message ''61.0' is not a valid floating point value'". Wie kann ich am Einfachsten in Delphi 10.2 einmal für alle Units in meinem Projekt den DecimalSeparator festlegen? Die Vorschläge die hier genannt wurden habe ich in meiner MainForm (in FormCreate) probiert und es hat bei der Funktion die in einer anderen Form ist nichts geändert.

[a.def]

Schon im FormCreate...

Delphi-Quellcode:

  fs := TFormatSettings.Create;
  fs.DecimalSeparator := '.';

probiert und dann...
StrToFloat(edtXStart.Text, fs) ?

Ist wahrscheinlich total falsch aber so klappt es bei mir.

Oder eben im FormCreate
FormatSettings.DecimalSeparator := '.'; und dann
StrToFloat(edtXStart.Text)

[Artur]

Zitat von Sherlock:

Wenn da was geändert wurde, ist das so, weil der Anwender es so wollte. Das muss man respektieren, sonst bekommt man unter Umständen zornige Anrufe...
Sherlock

Ich hatte dazu aber mal einige Probleme, ohne dass die User herumgestellt haben, weil Windows 7 da einen fiesen Bug hat/hatte:
Mir wurden auf ein paar Systemen auch englische Datumsangaben zurückgeliefert, obwohl die Laptops alle auf Deutsch eingestellt waren und sogar in den Einstellungen zur Region die richtigen Formate angezeigt haben.
Wenn man dann in den Systemeinstellungen irgendeine andere Regionaleinstellung gewählt hat (mit übernehmen/speichern) und hat danach das Ganze wieder auf deutsche Regionaleinstellungen zurückgestellt, dann hat es gepasst.

Ich habe es dann auch so gelöst, die Formateinstellungen vorzugeben und nicht von Windows zu beziehen.

Es gab dazu hier im Forum auch eine Diskussion meine ich.

[Uwe Raabe]

In neueren Delphi-Versionen gibt es dafür TFormatSettings.Invariant .