如果用完释放adoquery？如果还要用一段时间，怎么办？

代码：
  try
  q1:=TADOQuery.Create(nil);//动态创建的adoquery
  ds1:=TDataSource.Create(nil);
  openquery(q1,'select * from NM_domainname where dom_customer='''+fieldbyname('customer').AsString+''' ');//这是连库并加sql语句，我自己的函数
  ds1.DataSet:=q1;
  DBG_domainname.DataSource:=ds1;
  finally
  q1.Free;//用完释放掉
  ds1.Free;
  end;问题是我现在用q1打开了一个表，加上释放后数据就显不出来了，是不是当时就free了？怎样控制当我不用它时才free?