Otro truco es usar un la propiedad tag para diferenciar los componentes, así te puede servir para diferencias unos de otros aún siendo del mismo tipo, en donde "is" ya no nos sería tan útil. Supongamos que tenemos 5 Tquerys y quieres mover siempre solo 3, pues le pones el mismo tag a los 3 que requieres y quedaría así:
Código Delphi
[-]
for i:= ComponentCount -1 downto 0 do
if (Components[i] is TIBQuery) and (Components[i].tag=2) then (Components[i] as TIBQuery).Open;