*.EoF = mas de una condicion para un solo resultado

[afxe]

Se puede usar el operador in si los resultados fueran elementos de un conjunto enumerado, aunque claro, entonces también podrías usar el case. Cuando me encuentro algo así suelo usar el Pos, que me indica si una subacadena se encuentra dentro de una cadena:

  
 
  if Pos (MiQuery.FieldByName('Mi_Campo'), ' A PA ') > 0 then begin
	 Inc(Contador);
  end;

Importante separar los resultados entre espacios para que si el valor del campo es 'APA' no te de un resultado positivo. Cuando te acostumbras en verlo en tu codigo es intuitivo, aunque reconozco que no es una solución elegante.

Saludos.