将 Delphi BDE Paradox *.db 查询结果导出到文本文件？

Posted 2023-03-23

【中文标题】将 Delphi BDE Paradox *.db 查询结果导出到文本文件？

【英文标题】：Export Delphi BDE Paradox *.db Query Result to a text file?

【发布时间】：2012-07-11 02:25:25

【问题描述】：

如何 例如 我在 Borland Delphi 中使用 SQL Explorer 或 Database Dekstop，查询如下：SELECT * FROM mst_employee;

我希望文本文件中的查询结果说 mst_employee.txt 类似：

employee_code;name;status;
001;Andi;1;
002;Budi;2;
003;Carli;3;

感谢之前

【参考方案1】：

我将遍历查询返回的结果集并将结果写入文本文件，并用分号分隔每个文件。我不知道有任何内置功能可以做到这一点。

with query do
 begin
  params[0].asinteger:= <whatever>;
  open;
  if not isempty then
   begin
    assignfile (f, 'c:\data.txt');
    rewrite (f);
    while not eof do
     begin
      writeln (f, fieldbyname ('a').asstring, ';', fieldbyname ('b').asstring, ';');
      next
     end;
    closefile (f);
   end;
  close
 end;

为老式的 Pascal I/O 道歉，但如果我们仍在使用 BDE......

【讨论】：

实际上使用文本文件也是我的替代方法，但有没有一种方法直接从 SQL Explorer 或数据库桌面的查询结果导出到 *.txt 或可能是其他方法？ :) 但感谢您的回答:)