Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 11.04.2011, 23:35   #1
ne4eHUce
Пользователь
 
Регистрация: 10.04.2011
Сообщений: 24
По умолчанию Дельфи... Фильтрация

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


___________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)
Не забывайте об этом!
Модератор.

Последний раз редактировалось Serge_Bliznykov; 12.04.2011 в 09:05.
ne4eHUce вне форума Ответить с цитированием
Старый 12.04.2011, 08:25   #2
SERG1980
Участник клуба
 
Аватар для SERG1980
 
Регистрация: 28.03.2007
Сообщений: 1,814
По умолчанию

Код:
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="Октябрь"';
end;
ADOTable1.Filtered :=not(RadioGroup2.ItemIndex=3);
end;

Последний раз редактировалось SERG1980; 12.04.2011 в 08:37. Причина: код без тега "код"
SERG1980 вне форума Ответить с цитированием
Старый 12.04.2011, 12:36   #3
ne4eHUce
Пользователь
 
Регистрация: 10.04.2011
Сообщений: 24
По умолчанию

Прога запускается.У меня стоит таблица полностью заполненная , три кинотеатра
Но когда фильтровать по кинотеатру начинаешь тупо все исчезает...Отображается только на все кинотеатры...
В чем может быть проблема?
ne4eHUce вне форума Ответить с цитированием
Старый 12.04.2011, 13:02   #4
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

А если вместо
Код:
0:ADOTable1.Filter:='Nazv_kinoteatra="Кристалл"';
сделать
Код:
0:ADOTable1.Filter:='Nazv_kinoteatra=''Кристалл''';
ну и по остальным также
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 12.04.2011, 13:20   #5
ne4eHUce
Пользователь
 
Регистрация: 10.04.2011
Сообщений: 24
По умолчанию

Аватар списибо боьшущее. ты гений, все заработало.
два дня фильтрацию делал
ne4eHUce вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Фильтрация Rasl18 БД в Delphi 1 23.04.2010 23:18
Фильтрация Tvik БД в Delphi 21 10.03.2010 13:22
фильтрация ЦЕРЦЕЯ Microsoft Office Excel 2 19.11.2009 06:41
Фильтрация Screame Microsoft Office Excel 7 30.07.2009 13:49
Фильтрация Gorychev БД в Delphi 20 10.06.2008 23:30