如何动态创建 Tquery

Question

我的程序中需要动态创建一个 Tquery 组件，但是在使用时要报错，不知道是什么原因，请教各位。是不是要用TQUERY这个类，要在USES出声明一个TQUERY所在的类呢？
  
    var 
      Q1:tquery;
      ..........
    begin 
    Q1:=tquery.create(nil);
     ........ 
  
         
     IDE就会报错，请问是什么原因？
      小弟在线等！！多谢了！

Answer 1

uses Db, DbTable;var
  Q1: TQuery;
  .........
begin
  Q1 := TQuery.Create(Self);
  try
    Q1.DatabaseName := xxxxxx;
    Q1.SQL.Add('xxxxxxx');
    Q1.Active := True; // or Q1.Open or Q1.ExecSQL
    ....
  finally
    Q1.Free;
  end;
end;

Answer 2

更正:
uses Db, DBTables;

Answer 3

to   maozefa(之源) 
   多谢了！

Answer 4

还要给QUERY1加上一个SQL语句的内容，