请问数据转换的问题，把字符型转换为数字

Question

我的代码如下：
var
i : real;
begin
i := (strtofloat(edit9.Text)) * 100;
end;出错，说不是浮点型，然后改为如下：var
i : integer;
begin
i := (strtofloat(edit9.Text)) * 100;
end;也出错，说不是整形，但是根据观察edit9.text里面显示为0.99不知道为什么会出错了，请各位前辈指点。谢谢

Answer 1

我的代码如下： 
var 
i   :   real; 
begin 
i   :=   (strtofloat(edit9.Text))   *   100; 
end; 出错，说不是浮点型，然后改为如下： var 
i   :   integer; 
begin 
i   :=   (strtoint(edit9.Text))   *   100; 
end; 也出错，说不是整形，但是根据观察edit9.text里面显示为0.99 不知道为什么会出错了，请各位前辈指点。谢谢

Answer 2

大哥，你看看strtofloat的返回值类型就知道了。

Answer 3

edit9.Text里输入的内容不是浮点数。

Answer 4

用strtofloatdef函数就不会出错了

Answer 5

procedure TForm1.Button1Click(Sender: TObject);
var
  i : real;
begin
  i := strtofloat(edit1.Text) * 100;
  label1.Caption := floattostr(i);
end;没错的啊 
你的错误提示是什么

Answer 6

用strtofloatdef函数就不会出错了搞定

Answer 7

var
i:real;
begin
  edit9.text:=floattostr(strtofloat(edit9.Text)*100); 
  i:=strtoint(edit9.text); 
  
end; 

Answer 8

var
i:integer;
begin
  edit9.text:=floattostr(strtofloat(edit9.text)*100);
  i:=strtoint(edit9.text);
end;