如何在文本文件中搜索指定字符串以及如何将搜索到的数据写入动态创建的Excel文件中? (155分)

  • 主题发起人 主题发起人 tingyuxuan1
  • 开始时间 开始时间
T

tingyuxuan1

Unregistered / Unconfirmed
GUEST, unregistred user!
文本文件格式大致如下 :
日期 记录人
020608 王王
进口 出口
1000 3000
日期 记录人
020609 王王王
进口 出口
1005 5000
........
生成的Excel文件如下 :
进口 出口
日期 .... ....
日期 .... ....
大致如此。
最好详细一点,包括如何将文本文件打开,如何在其中查找,如何创建Excel文件,又如何写入并保存。
谢谢。
 
看几个例子就可以做了,做这个不难,就是太烦琐
 
这个有,供你参考一下:
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1048662
 
看你的文本文件,和要生成的Excel,似乎只能是动用蛮力进行搜索了,使用TStringList将数据读出来,然后逐个对比?最后找到合适的。写入Excel中。
写入Excel倒好办,使用Com就可以了,论坛上搜索一下就可以找到、
 
用stringlist将文本load进去,然后再一条一条的解析就可以了,解析完在放到Excel文件中
 
文本格式都一样的话,建议创建一个结构,把数据全读入结构中,剩下的就是往excel中添加了
。好运!
忙着一个朋友的事,没时间给你做实验了。有兴趣去看看我的文题:
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1287853
 
该说的楼上几位都说了,做这个就是需要耐心.
 
各位写个简单的小例子啊。
哪怕只是搜索一个字符串,然后写如动态创建的EXCECL文件中。
 
1。用adoconnection1建立和EXCEL文件的连接,其中用到ADOTABLE1
2。用另外一个ADOCONNECTION2建立和ACCESS数据库的连接,其中用到ADOTABLE2
3。进行如下操作是将EXCEL导到mdb:
adotable1.SaveToFile('c:/datatemp.db',pfADTG) ;
adotable2.LoadFromFile('c:/datatemp.db');
4。进行如下操作是将mdb导到excel:
adotable2.SaveToFile('c:/datatemp.db',pfADTG) ;
adotable1.LoadFromFile('c:/datatemp.db');
 
多人接受答案了。
 
后退
顶部