Como hacer consultas de registro anterior y siguiente

[[Caral]]

Hola
No entiendo la logica del programa.
En principio no veo el dbgrid, veo un stringrid.
Haces dos sentencias sql
1 para el ibquery1 y otra para el dos, estas estan seguidas, sin embargo casi de inmediato creas una condicion if conteo > 0 then la que cambia la sentencia del ibquery2 y esta es la que me da la impresion de que llena el stringgrid.
No entiendo.
Antes de poder moverse entre registros adelante y atras me parece que se deberia limpiar el codigo.
Saludos