突然发现Delphi的for循环最后会把i还计算一遍！
procedure TForm1.Button1Click(Sender: TObject);
var
i,k,n: Integer;
begin
n:=0;
k:=StrToInt(Edit2.Text);
for i:=StrToInt(Edit1.Text) to k do
begin
n:=n+1;
//if i=k then break;
end;
Edit3.Text:='i='+IntToStr(i)+' No: '+IntToStr(n); //这里的i已经是比Edit2中的数字大1了,如果不加Break的话。
end;
赶快回头检查下之前的Code!!!!!!
哈哈
还好我不会在
for do begin
end;
后面再引用 I 的值。
你才知道
只有这样才能知道i是否已经超过了最大边界
比如
for i := 2 to 5 do
begin
end;
for这一句在汇编中是这样表示的 cmp ebx,$06,而不是$05
原因LS解释了
一般不要循环完了直接引用循环变量，DELPHI编译时已经给过警告了...
恩，知道了。
要是delphi给你优化成downto的话,还不知道是啥样呢
应该与编译有关
00457DA0 686A7E4500 push $00457e6a
00457DA5 64FF30 push dword ptr fs:[eax]
00457DA8 648920 mov fs:[eax],esp
Unit1.pas.33: n:=0;
00457DAB 33C0 xor eax,eax
00457DAD 8945F0 mov [ebp-$10],eax
Unit1.pas.34: k:=StrToInt(Edit2.Text);
00457DB0 8D55E4
相关问答：
返回的内容是如下代码,怎么能渠道2b?
<p class="text1">1a </p>
<p class="text1">2b </p>
<p class="text1">3c </p>
<p cl ......
一般都是怎么接活的？
收入怎么样
sohu？soho？
sohu 可能是small office house unit
小办公室，把家变成单位。
去威客网啊,很多个呢,还有外包的网站
学习学习。
现在Delphi做东西不行了,处于淘汰状 ......
最近换了家公司，郁闷的是关于Delphi的问题，公司之前用的也是D版Delphi7企业版的。后来被送了律事函以后，就强制改用Delphi7个人版，剧说这个版本是免费版，或者说很便宜，如果查出来，就买个好了。这下可好。苦了� ......
我在网上找了个关于IEBHO的代码，然后按照哪个设置了，后来运行的时候出现
[错误] Unit1.pas(15): Undeclared identifier: 'GetTypeInfoCount'
[错误] Unit1.pas(15): Undeclared identifier: 'GetTypeInfo ......
