呵呵，意外发现这样的代码也能正确运行。

[eastliangliang]

Delphi还真贴心啊，哈哈。
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
i := 4;
for i := 0 to i - 1 do
showmessage(inttostr(i));
end;

[XXSingle]

呵呵，平时都没注意喔

[eastliangliang]

Delphi在循环开始把i+1算出来放在ESI中，以后就不用变量i了。我以前都是用两个变量完成这个循环功能，现在看真是多此一举啊。

[DieGhost]

昏倒

[gxgyj]

^_^

[lym_1978]

呵呵

[DieGhost]

想想也是，自己原来都是多此一举了

[ly_liuyang]

本来就是可以的

http://lysoft.7u7.net

[hthunter]

我只要分……

[lw549]

呵呵,如果不是ShowMessage用到了i,还有更有意思的事呢:)
试试看

[firstshine]

所以，谁都没有资格教训新手：我已经精通XXX......

写程序，就得学到老

[eastliangliang]

呵呵，楼上想的太多啦，这点小事，不用想那么多大道理哈^_^

[cangwu_lee]

语言的特点

[lushiyu0]

回复人： eastliangliang(青苹果) ( ) 信誉：137 2005-03-04 14:27:00 得分: 0


呵呵，C语言里可不是这样的。
i=4;
for(i=0;i<i-1;i++)//--------------老大，这行和上一行i=4 之间是不是有什么冲突？当染不能执行了！
printf("%d",i);
不执行循环的。

那孩子他爹，不用i有什么有意思的事啊？
for i := 0 to i - 1 do
showmessage('hello world');
打四个hello world，没什么啊。

这不能是bug，只是优化。

[才子鸣]

up

[Breakc0de]

呵，也是啊。

[merkey2002]

Delphi还真贴心啊，哈哈。
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
i := 4;
for i := 0 to i - 1 do //这里的i-1 运算先于i:=0,而且for 循环事先确定循环次数,
//不像 while <条件> do 那样每次循环前要进行重新判断.因此这里i-1只执行了一次.
showmessage(inttostr(i));
end;

我分析的对不?

[eastliangliang]

for循环是事先确定循环次数的，你可以在调试的时候打开CPU看汇编，我说过，Delphi先把循环次数算出来放在寄存器ESI中，以后每次减1，不会再重新计算循环次数啦。
C语言是每次都计算循环条件的，不过它的for循环功能强大，这样做也是为了能实现其它循环的功能。
谁把C语言的for循环的反汇编代码贴出来，我机器上只有老式TC，还不太会使^_^

[caiso]

顶一下

[Sunniness]

呵呵,晕倒

[lw549]

回来晚了,循环中不用i,可以单步跟踪一下，发现i是从大到小执行的，和for的写法没有关系,原理上面已经说了。
>>for循环是事先确定循环次数的，你可以在调试的时候打开CPU看汇编，我说过，Delphi先把循环次数算出来放在寄存器ESI中，以后每次减1，不会再重新计算循环次数啦。