如何将 Delphi BDE Paradox *.db 查询结果导出到文本文件?例如,我在 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;
之前谢谢
如何将 Delphi BDE Paradox *.db 查询结果导出到文本文件?例如,我在 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;
之前谢谢
我将遍历查询返回的结果集并将结果写入文本文件,用分号分隔每个文件。我不知道有任何内置功能可以做到这一点。
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 ......