L
logpie
Unregistered / Unconfirmed
GUEST, unregistred user!
(一):
begin
k:=0;
for i:=1 to 10 do
begin
k:=k+1;
ListView1.Items.Add.SubItems.Add(inttostr(k));
ListView1.Items.Add.Caption :=inttostr(k);
ListView1.Update ;
end;
end;
(二)
k:=0;
for i:=1 to 10 do
begin
k:=k+1;
with ListView1.Items.Add do
begin
caption:=inttostr(k);
SubItems.Add(inttostr(k));
end;
ListView1.Update ;
end;
end;
为什么代码(一)再显示时每列之间都和SUBITEM之间错开一个,而代码(二)却没有这个问题?
谢谢!
begin
k:=0;
for i:=1 to 10 do
begin
k:=k+1;
ListView1.Items.Add.SubItems.Add(inttostr(k));
ListView1.Items.Add.Caption :=inttostr(k);
ListView1.Update ;
end;
end;
(二)
k:=0;
for i:=1 to 10 do
begin
k:=k+1;
with ListView1.Items.Add do
begin
caption:=inttostr(k);
SubItems.Add(inttostr(k));
end;
ListView1.Update ;
end;
end;
为什么代码(一)再显示时每列之间都和SUBITEM之间错开一个,而代码(二)却没有这个问题?
谢谢!