Problemas buscando registro con Fibplus

[voxi]

Wenasss, estoy intentando buscar un registro con Fibplus en una base de datos Firebird, lo he intentado con SQL y con Locate, la busqueda la hago en un page en el cual tengo varios dbedits y varios botones, last, prior, next etc.

Con SQL uso este código:

FPuntvenda.Fdataartic1.SelectSQL.Clear;
FPuntvenda.Fdataartic1.SelectSQL.Add('SELECT * FROM ARTICLES WHERE CODIC ='+ cod);
FPuntvenda.Fdataartic1.AutoUpdateOptions.UpdateTableName := 'ARTICLES';
FPuntvenda.Fdataartic1.Open;

me lo hace perfecto pero despues la base de datos se me queda solo con este registro y yo solo quiero que lo busque no que me filtre la base de datos.

con locate uso este codigo:

if FPuntvenda.Fdataartic.LocatePrior('CODIC',cod,[loCaseInsensitive, loPartialKey])then
else
Application.MessageBox('No se encuentra'),
'Informaciò', MB_OK + MB_ICONINFORMATION);

tambien me lo hace bien,pero solo la primera vez¡¡ despues ya no hace nada, y no se porque, en fin os agradeceria vuestra opinion, muchas gracias a todos.