string 转换Float

Question

请教大家个简单的问题，
想这个的字符1.25‰，0.23‰，如何转换为可以进行计算的0.00125，0.00023

Answer 1

uses StrUtils;
function p_tofloat(s:string):double  ;
begin
  result:=strtofloatdef(leftstr(s,length(s)-2),0)/1000;
end;

Answer 2

多谢指点，不过发现个问题‰的长度好像是1，length(s)-2的的话，取出来的不对
大家帮我再看看，我是用来计算金额的，怕弄错了

Answer 3

如果是D2009以上版本，长度为1（string为WideString），D2009以下版本则为2（string为AnsiString）