Código Delphi [-] str:= StringReplace(totalbs.Text, '.', '', [rfReplaceAll, rfIgnoreCase]); resultadobs:= strtofloat(str); rest_bs.Text:= floattostr(resultadobs-f)
str:= StringReplace(totalbs.Text, '.', '', [rfReplaceAll, rfIgnoreCase]); resultadobs:= strtofloat(str); rest_bs.Text:= floattostr(resultadobs-f)