| 发表于:2007-03-19 12:44:211楼 得分:0 |
我的源码 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]); listitem.subitems. strs.clear; end; 好像问题很多,请大家指教! | | |
|