При запуске формы показывает отфильтрованные записи БД Access в табллице DBGrid

[lun-wadim]

Здравствуйте. Кто знает, как писать код. При запуске формы в таблице DBGrid отображались отфильтрованные записи БД Access. Не хочу создать и пользоваться кнопками "Фильтровать".

[Sciv]

В таблице (или запросе), к которой привязан ДБГрид через датасорс, есть свойство filtered as boolean и поле filter, куда условие фильтрации надо вводить.

А можно просто SQL-запросом все делать.

[Pilyla]

1. можно сразу написать запрос в свойство sql компонента query или table, active=true;( на примере query )
2. можно прописать в Formcreate
query.SQL.Add('select * from table..........') ;
query.Active:=true;
3. установить в query свойство filtered-true,filter- условие фильтрации
4. можно прописать в Formcreate
query.filtered:=true;
query.filter:='pole=5';
................

[lun-wadim]

не удается запустить.

[Sciv]

Странный какой-то у Вас KeyValue в DBLookupComboBox на строчку выше выделенной... По-вашему, что это за свойство?

[lun-wadim]

Если в procedure TForm1.FormCreate(Sender: TObject) поставить Form1.DBLookupComboBox1.KeyValue:=' <по всем отделениям>', то при запуске формы в DBLookupComboBox1 отображаетя '<по всем отделениям>'.
На первом рисунке при запуске формы в поле DBLookupComboBox1 "Отдел" отображается "<по всем отделениям>", при этом не происходит фильтрация в DBGrid1. А на втором рисунке при раскрытии списка DBLookupComboBox1 щелкнуть на "<по всем отделениям>", происходит фильтрация в DBGrid1.