用ADO连接Text和CSV文件，用逗号隔开可以连接，但用Tab分割就不行了？(100分)

D

delphiroad

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-11

• #1

具体来说，Ado连接时，设Extended Properties=Text可以连接到用
逗号分隔的文本文件（不管是.txt还是.csv），但如果用Tab分隔，则只剩下一个字段了！
并且这个字段是所有字段的合并！怎么办？
怎样才能实现用Tab符合分隔呢？

 

L

linsb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-12

• #2

转一下吧！
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
memo1.lines.LoadFromFile('abcd.txt');
for i:=0 to memo1.Lines.count-1 do
memo1.Lines:=StringReplace(memo1.Lines, char(9), ',', [rfReplaceAll]);
memo1.lines.SaveToFile('abcd1.txt');
end;

 

D

delphiroad

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #3

linsb:
如果该Text文件用的是Unicode格式，则我应该怎样把它转成Ansi格式？

 

L

linsb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-16

• #4

可先试试用Unicode格式是否能正确读入，否则可用word转。

 

M

MikeZ

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-05

• #5

TO DELPHIROAD:
我有这方面相关资料，可以发给你！

 

D

delphiroad

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-23

• #6

to MikeZ：
对不起，太久没来了，不知好消息，请发给我吧：lectureke@163.com
谢了！

 

D

delphiroad

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-21

• #7

多人接受答案了。