Delphi->SQL<-access(error si no hay datos)

[Hades-Plutón]

¡Hola a todos! Soy nuevo en el club, y después de echar una ojeada puedo decir que me gusta un montón, Felicidades a todos.

Ahora la pregunta: Estoy aprendiendo a hacer programas en delphi que ataquen bases de datos access. He creado una consulta que funciona sólo si devuelve resultados, si no encuentra nada en la base de datos lanza un error al activar otra consulta:

Proyect p rais exception class EOleException with message 'El valor de bof o EOF es True, o el actual registro se eliminó; la operación solicitada requiere un registro actual'. Process stopped

el código del botón que realiza la consulta es simple:

Código Delphi [-]
      Consulta.Close;
      Consulta.SQL.Clear;
      Consulta.SQL.Text:=
      'SELECT * FROM TablaLibro WHERE Título LIKE '+QuotedStr( Ebusqueda.Text );
      flistado.Consulta.OPEN

Para realizar la conexión tengo: tAdoConnection, tDataSource, tAdoQuery y TdbGrid

Gracias.