您的位置：程序门 -> delphi -> vcl组件开发及应用

如何填写listview的相应的列？急

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

如何填写listview的相应的列？急

发表于：2007-03-19 13:37:32 楼主

读标准的文件后，怎么插入到制定的列啊？
如：文件格式为：
1234567890 abcde 123.00
我想插入到listview第一列，第二列，第四列中，怎么写啊？

我的源码
listview2.items.clear;
s:=tstringlist.create;
s.loadfromfile（filename); //读文件
for i:=0 to s.count -1 do
begin
strs:=tstringlist.create;
strs.delimiter := ' ';
strs.delimitedtext := s.strings[i];
listitem:=listview2.items.add;
listitem.caption:=strs[0];
/*****这一段怎么填写？
listitem.subitems.add（strs[1]);
listitem.subitems.add（strs[2]);
****/
strs.clear;
end;
好像问题很多，请大家指教！

发表于：2007-03-20 09:39:391楼得分:0

第一列是caption
/*****这一段怎么填写？
listitem.subitems.add（strs[1]); //第二列
listitem.subitems.add（ ' ');//第三列
listitem.subitems.add（strs[2]);//第四列
****/

对于已经存在的可以
listitem.subitems.strings[0] := strs[1]; //第二列
listitem.subitems.strings[1] := ' ';//第三列
listitem.subitems.strings[2] := strs[2];//第四列

可以用listitem.subitems.count来判断列是否已经存在

发表于：2007-04-21 09:38:292楼得分:0

while not adoquery1.eof do
begin
with listview1.items.add do
begin
caption:=adoquery1.fieldbyname（ 'pjbianhao ').asstring;
subitems.add（adoquery1.fieldbyname（ 'pjename ').asstring);
subitems.add（adoquery1.fieldbyname（ 'pjpinyin ').asstring);
subitems.add（adoquery1.fieldbyname（ 'pjchexing ').asstring);
subitems.add（adoquery1.fieldbyname（ 'pjjiage ').asstring);
subitems.add（adoquery1.fieldbyname（ 'pjmemo ').asstring);

end;
adoquery1.next;
end;
adoquery1.close;

下一篇：二维条码打印
上一篇：[高分急求]如何调用jmail控件?

其他资讯