1、用adoquery取出要操作的数据集；
2、创建一个Tstringlist对象，使用field[i].name取出字段名，使用fieldbyname取出字段值，通过循环把字段名和字段值放在一个字符串里，插入为Tstringlist对象的一行；
3、使用savetofile将Tstringlist对象的内容写入目的文本文件；
4、释放Tstringlist对象；

with adoquery do