[Ghennadiy]

как xxxx.xxxx преобразовать в xxxxxxxx, из extended в string с потертой запятой? спасибо

[Pyro]

PHP код:

Caption := StringReplace(FloatToStr(12345.6789), ',', '', []); 


[Ghennadiy]

спасибки

Код:

1 2 3 4 5

var i:extended; begin i:=343.423432 ; label1.Caption := StringReplace(FloatToStr(i), ',', '', []);