怎么样把query返回的结果存储成文本文件！？？在线等待！！！！

Question

dbgrid中返回了 query 查询的结果，现在想把所有这些结果存储成文本文件，怎么做（当点击 按钮的时候把结果保存成文本文件）

Answer 1

设定一个字符串数组
用循环呗，我以前做过，现在机器上没有delphi
while not query.eof do
begin
  for i:=0 to query的最后一个字段
    每个字段给字符窜数组[I]+分隔符；
    将该字符串数组写到txt文件；
end;大体就这样了，实际写挺麻烦，你自己弄吧
 

Answer 2

对，就是把字符串写入到TXT文件，用什么组件或者函数？

Answer 3

可以用TStringList;var sl: TStringList;
begin
  sl := TStringList.Create;
  sl.Add('hello');
  sl.Add('China');
  sl.SaveToFile('c:\test.txt');
  sl.Free;
end;

Answer 4

试一下，问死树大峡TStringList他是什么东西，在哪个组件页？

Answer 5

TStringList为非可视组件，类似ListBox功能