将计算结果赋值一变量！

Question

1.不能用result作为变量名
2. edit11.Text := FloatToStr((0.06/10)*((strtoint(edit10.Text)-90)+0.68));因为你的计算结果是浮点数而不是整数不能IntToStr

Answer 1

var
result:integer;
begin
result:=Round((0.06/10)*((strtoint(edit10.Text)-90)+0.68));
edit11.Text:=inttostr(result);
end;

Answer 2

var
result:integer;
begin
result:=round((0.06/10)*((strtoint(edit10.Text)-90)+0.68));
edit11.Text:=inttostr(result);
end;

Answer 3

var
result:integer;
begin
result:=floattostr((0.06/10)*((strtoint(edit10.Text)-90)+0.68));
edit11.Text:=inttostr(result);
end;

Answer 4

修改如下:
var
result:single;
begin
result:=(0.06/10)*((strtoint(edit10.Text)-90)+0.68);
edit11.Text:=FloatToStr(result);
end;

Answer 5

不能用result做变量，它是一个函数返回值。你定义别的变量试试