¿Hay alguna forma más rápida de iterar a través de un conjunto de datos ADO que

while (not ADOQuery1.Eof) do
    begin
      /* Do something */
      ADOQuery1.Next;
    end;

Necesito escanear un conjunto de datos de alrededor de 9000 elementos y solo extraer registros que coincidan con un conjunto predefinido de números de sucursal.