[[duilioisola]]

Yo diría que verificaras que Query1 esté definido en Unit21.pas
Puede ser que lo tengas que definir dentro de algún método que lo utiliza en la línea 36 o que le hayas cambiado el nombre a un componente (¿TQuery?) que habías agregado en la unidad.

Código Delphi [-]
unit unit21

interface

uses ...;

type
   nombre_objeto = class(ancestro)
   QAveriguarAlgoDeLaBaseDeDatos : TQuery; //Antes se llamaba Query1
private
public
end

implementation

begin

// linea 36 utiliza Query1 que no está definido.
// Por ejemplo:
Query1.Close;
//Reemplazar por: QAveriguarAlgoDeLaBaseDeDatos.Close

end.