usa sql, por ejemplo un ibdataset, en su propiedad selectsql pones la consulta, algo así:
Código SQL
[-]
ibdataset1.close;
ibdataset1.selectsql.text := 'select * from tbclientes where codigo= :quecodigo';
ibdataset1.ParamByName('codigo').asinteger:= inttostr(edit1.text);
ibdataset1.open