如何将txt文件的内容导入clientdataset.(200分)

  • 主题发起人 主题发起人 dark_eagle
  • 开始时间 开始时间
D

dark_eagle

Unregistered / Unconfirmed
GUEST, unregistred user!
Txt文件的内容:
421000010112252053AA
421000020112252101AA
421000030112252101AA
421000020112252101AA
421000010112252101AA
421000010112252102AA
其结构如下:1-2位是用十六进制表示的考勤机地址。
(例:“128888880109061344AA”中,地址“&H12”即为十进制的18。)
3-8位是考勤记录的逻辑卡号。(如上面的“888888”)
9-14位表示打卡记录的日期,按年月日排列。(如上面的01/09/06)
15-18位是打卡记录的时间。按小时分钟排列。(如上面的13:44)
最两位应固定为AA,它表示一个记录的结束标志
如何将分析后的结果导入clientdataset并在dbgrid中显示出来:
机号 卡号 日期时间
18 888888 01/09/06 13:44
 
readln
读一行,分析串

已经如此规范了还来问
:P
 
我要的不是如何分析,而是将结果导入clientdataset中的方法!
 
我觉得你必须分析出数据然后写入clientdataset
 
数据我会分析呀!
 
只是一时想不到怎么样导入clientdataset中.
 
笨笨笨,我怎么这么糊涂啦!
多人接受答案了!
 
多人接受答案了。
 
1 先在clientdataset1.fielddefs添加三个字段(你要的那三个)
2 点选clientdataset1 按右键,点选create dataset
编码如下
while not 文件尾 do
with clientdataset1do
begin

readln()//分出数据
 append;
fieldbyname('机号'):=机号';
fieldbyname(卡号'):=卡号
fieldbyname('日期时间'):=日期时间
end;

当然1,2 两步也可以编程实现,
添加列,赋值等等,
sorry,没有理解你的意思,请不要生气
 
我自己解决啦,方法差不多吧,开始是只想到用loadfromfile,assign等
自己把问题搞复杂.
我没有生气呀!@_@
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
928
SUNSTONE的Delphi笔记
S
I
回复
0
查看
654
import
I
后退
顶部