你应该把Query1传到线程的tQuery上,你不传的话tquery不知道关闭谁呀,
如果要传tquery 最好把query1作为创建参数,重载线程的创建函数;
比如: 
public
  constructor create(q:TQuery); override;