在Delphi里，如何用Query这个控件导出数据

Question

我现在用了一个Query控件加上一个SQL句语连上了数据库里的test表，当我要点击一个按钮时，就可以把test表里的内容导出来，请问怎么写这条代码？
还有一点要说明的,在test表里有部分的字段是MEMO格式的
请大虾们帮助下

Answer 1

var 
  SomeFiled : String;
Query.close;
Query.SQL.clear;
Query.Sql.Text := 'select * from test';
Query.Open;
Query.First;
while not Query.Eof do 
  begin
    SomeFiled  := Query.FieldByName('sfield').AsString; //取某条记录某个字段的值
    Query.Next;
  end;

Answer 2

没听清楚楼主有什么问题...
二楼的是些基本的用query取数据操作.

Answer 3

二楼的正是可以把query里的数据拿出来放到someFile里了,但怎么样才可以保存到Excel格式的文件啊?