问一个怪怪的问题!

Question

procedure TForm1.Button1Click(Sender: TObject);
var
  r: Integer;
  rs: Real;
  s: String;
begin
  r := 100;
  rs := 102.456;
  s := '1233';
end;
//在r和rs为什么不能设置断点
//但移动鼠标去分别到这两个变量的值都是显示"0"
//ShowMessage(IntToStr(r))或者ShowMessage(FloatToStr(rs));结果分别是:100; 102.456
//但加入ShowMessage设置断点就可以了
产生这样的原因是什么? 

Answer 1

忘记说了,以上是在delphi6 写的.

Answer 2

r和rs在没有showmessage语句的时候被系统认为是无用的数据，编译的时候优化掉了

Answer 3

你只是定义了，但后面没有用到，所以编译器在运行的时候优化掉了你showmessage时用到r 和rs，编译器也认为前面定义起作用了，就没有优化掉，所以再追加断点就可以了