Stránka 1 z 1

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

Odeslat příspěvekNapsal: 6. 5. 2018 08:20
od dyžon
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 ??

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

Odeslat příspěvekNapsal: 6. 5. 2018 10:09
od suk
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:=',';

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

Odeslat příspěvekNapsal: 6. 5. 2018 10:23
od dyžon
ale jo, právě že jsem googlil, ale bohužel marně.
díky moc,
DecimalSeparator pomohl ..