[Red_Garry]

Здравствуйте!
Как будет выглядеть код поиска необходимой строки по какому-то критерию и затем установку указателя на предыдущую строку. Т.е. найти строку, в которой <поле1>=критерий и <поле2>=критерий, и установить указатель на предыдущую строку

[Red_Garry]

Может какой-то более лучший способ есть? Надо найти запись по критериям и установить указатель на предыдущую запись

[poli-smen]

Сообщение от Red_Garry

Здравствуйте!
Как будет выглядеть код поиска необходимой строки по какому-то критерию и затем установку указателя на предыдущую строку. Т.е. найти строку, в которой <поле1>=критерий и <поле2>=критерий, и установить указатель на предыдущую строку

Код:

begin
  if ADOTable1.Locate('поле1;поле2', VarArrayOf(['критерий1', 'критерий2']), []) then
  begin
    ADOTable1.Prior;
  end else
  begin
    ShowMessage('Не найдено');
  end;
end;

[Red_Garry]

Спасибо большое! Пробую применять

[Red_Garry]

что-то ADOTable.prior не компилится

[poli-smen]

Сообщение от Red_Garry

что-то ADOTable.prior не компилится

Значит что-то не так делаешь.

[Red_Garry]

Когда после ADOTable ставлю точку в списке, который вываливается, отсутствует prior. У меня Delphi 7

[NumLock]

Сообщение от Red_Garry

У меня Delphi 7

у меня тоже, но Prior есть.

[Red_Garry]

Всё! Нашёл! Это я лоханулся. Спасибо, всё работает