Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi String to Extended (https://www.delphipraxis.net/166839-string-extended.html)

pustekuchen 2. Mär 2012 09:04

Delphi-Version: XE2

String to Extended
 
Gute Tag,

ich möchte die Zahl 9.47071714854088 die in einem String gespeichert ist in Extended umwandeln.

Ich habe es mit StrToFloat und mit StrToFLoatDef versucht:

Delphi-Quellcode:
Lon := StrToFloatDef(sLon,-1 );
Lon := StrToFloat(sLon);
Bei StrToFloat erhalte ich folgende Fehlermeldung:
Zitat:

'9.47071714854088' ist kein gültiger Gleitkommawert.
bei StrToFloatDef wird -1 als Rückgabewert gesetzt.

Eine andere möglichkeit konnte ich bei Google nicht finden, dort wird immer nur auf StrToFloat verwiesen.

Wo liegt der Fehler?

Gruß
pustekuchen

DeddyH 2. Mär 2012 09:07

AW: String to Extended
 
Im Deutschen ist der Dezimaltrenner ja nicht der Punkt, sondern das Komma. Du könntest nun Dein Windows auf Englisch umstellen (:mrgreen:) oder die überladene Variante von StrToFloat(Def) nehmen, bei der Du FormatSettings mit übergibst.

Klaus01 2. Mär 2012 09:08

AW: String to Extended
 
... der '.' ist der DecimalSeparator der auch allgemein auf dem Rechner verwendet wird?

Grüße
Klaus

pustekuchen 2. Mär 2012 09:14

AW: String to Extended
 
Danke DeddyH. Ich hab nun Windows auf Englisch gestellt, nun klappt es wunderbar!

Ne, scherz bei Seite :P War ja klar das es nur son simpler Fehler war =) Nun geben beide Funktionen den richtigen Wert zurück.

Lösung #1:
Delphi-Quellcode:
sLon := StringReplace(sLon,'.',',',[rfReplaceAll]);

Lösung #2:
Delphi-Quellcode:
var
  formatSettings: TFormatSettings;
...

  formatSettings.DecimalSeparator := '.';
  Lon := StrToFloatDef(sLon,-1,formatSettings );

DeddyH 2. Mär 2012 09:25

AW: String to Extended
 
Lösung #2 ist IMHO auf jeden Fall zu bevorzugen, und genau so hatte ich es auch gemeint.

pustekuchen 2. Mär 2012 10:11

AW: String to Extended
 
Ja, das find ich auch. Es wird zwar bei 1,2 Werte kaum unterschied machen. Aber es ist ein sauberer programmierstil und bei mehreren Umrechnungen, wird es sparsamer sein.

DeddyH 2. Mär 2012 10:15

AW: String to Extended
 
Vor allem spielt dabei die tatsächliche Windows-Sprache keine Rolle. Bei der ersten Lösung bekämst Du auf einem englischen Windows ja auch wieder Kummer.

mkinzler 2. Mär 2012 10:21

AW: String to Extended
 
Die Sprache und die Zahleneinstllungen ( Dezimal-/Tausendertrenner) sind zudem ja unabhängig einstellbar.

DeddyH 2. Mär 2012 10:45

AW: String to Extended
 
Sag ich ja ;)


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:55 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz