怎么把txt转换为dbf(5分)

  • 主题发起人 主题发起人 ifcansee
  • 开始时间 开始时间
I

ifcansee

Unregistered / Unconfirmed
GUEST, unregistred user!
在delphi中,怎么把txt转化为dbf
 
这么大的问题,给这么少的分啊?
不过话说回来,这种转化需要具体看你的txt和dbf分别是什么样的,自己编程很容易实现啊
 
不好意思,我的积分只有102,怎么给的多啊
 
Adobe公司有PDF writer插件可以用
 
我不知道
 
这段代码不知道对你有没有用:
var TextList:Tstringlist;
LineStr:string;
LineNo:integer;
begin
Textlist:=Tstringlist.create;
if opendialog1.Execute then
begin
Textlist.LoadFromFile(opendialog1.filename);
LineNo:=1;
while LineNo<TextList.Count do
begin
LineStr:=Textlist[LineNo];
adotable1.InsertRecord([copy(linestr,1,6),copy(linestr,7,7),copy(linestr,11,11)]);
Inc(LineNo);
end;
end;
TextList.Free;
end;
 
后退
顶部