Цитата:
Но проблема в том что после того как выполняется запрос, БД фильтруется и остается только запись с "Искомым"
|
это потому что у тебя всё происходит в одном адоквери,
я же написал как сделай.
1) Добавь на форму второй AdoQuery2
2) Дальше твой код будет примерно таким,
Код:
var tmp_id:Integer;
ADOquery2.SQL.Text:='SELECT * from Патент where [Информация о прототипе] LIKE "%' + Edit1.Text + '%"';
Adoquery2.Open;
Adoquery2.RecordSet.MoveFirst;
if (not Adoquery2.BOF)or(not Adoquery2.EOF)
then
begin
tmp_id:=Integer(AdoQuery2,Recordset.Fields[0].Value); //Здесь подразумевается что у тебя в первой колонке таблицы Патент стоит уникальный код.
DBGrid1.DataSource.DataSet.Locate('ИД', tmp_id, []);
end
else ShowMessage('Что то не нахожу');
Adoquery2.Close;
зы кто вообще учил русские таблицы и идентификаторы задавать)