数据财出.

Question

如何写delphi程序把ACCESS表导出成txt文件,字段之间用一"|"字符分隔.在ACCESS里可直接导出.

Answer 1

你可以创建一个Tstringlist类，把一条数据按照你的需要生成一个字符串，加到Tstringlist类中，就可存成txt文件。
例如：
var
 st:Tstringlist;
 ss:string;
begin
 st:=Tstringlist.create;
 table1.open;
 table1.first;
 while not table1.eof do
 begin
 ss:=你生成的字符串;
 st.add(ss);
 table1.next;
 end;
 st.savetofile(路径+文件名.txt);
 st.free;
end;