Komma/Punkt

[arukas]

Hi Leute,

Wie kann ich einen Wert in eine Variable einspeichern ohne zu wissen, ob der User "," oder "." benutzt hat.

Also so ungefair.....

Code:

VAR abc:real;

Edit1.Text := '1,23';
abc := strToInt(edit1.text);

Edit1.Text := '1.23';
abc := strToInt(edit1.text);

[SirThornberry]

also mit StrToInt gar nicht weil eine Zahl mit einem Nachkommaanteil kein Integer sondern ein Floatwert ist. Ansonsten kannst du mit StringReplace einfach Punkt und Komma durch DecimalSeperator ersetzen.

[mkinzler]

Oder die Konstante kurzzeitig Umstellen.

[Sidorion]

FloatToStr und StrToFloat haben ein Version mit Ländereinstellungen. Dies wurde schon mehrfach im Forum besprochen. Bemühe doch bitte die Suche und/oder die Online Hilfe:roteyes:

[Muetze1]

Zitat:

Zitat von Sidorion

FloatToStr und StrToFloat haben ein Version mit Ländereinstellungen. Dies wurde schon mehrfach im Forum besprochen. Bemühe doch bitte die Suche und/oder die Online Hilfe:roteyes:

... erst ab Delphi 6, spätestens Delphi 7. Ich harbeite meistens noch mit Delphi 5 - daher hätte ich keine Chance. Da der Poster seine Delphi Version nicht angegeben hat und vielleicht sogar schon die anderen Lösungen gefunden hatte: woher weisst, dass ihm das wirklich hilft?

[arukas]

hi leute,

danke für eure Hilfe...

Ich hab es jetzt folgendermaßen gelöst:

- DecimalSeperator := '.';
- alle Kommas in Punke umgeformt

Es ist jetzt also egal, ob man Komma oder Punkt benutzt.


Vielen Dank,

Arukas

[mkinzler]

Zitat:

Zitat von arukas

hi leute,

danke für eure Hilfe...

Ich hab es jetzt folgendermaßen gelöst:

- DecimalSeperator := '.';
- alle Kommas in Punke umgeformt

Es ist jetzt also egal, ob man Komma oder Punkt benutzt.


Vielen Dank,

Arukas

Übrigens, das meinte ich in #3

[OldGrumpy]

Und was machst Du mit gemischten Eingaben mit Tausendertrennzeichen?

Also zum Beispiel 1.200,65 oder 1,350,723.23?

[mkinzler]

Zitat:

Und was machst Du mit gemischten Eingaben mit Tausendertrennzeichen?

Zusätzlich die Konstante ThousandSeparator setzen,

[webcss]

kannst natürlich auch in OnKeyPress jedes Komma = in Punkt wandeln....