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

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

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 21.05.2014, 15:57   #1
naimano
 
Регистрация: 21.05.2014
Сообщений: 5
По умолчанию Combobox

Здравствуйте! Помогите пожалуйста! создал Combobox ввел все данные, хочу чтобы кого выбирают из списка combobox, например "Авто" отображалось таблица для авто. А когда выбираешь другое например "автобус" выходил таблица для автобуса, а для авто убиралось.
if combobox1.ItemIndex=1 then
DBGrid2.Hide;
DBGrid1.Show;
if combobox1.ItemIndex=3 then
DBGrid1.hide;
DBGrid2.Show;
так только показывает последний код ItemIndex=3
naimano вне форума Ответить с цитированием
Старый 21.05.2014, 15:59   #2
Dark_Spirit
Форумчанин
 
Аватар для Dark_Spirit
 
Регистрация: 05.02.2009
Сообщений: 324
По умолчанию

Цитата:
Сообщение от naimano Посмотреть сообщение
Здравствуйте! Помогите пожалуйста! создал Combobox ввел все данные, хочу чтобы кого выбирают из списка combobox, например "Авто" отображалось таблица для авто. А когда выбираешь другое например "автобус" выходил таблица для автобуса, а для авто убиралось.
if combobox1.ItemIndex=1 then
DBGrid2.Hide;
DBGrid1.Show;
if combobox1.ItemIndex=3 then
DBGrid1.hide;
DBGrid2.Show;
так только показывает последний код ItemIndex=3
тут тебе нужно не гриды прятать и отображать, а данные фильтровать, ну или выбирать
Тяжело быть бестолковым.....
Dark_Spirit вне форума Ответить с цитированием
Старый 21.05.2014, 16:39   #3
Dush
Форумчанин
 
Регистрация: 29.09.2011
Сообщений: 116
По умолчанию

Ну ежели нужно показывать\прятать именно таблицы - попробуйте заключать операторы в begin ... end; например:
Код:
if combobox1.ItemIndex=1 then
begin 
DBGrid2.Hide;
DBGrid1.Show;
end;
хотя ответ от Dark_Spirit более правильный
Dush вне форума Ответить с цитированием
Старый 21.05.2014, 17:18   #4
naimano
 
Регистрация: 21.05.2014
Сообщений: 5
По умолчанию

Цитата:
Сообщение от Dush Посмотреть сообщение
Ну ежели нужно показывать\прятать именно таблицы - попробуйте заключать операторы в begin ... end; например:
Код:
if combobox1.ItemIndex=1 then
begin 
DBGrid2.Hide;
DBGrid1.Show;
end;
хотя ответ от Dark_Spirit более правильный
я так и сделал,прочитайте по внимательнее первое сообщение)))
только отображаеться код что последний, вверхние dbgrid не отображаюстся
naimano вне форума Ответить с цитированием
Старый 21.05.2014, 18:23   #5
ksvsvk
Пользователь
 
Регистрация: 10.06.2013
Сообщений: 25
По умолчанию

Методы Show у тебя вызываются независимо от условий. Если Grid-ы перекрывают друг друга, то видим будет только последний.
ksvsvk вне форума Ответить с цитированием
Старый 21.05.2014, 18:30   #6
naimano
 
Регистрация: 21.05.2014
Сообщений: 5
По умолчанию

Цитата:
Сообщение от ksvsvk Посмотреть сообщение
Методы Show у тебя вызываются независимо от условий. Если Grid-ы перекрывают друг друга, то видим будет только последний.
что теперь делать? подскажи другой выход. Если сможешь то пример код скинь.
naimano вне форума Ответить с цитированием
Старый 21.05.2014, 19:59   #7
naimano
 
Регистрация: 21.05.2014
Сообщений: 5
По умолчанию

Помогите Срочно!!! Пожалуйста! Код!
naimano вне форума Ответить с цитированием
Старый 22.05.2014, 08:09   #8
Toxa
Форумчанин Подтвердите свой е-майл
 
Аватар для Toxa
 
Регистрация: 01.12.2006
Сообщений: 514
По умолчанию

Dush написал же

Код:
if combobox1.ItemIndex=1 then
BEGIN
DBGrid2.Hide;
DBGrid1.Show;
END;
if combobox1.ItemIndex=3 then
BEGIN
DBGrid1.hide;
DBGrid2.Show;
END;
Пишу на Delphi за еду
Toxa вне форума Ответить с цитированием
Старый 22.05.2014, 14:28   #9
naimano
 
Регистрация: 21.05.2014
Сообщений: 5
По умолчанию

[QUOTE=Toxa;1379324]Dush написал же

Код:
if combobox1.ItemIndex=1 then
BEGIN
DBGrid2.Hide;
DBGrid1.Show;
END;
if combobox1.ItemIndex=3 then
BEGIN
DBGrid1.hide;
DBGrid2.Show;
END;
[/QUOTE
Рахмет!!! все работает!)) все теперь понял))) еще раз спасибо!
naimano вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
ComboBox Yusha Общие вопросы Delphi 33 24.12.2011 23:03
Webbrowser и combobox: сделать чтобы в combobox-е оставалась история посещенных сайтов uasya2 Общие вопросы Delphi 6 06.03.2011 20:24
Combobox -> DBGrid -> Combobox... EXTREEM БД в Delphi 2 20.12.2010 18:19
Разделение ComboBox на 3 ComboBox-a artemavd Общие вопросы Delphi 1 21.07.2010 08:02
Не могу внести строку из combobox в combobox!? tacer Помощь студентам 1 30.11.2007 19:45