Дельфи...Фильтрация

[ne4eHUce]

Гляньте пожалуйста что нетак?
БД подключено, фильтрация вроде срабатывает но тупо ничего не показывает,просто пусто...Только на маркер -Все кинотеатры жмешь показывает все...А по отдельности ни работает ни разу...
procedure TForm2.RadioGroup2Click(Sender: TObject);
begin
ADOTable1.Filtered :=not(RadioGroup2.ItemIndex=3);
case RadioGroup2.ItemIndex of
0:ADOTable1.Filter:='Nazv_kinoteatr a="Кристалл"';
1:ADOTable1.Filter:='Nazv_kinoteatr a="Экран"';
2:ADOTable1.Filter:='Nazv_kinoteatr a="Октябрь"';
end;

[ReDFighter]

ADOTable1.Filtered :=false;
ADOTable1.Filter:='Nazv_kinoteatr a="Кристалл"';
ADOTable1.Filter:='Nazv_kinoteatr a="Экран"';
ADOTable1.Filter:='Nazv_kinoteatr a="Октябрь"';

ADOTable1.Filtered :=true;

а так не проще?

[ne4eHUce]

Все равно ничего не отображается...

[ReDFighter]

Сообщение от ne4eHUce

Все равно ничего не отображается...

ADOTable1.Filtered :=false;
ADOTable1.Filter:='Nazv_kinoteatr a="Кристалл"';
ADOTable1.Filter:='Nazv_kinoteatr a="Экран"';
ADOTable1.Filter:='Nazv_kinoteatr a="Октябрь"';

ADOTable1.Filtered :=true;

а пробелы пробовал убирать?
Nazv_kinoteatr a

Nazv_kinoteatra

[Sparkman]

Сообщение от ne4eHUce

Гляньте пожалуйста что нетак?
БД подключено, фильтрация вроде срабатывает но тупо ничего не показывает,просто пусто...Только на маркер -Все кинотеатры жмешь показывает все...А по отдельности ни работает ни разу...
procedure TForm2.RadioGroup2Click(Sender: TObject);
begin
ADOTable1.Filtered :=not(RadioGroup2.ItemIndex=3);
case RadioGroup2.ItemIndex of
0:ADOTable1.Filter:='Nazv_kinoteatr a="Кристалл"';
1:ADOTable1.Filter:='Nazv_kinoteatr a="Экран"';
2:ADOTable1.Filter:='Nazv_kinoteatr a="Октябрь"';
end;

procedure TForm2.RadioGroup2Click(Sender: TObject);
begin
ADOTable1.Filtered :=false; //тут у вас ошибка
case RadioGroup2.ItemIndex of
0:ADOTable1.Filter:='Nazv_kinoteatra="Кристалл"';
1:ADOTable1.Filter:='Nazv_kinoteatra="Экран"';
2:ADOTable1.Filter:='Nazv_kinoteatra="Октябрь"';
ADOTable1.Filtered :=true;
end;

[ne4eHUce]

Прога запускается.У меня стоит таблица полностью заполненная , три кинотеатра
Но когда фильтровать по кинотеатру начинаешь тупо все исчезает...Отображается только на все кинотеатры...
В чем может быть проблема?

[SERG1980]

Если не трудно выложите ваш проект или файл БД

[OlegVE]

Здравствуйте
Вы пробовали, например здесь

0:ADOTable1.Filter:='Nazv_kinoteatra="Кристалл"';

поставить не двойные кавычки, а две одинарные.

0:ADOTable1.Filter:='Nazv_kinoteatra=''Кристалл''';

или так

ADOTable1.Filter:='Nazv_kinoteatra='+QuotedStr('Кристалл');

До свидания

[ne4eHUce]

Спасибо большое все заработало!!!