Ubicar registro con Interbase

[eyscom]

Para localizadar un registro usando un IBTable o un Query
IBT_Clase.Close;
IBT_Clase.SelectSql.Text:='SELECT * FROM TABLA1 WHERE
CAMPO_TABLA =:CAMPO';
IBT_Clase.ParamByName('CAMPO').AsString:='Juan';
IBT_Clase.Open;
If IBT_Clase.eof then
begin
'No lo encontro';
end
else
begin
'Encontro';
end;