Delphi - Liberar memoria de consultas

uso query en sql con tablas paradox, lo que pasa es que relaciono un registro con por lo menos 4 tablas de valores que se comparan para generar alguna observación en dicho registro, cuando corro la aplicación me marca que la memoria es insuficiente, utilize:
query1.free
pero al momento de volver a ejecutar esa query me dice que hay una violación y me corta el proceso.
La pregunta es ¿como libero la memoria cada vez que termine de comparar un registro y antes de pasar al otro que tiene el mismo proceso que el anterior?...

Gracias.....

Si utilizas un componente TQuery que has soltado en el formulario, no puedes liberarle (free) ya que la proxima vez que lo utilicas te lanzara la excepcion que señalas.En su lugar crea el componente en runtime
var
Consulta:TQuery;
begin
Consulta:=TQuery.create;
Consulta.Databasename....
Consulta.SQL.Add();
Consulta.Open;
Consulta.Close;
y todo lo que tengas que ajustar
Consulta.Free;
Consulta:=nil;
Suerte