[Delphi] sčítání desetiných čísel z editu

C++, C#, Visual Basic, Delphi, Perl a ostatní

Moderátor: Moderátoři Živě.cz

Odeslat příspěvekod dyžon 6. 5. 2018 09:20

zdravím,
mám dejme tomu tři TEdity:
Edit1:= '2,5' ; Edit2:= '7,4'; Edit3:= 5,2';
a teď bych potřeboval ty čísla sečíst.
zkoušel jsem:
Kód: Vybrat vše
var a: Real;
......
a:= StrToFloat(Edit1.Text) + StrToFloat(Edit2.Text) + StrToFloat(Edit3.Text);

2,5 is not a valid floating point value;
pomúže prosím někdo, jak ty edity převést, aby šly sečíst ??
AMD FX-6300; Gigabyte 970A-DS3P; DDR3 8192MBytes; AMD Radeon HD 6700 Series
dyžon
Junior
Uživatelský avatar

Odeslat příspěvekod suk 6. 5. 2018 11:09

Moc jsi negooglil, ze? Problem je, ze StrToFloat nebere v potaz nastaven "locales" (na win se to jmenuje jinak, nevim jak) a desetinna cisla ocekava s desetinnou teckou.

Takze budto napsat do textboxu "2.5" nebo pouzit
Kód: Vybrat vše
DecimalSeparator:=',';
Pokud nesouhlasíte s mým názorem, popřemýšlejte sami nad sebou. Opravdu si myslíte, že já bych se mohl mýlit?
----
You are an inspiration for a birth control...
suk
Mírně pokročilý
Uživatelský avatar

Odeslat příspěvekod dyžon 6. 5. 2018 11:23

ale jo, právě že jsem googlil, ale bohužel marně.
díky moc,
DecimalSeparator pomohl ..
AMD FX-6300; Gigabyte 970A-DS3P; DDR3 8192MBytes; AMD Radeon HD 6700 Series
dyžon
Junior
Uživatelský avatar


Kdo je online

Uživatelé procházející toto fórum: Žádní registrovaní uživatelé a 1 návštěvník