Código Delphi [-]edit6.text:=format('#,##0.00', (edit6.text))
edit6.text:=format('#,##0.00', (edit6.text))