Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject); var xx: Double; begin xx:=333.9; edit1.Text:=FormatFloat(',0.00',xx); end;
procedure TForm1.Button1Click(Sender: TObject); var xx: Double; begin xx:=333.9; edit1.Text:=FormatFloat(',0.00',xx); end;