收录日期:2018/10/23 18:03:38 时间:2016/05/20 18:28:04 标签:VCL组件开发及应用
有什么简单方法可以将listview里面的记录保存到文件中?
可以声明一个数组,首先获取Listview.items,然后把它付给数组
我想保存成tab分隔的文件。然后能够读出来,写到listveiw中去。大家有何好办法?谢谢
TListView->TStream->Raw Data Buffer->File
欢迎讨论
这应该是比较容易解决的问题.

定义一个TStringList, 然后把ListView中的数据一行行写入到TstringList中保存即可.

var
  strList : TStringList;
  i : integer;
begin
  strList := TStringList.Creat;
  for i:=0 to ListView.Items.count-1 do
  begin
    strList.add(ListView.items[i].Caption+'^'+(ListView.items[i].SubItems.string[i]);
   ...
  end;
  strList.SaveToFile('c:\temp.txt');
  strList.free;
end;

读出时再按保存时的格式读出...

你 逐条记录的读取数据,然后读完一条后就写如文件啊 ;
因为:listview中是分列的,所以一条记录,你也可以逐列的读取啊
tab其值为#9
var list:tstringlist;i,j:integer;
begin
list:=tstringlist.create;
for i:=0 to listview.items.count-1 do 
  begin
   list.add(listview.items[i].caption);
    for j:=0 to listview.items[i].subitems.count-1 do
     list.add(#9+listview.items[i].subitem[j]);
   end;
 list.free;
end
sorry,忘记了,list.free前加上一句list.savetofile('*.txt');
谢谢。如果从文件里面读的话,是否应该是一行行读,然后分离,然后再赋值到listview中去?
要学会使用TStringList;

TStringList太好用了...

var
  strList : TStringList;
begin
  strList := TStringList.Creat;
  strList.LoadFromFile('你保存的文件');
  //接下来就是对strList的操作了,简单吧.
end;
读的时候前面没有tab的就是caption,有tab的就是subitem

请大家帮忙:我想把文件夹只建在二级目录下。应该怎么实现呢?在线等~ 网络线标记一般怎么做,用什么东西,普通的帖纸效果不太好阿 严重散分抗议大斑竹无原则袒护小斑竹的过失! 高难度:不同内网+ADSL路由共享上网+花生壳能否做VPN? 高手求解,线程问题 vbs或js函数要返回多个返回值怎么办? 涕血求教,为什么我的重定向tag,他就是不起作用呢(一直没人理我,但我是很有一点韧性的,第四次提问) 什么是ejb分布式运算? 如何配置路由器,送高分? 求教:如何把最新N条纪录的第N条纪录取出来? poi写excel出现内存溢出如何解决(急,在线等) 正想入党,需要些思想汇报,可是有很多问题需要求教,请党员同志进来帮忙 如何动态定义sql语句? 出租:回龙观小区复式1500 怎么判定一个工程中的一个页面是否已经打开? 分不够了,可以再加100 perl中安装DBI,我的机器不能上网,如何 问一问在外打工的朋友们,大伙是如何解决自己的养老保险,医疗保险等问题的?? 求助:关于oracle字符集 如何把TextBox.text里的数据转为日期型的数据比如“2004-10-1” window.showModalDialog的问题 寻一般语音格式与s3m格式转换工具软件 菜鸟在线求教~form间数据传递问题~急!!!(不好意思,分不多,请大虾们帮忙了~! 大家开发J2EE用什么开发工具? 大家开发J2EE用什么开发工具? DVD安装时要求插入1CD,怎么解决? 求助,哪位大哥有比较完整的sql server 2000的ultraEdit的着色文件,多谢了! 如何把在PB7。0下的源程序升级到PB10。0下的程序??? 谁有《C++ Primer》的繁体中文版,候捷译,哪里可以下载? 没分了:( 请问怎样可以把一个超连接的图片变灰掉? 怎么设置CTabCtrl控件标签的宽度?