我想将数据表导出为文本文件，使用常使用下面两种方法：procedure TCustomADODataSet.SaveToFile();但导出文件的分隔符是“，”

P

Pc 狂迷

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-29

• #1

我想将数据表导出为文本文件，使用常使用下面两种方法：procedure TCustomADODataSet.SaveToFile();但导出文件的分隔符是“，”，所以希望将分隔符改为“|”，前辈有谁做过吗？(50分)<br />我想将数据表导出为文本文件，使用常使用下面两种方法：
（1）
TPersistFormat = (pfADTG, pfXML);
procedure TCustomADODataSet.SaveToFile(const FileName: WideString;
Format: TPersistFormat)

（2）
TDataPacketFormat = (dfBinary, dfXML, dfXMLUTF8);
procedure TCustomClientDataSet.SaveToFile(const FileName: string = '';
Format: TDataPacketFormat = dfBinary);

但导出文件的分隔符是“，”，因为我的表数据中可存在“，”，所以希望将分隔符改为
“|”，前辈有谁做过吗？

 

A

ArJianzeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-29

• #2

修改组件的定义

 

W

wlmmlw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-30

• #3

它是不是可重载的？ 重载一个如何 ？

 

张

张鸿林

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-31

• #4

字段内容包括","并不影响逗号隔开的串的表达，它应该会把可能
混淆的串用“”括起来，我觉得你可以放心使用默认格式。
TCustomADODataSet.SaveToFile调用接口Recordset20的save方法。
接口好象没有重载的概念。

 

B

bkfx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-01

• #5

我一直在用 ExpressQuantumGrid，数据表导出也是用它的附带导出功能，修改它的导出部分的源代码也很容易。但如果要修改 TCustomADODataSet.Save 导出部分的代码，那是不可能的，因为TCustomADODataSet.Save 本身就是通过ADO API来调用ADO Recordset 对象的 Save 方法（这可没有源码，除非MS愿公开）！
至于 TCustomClientDataSet.SaveToFile 没留意过，不大清楚。

 

X

xingyankai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-10

• #6

我可以给你个例子，请给我邮箱号！

 

P

Pc 狂迷

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-22

• #7

to xingyankai:
谢谢。
mailto:delphi.com@163.com

 

P

Pc 狂迷

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-02-08

• #8

我太笨了！！！！笨得要死了！！！一条一条记录读出来，加上 “|”后写入 tXT 文件不
就行了吗！！！！

 

P

Pc 狂迷

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-02-09

• #9

接受答案了.