AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

String to Extended

Ein Thema von pustekuchen · begonnen am 2. Mär 2012 · letzter Beitrag vom 2. Mär 2012
Antwort Antwort
Benutzerbild von pustekuchen
pustekuchen

Registriert seit: 27. Aug 2010
265 Beiträge
 
Delphi 11 Alexandria
 
#1

String to Extended

  Alt 2. Mär 2012, 10:04
Delphi-Version: XE2
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
Delphi programming is awesome.
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.625 Beiträge
 
Delphi 12 Athens
 
#2

AW: String to Extended

  Alt 2. Mär 2012, 10:07
Im Deutschen ist der Dezimaltrenner ja nicht der Punkt, sondern das Komma. Du könntest nun Dein Windows auf Englisch umstellen () oder die überladene Variante von StrToFloat(Def) nehmen, bei der Du FormatSettings mit übergibst.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.771 Beiträge
 
Delphi 10.4 Sydney
 
#3

AW: String to Extended

  Alt 2. Mär 2012, 10:08
... der '.' ist der DecimalSeparator der auch allgemein auf dem Rechner verwendet wird?

Grüße
Klaus
Klaus
  Mit Zitat antworten Zitat
Benutzerbild von pustekuchen
pustekuchen

Registriert seit: 27. Aug 2010
265 Beiträge
 
Delphi 11 Alexandria
 
#4

AW: String to Extended

  Alt 2. Mär 2012, 10:14
Danke DeddyH. Ich hab nun Windows auf Englisch gestellt, nun klappt es wunderbar!

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

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

  formatSettings.DecimalSeparator := '.';
  Lon := StrToFloatDef(sLon,-1,formatSettings );
Delphi programming is awesome.

Geändert von pustekuchen ( 2. Mär 2012 um 10:21 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.625 Beiträge
 
Delphi 12 Athens
 
#5

AW: String to Extended

  Alt 2. Mär 2012, 10:25
Lösung #2 ist IMHO auf jeden Fall zu bevorzugen, und genau so hatte ich es auch gemeint.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Benutzerbild von pustekuchen
pustekuchen

Registriert seit: 27. Aug 2010
265 Beiträge
 
Delphi 11 Alexandria
 
#6

AW: String to Extended

  Alt 2. Mär 2012, 11:11
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.
Delphi programming is awesome.
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.625 Beiträge
 
Delphi 12 Athens
 
#7

AW: String to Extended

  Alt 2. Mär 2012, 11:15
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.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.861 Beiträge
 
Delphi 11 Alexandria
 
#8

AW: String to Extended

  Alt 2. Mär 2012, 11:21
Die Sprache und die Zahleneinstllungen ( Dezimal-/Tausendertrenner) sind zudem ja unabhängig einstellbar.
Markus Kinzler
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.625 Beiträge
 
Delphi 12 Athens
 
#9

AW: String to Extended

  Alt 2. Mär 2012, 11:45
Sag ich ja
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 18:30 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