A
awfigsk
Unregistered / Unconfirmed
GUEST, unregistred user!
var
i,m:integer;
begin
[red] i:=1;
m:=0;[/red] //这部分是后加的
for i:=1 to iCount do
begin
for m:=0 to combobox1.Items.Count-1 do
if PDataList^.ZtID=MidBStr(Combobox1.Items.Strings[m],5,3) then
break;
if m=combobox1.Items.Count then
Combobox1.Items.Add(PDataList^.ZtID);
inc(PDataList);
end;
end;
我在调试过程中发现i的初始是:
E2171 Variable 'i' inaccessible here due to optimization
而m的初始是64?这是为何呀?
后来我加上i:=1,m:=0,还是不行,这二句在运行过程中不执行呀,还请高手指点!
(Delphi2005+window2003)
i,m:integer;
begin
[red] i:=1;
m:=0;[/red] //这部分是后加的
for i:=1 to iCount do
begin
for m:=0 to combobox1.Items.Count-1 do
if PDataList^.ZtID=MidBStr(Combobox1.Items.Strings[m],5,3) then
break;
if m=combobox1.Items.Count then
Combobox1.Items.Add(PDataList^.ZtID);
inc(PDataList);
end;
end;
我在调试过程中发现i的初始是:
E2171 Variable 'i' inaccessible here due to optimization
而m的初始是64?这是为何呀?
后来我加上i:=1,m:=0,还是不行,这二句在运行过程中不执行呀,还请高手指点!
(Delphi2005+window2003)