为什么这样也出错 i := StrToInt('10');

Question

VAR
   i:integer;
  S:STRING;
begin
  i := StrToInt('10');
  s:='';
end断点跟踪 i取不到值，debug  提示：E2171 Variable 'i' inaccessible here due to optimizationdelphi2007 版本和delphi2007 update1 版本都是这样。XE2下通过

Answer 1

var
  Form1: TForm1;
    i:integer;
  S:STRING;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
  i := StrToInt('10');
  s:='';end;procedure TForm1.Button2Click(Sender: TObject);
var b:integer;
begin
   b := i;
end;改成这样，可以发现是可以看到值的，因为这里I有使用。

Answer 2

我用的是Delphi7，运行了，没问题啊
程序：
procedure TForm1.Button1Click(Sender: TObject);
var
  i:integer;
  s:string;
begin
  i:=strToInt('10');
  s:='';
  Edit1.Text:=intTostr(i);
end;