Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Базы данных и репортинг > Поиск "Найти далее" в БД без sql

Автор: PapaKarlo 4.11.2014, 09:10

Здравствуйте!

Имеется: ttable, dbgrid, dataset.

Нужно организовать поиск без sql (нельзя использовать tquery).

Locate ищет только первую запись. FinNearest тоже.

Как сделать, чтобы при клике на кнопку перескакивал на следующую похожую запись? Фильтрацию использовать тоже нельзя. Нужно чтобы был именно поиск.

Заранее спасибо!

Автор: phomm 4.11.2014, 21:00

Перебор.

Код


DS.First;
while not DS.Eof do
begin
  if DS.FieldByName('...').Value = ... then
    // нашли
  DS.Next;
end;

Автор: Данкинг 4.11.2014, 21:01

Зачем такое условие? Можно в цикле перебрать записи таблицы, отбирая нужные значения в какой-нибудь список.