Фильтр ячеек таблицы Delphi -

[trigger]

Есть база в Paradox
Есть форма в Delphi
В форме прописаны фильтрации - через if CheckBox2.Checked=true then
т.е.

к примеру нужно нам отсортировать студентов группы или по определенному номеру билета отфильтровать студентов - включаем чек бокс

-
В чем сложность - нужно отсортировать студентов , родившихся в январе и декабре
if CheckBox1.Checked=true then
Accept:=monthOf(StudTable.FieldValu es['DR'])=12; такая конструкция только один месяц дает сортировать ...
Встал ...
Спасибо за любую помощь
Все исходники приложены

[vovk]

Тут половину условий можно перенести в FILTER для ускорения фильтрации, с вычислениями месяца кажется в фильтре не получится поэтому оставить в обработчике onfilterrecord, только немного изменить. Как пример 1 и 12 месяц

if CheckBox1.Checked=true then
 Accept:=(monthOf(StudTable.FieldValues['DR']) in [1,12]);

воличество месяцев конечное, и заранее известно, так что вообще лучше сделать выбор из 12 месяцев тех которые нужны.
остальное перенести в фильтр прочитайте про фильтр там не сложно. Вот из хелпа

Свойства, обеспечивающие фильтрацию набора данных
Класс TDataSet

Определения
property Filter: string;
property Filtered: Boolean;

Описание
Фильтрация задается свойствами Filter, Filtered и FilterOptions.
При наличии фильтра доступными становятся только те записи, поля которых удовлетворяют условиям фильтрации. Свойство Filtered включает или выключает использование фильтра. Свойство FilterOptions задает опции фильтрации. А сам фильтр записывается в свойство Filter в виде строки, содержащей определенные ограничения на значения полей. Например, значение Filter

Dep='Цех 1'

при Filtered = true, обеспечивает отображение только тех записей, в которых поле Dep имеет значение "Цех 1". В условиях сравнения строк можно использовать символ звездочки "*", который как в обычных шаблонах означает: "любое количество любых символов". Например, фильтр

Dep='Цех*'

приведет к отображению всех записей, в которых значение поля Dep начинается с "Цех". Но для того, чтобы это сработало, надо, чтобы в опциях, содержащихся в свойстве FilterOptions, была выключена опция foNoPartialCompare, запрещающая частичное совпадение при сравнении.

При записи условий можно использовать операции отношения =, >, >=, <, <=, <>, а также логические операции and, or и not. Например, вы можете написать фильтр

(Dep='Цех 1')and(Year_b<=1970)and(Year_b>=194 0)

и отобразятся записи сотрудников цеха 1, чей год рождения лежит в заданных пределах. Но использовать в фильтре имена вычисляемых полей не разрешается.

При фильтрации пустые записи пропускаются, если только их появление не указано в фильтре явным образом, как в следующем примере:

Dep='Цех*' or Dep = NULL

Фильтрация на удаленных таблицах SQL и в клиентских наборах данных поддерживает сравнение полей. Например:

Field1 > Field2

Эта операция не поддерживается в локальных таблицах (Paradox, dBASE, Access, FoxPro).

потом разберитесь с включением-выключением фильтрации, скорее всего придётся перенести включение выключение в 1 обработчик, где проверять состояние всех чекбоксов.

[trigger]

Спасибо !!!