Использование Delphi для создания приложений баз данных. Устюгова В.Н. - 26 стр.

                                    Свойство Filter позволяет задать критерий
                               фильтрации. В этом случае набор данных будет
                               отфильтрован, как только его свойство Filtered станет
                               равным True. Синтаксис описания критерия похож на
                               синтаксис секции WHERE SQL-запpocа с тем
                               исключением, что имена переменных программы
                               указывать нельзя, можно указывать имена полей и
                               литералы (явно заданные значения); можно использовать
                               обычные операции отношения и логические операторы
                               AND, NOT и OR, например:


      ([Doljnost] = 'профессор') AND ([TabNum] > 6001)
     Строку критерия фильтрации можно ввести во время выполнения программы или на
этапе конструирования формы.

     Пусть на форме находятся компоненты Table2 (TTable), Edit2 (TEdit), CheckBox2
(TCheckBox) и другие для визуализации набора данных.
     Обработчик события OnChecked компонента CheckBox1 позволяет установить
критерий фильтрации для набора данных Table2, считывая значения для фильтра из поля
редактирования:
     procedure TForm1.CheckBox2Click(Sender: TObject);
     begin
     Table2.Filter := Edit2.Text;
     Table2.Filtered := CheckBox2.Checked;
     end;

    Если в наборе данных имеются поля Doljnost (должность) и TabNum (табельный
номер) и в поле Edit2 во время выполнения программы ввести строку
    ([Doljnost] = 'профессор') AND ([TabNum] > 6001)
    Тогда набор данных будет отфильтрован, если поставить галочку в компоненте
CheckBox2.

С помощью свойства
type TFilterOption = (foCaseInsensitive, foNoPartialCompare);
property FilterOptions: TFilterOptions;
программист может определить дополнительные условия фильтрации строковых полей:
foCaseInsensitive - фильтрация производится без учета разницы в высоте букв;
foNoPartialCompare - поиск производится на точное соответствие.


      1. . Используя таблицы из базы данных DBDEMOS создать приложение, в котором
создать пример фильтрации записей с помощью Свойства Filter.

                              Событие OnFilterRecord возникает при установке
                              значения True в свойство Filtered. Обработчик события
                              имеет два параметра: имя фильтруемого набора данных и
                              переменную Accept, в которую программа должна
                              поместить True, если текущая запись удовлетворяет
                              критерию фильтрации.




                                        26