Помогите с фильтрацией. Есть 2 таблицы книги и разделы ADODataSet DataSourse база в Access таблица разделы главная связь один ко многим, то есть 1 раздел несколько книг, делаю фильтрацию через ComboBox таким способом
Код:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | procedure TForm3 . FormCreate(Sender: TObject);
var
i: integer ;
begin
for i:= 0 to DataModule2 . RazDS . RecordCount- 1 do
begin
Combobox1 . Items . Add( DataModule2 . RazDS . FieldByName( 'Раздел' ).AsString);
end ;
end ;
procedure TForm3 . ComboBox1Change(Sender: TObject);
begin
DataModule2 . RazDS . filter:= 'Раздел = ' +QuotedStr(Combobox1 . text);
DataModule2 . RazDS . Filtered := true ;
end ;
|
подскажите как сделать кнопку или строку в комбобоксе "показать все" при нажатии которой отображались все записи подчиненной таблицы Книги, другими словами что бы связь пропадала