Разработка приложений баз данных в Delphi. Шейкер Т.Д. - 52 стр.

     GotoKey – выполнение поиска;
     GotoNearest – выполнение поиска при частичном совпадении;
     FindKey – задание критерия и выполнение поиска;
     FindNearest – задание критерия и выполнение поиска при частичном
совпадении.
     Последовательность действий при организации поиска:
     − задать индекс через свойство IndexName или IndexFieldName;
     − перейти в режим поиска методом SetKey;
     − задать искомое значение поля;
     − выполнить поиск методом GotoKey     или GotoNearest.

     Аналогичный результат даёт использование методов FindKey и
FindNearest, но применение этих методов позволяет сократить запись. Про-
цедуры FindKey и FindNearest принимают в качестве параметра искомые
значения индексных полей.
     В простейшем варианте обработчик события для кнопки Button1, задаю-
щей поиск по полю CustNo выглядит так:
procedure TForm1.Button1Click(Sender: TObject);
begin
 Table1.SetKey;//Перевод Table1 в режим поиска.
 Table1.FieldByName(’CustNo’).AsString:=Edit1.Text;//Критерий
 Table1.GotoKey; //Выполнение поиска
end;
     Если поиск выполняется не по первичному индексу, то необходимо в
свойстве IndexName определить имя индекса, который будет использоваться.
Например, если таблица customer имеет вторичный индекс по полю City, то
надо в свойстве IndexName указать имя индекса.
Table1.IndexName:=’CityIndex’;
Table1.Active :=True;
Table1.SetKey;
Table1.FieldByName(’City’).AsString:=Edit1.Text;
Table1.GotoKey;
     Поиск не будет выполняться, если не назначить правильно индекс. Сле-
дует обратить внимание на то, что IndexName – это свойство TTable, его нет в

                                     52