Código Delphi [-]Var X: Double; S: String; begin s:='34.33'; x:=StrToFloat(s); S:=FloatToStr(x); end;
Var X: Double; S: String; begin s:='34.33'; x:=StrToFloat(s); S:=FloatToStr(x); end;