Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject); begin label1.Caption:=FormatFloat(',0.00',Query1.Fields[0].AsFloat); end;
procedure TForm1.Button1Click(Sender: TObject); begin label1.Caption:=FormatFloat(',0.00',Query1.Fields[0].AsFloat); end;