Código Delphi [-] procedure TForm1.Button1Click(Sender: TObject); var a,b,couble; begin a:=7; b:=0; c:=a/b; ShowMessage(FormatFloat(',0.00',c)); end;
procedure TForm1.Button1Click(Sender: TObject); var a,b,couble; begin a:=7; b:=0; c:=a/b; ShowMessage(FormatFloat(',0.00',c)); end;