Código Delphi [-] var st: string; f: Double; begin f:= 5.1; st:= FormatFloat('0.000',f); ShowMessage(st); ...
var st: string; f: Double; begin f:= 5.1; st:= FormatFloat('0.000',f); ShowMessage(st); ...