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

[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 ??

[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:=',';

[dyžon]

ale jo, právě že jsem googlil, ale bohužel marně.
díky moc,
DecimalSeparator pomohl ..