Código Delphi [-] s := StringReplace(edtPrecio.Text, '$', '', [rfReplaceAll]);
s := StringReplace(edtPrecio.Text, '$', '', [rfReplaceAll]);