Saludos.
Tambien puedes hacerlo de la forma que lo intentaste solo que te falto algo.
Cita: Asi esta mal ==> ADOquery1.SQL:= <nuevo query>
Asi esta bien => ADOquery1.SQL.Text := <nuevo query>
De esa forma no requieres hacer el Clear ya que substitulles todo.