System.Val - 将字符串转换为数字

举例:

---

var

  s: string;

  i: Real;

  j: Integer;

begin

  s := '13.2435';

  Val(s,i,j);

  ShowMessage(FloatToStr(i));  {13.2435}

  ShowMessage(IntToStr(j));    {返回 0 表示转换成功}



  s := '13_2435';

  Val(s,i,j);

  ShowMessage(FloatToStr(i));  {13}

  ShowMessage(IntToStr(j));    {返回 3 表示第自三个字符转换失败}



  s := 'x132435';

  Val(s,i,j);

  ShowMessage(FloatToStr(i));  {0}

  ShowMessage(IntToStr(j));    {返回 1 表示转换失败}

end;


 
   

System 单元下的公用函数目录

---