[Nati1]

y asi

Código Delphi [-]
sedit1.text:=formatfloat('#,',strtoFloat(sedit1.text));