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

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

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 08.09.2009, 18:50   #1
JNLYSk
Пользователь
 
Регистрация: 08.09.2009
Сообщений: 12
Восклицание Работа с combobox (delphi)

Прошу помочь начинающему программисту! Мне для курсовой работы срочно нужна ваша помощь! Когда я создавал программу, я планировал, что выбирая значение из Combobox должен появляться отдельный фрем. К примеру: Значение из Combobox - Мама и при нажатии на кнопку ОК, должен открыться фрем с названием Мама, значение из Combobox - Пама и при нажатии на кнопку ОК, должен открыться фрем с названием Пама. Прошу не игнорировать, а помочь, а я в свою очередь поделюсь с Вами своими знаниями
JNLYSk вне форума Ответить с цитированием
Старый 08.09.2009, 18:59   #2
mMAg
Форумчанин
 
Аватар для mMAg
 
Регистрация: 11.08.2009
Сообщений: 433
По умолчанию

А в чем собственно проблема?
Дай посмотреть на код программы, или хотя бы на эту его часть.

Может достаточно просто считать значение поля Text и по его значению запустить тот или иной фрэйм?

Последний раз редактировалось mMAg; 08.09.2009 в 19:04.
mMAg вне форума Ответить с цитированием
Старый 08.09.2009, 19:16   #3
JNLYSk
Пользователь
 
Регистрация: 08.09.2009
Сообщений: 12
По умолчанию


Вот так примерно...
JNLYSk вне форума Ответить с цитированием
Старый 08.09.2009, 19:21   #4
mMAg
Форумчанин
 
Аватар для mMAg
 
Регистрация: 11.08.2009
Сообщений: 433
По умолчанию

1. А бмпшку нельзя было сжать?
2. Я код просил, а не рисунок. У меня воображение и так хорошо развито.
3. Достаточно просто считать значение поля Text и по его значению запустить тот или иной фрэйм
mMAg вне форума Ответить с цитированием
Старый 08.09.2009, 19:23   #5
JNLYSk
Пользователь
 
Регистрация: 08.09.2009
Сообщений: 12
По умолчанию

Прошу, пожалуйсто, напиши код, а?
JNLYSk вне форума Ответить с цитированием
Старый 08.09.2009, 19:25   #6
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

св-во ComboBox.Items содержит:
Цитата:
Мама
Папа
далее в событии бокса OnChange пишнм чтото типа такого:
Код:
case ComboBox1.ItemIndex of
 0:begin
     //выбрана Мама
    end;
 1:begin
     //выбран Папа
    end;
end;
естественно комменты заменить нужными действиями
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Старый 08.09.2009, 19:30   #7
mMAg
Форумчанин
 
Аватар для mMAg
 
Регистрация: 11.08.2009
Сообщений: 433
По умолчанию

Не, не. OnChange не нужно обрабатывать. Повесь на форму кнопку, кликни на нее 2 раза, затем пиши внутри что-то типа:

Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
  if ComboBox1.Text = ComboBox1.Items[0] then
  begin  //выбран папа
  end
  else
    if ComboBox1.Text = ComboBox1.Items[1] then
    begin
    //выбрана мама
    end
end;
PS: Ап

Последний раз редактировалось mMAg; 08.09.2009 в 19:34.
mMAg вне форума Ответить с цитированием
Старый 08.09.2009, 19:44   #8
JNLYSk
Пользователь
 
Регистрация: 08.09.2009
Сообщений: 12
По умолчанию

Спасибо товарищи, сейчас попробую!
JNLYSk вне форума Ответить с цитированием
Старый 08.09.2009, 19:50   #9
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

Цитата:
что выбирая значение из Combobox
mMAg, так что ИМХО, надо
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Старый 08.09.2009, 19:53   #10
JNLYSk
Пользователь
 
Регистрация: 08.09.2009
Сообщений: 12
По умолчанию

Парни, у меня трабла, не хочет запускаться, проверте плс:
Цитата:
procedure TForm1.Image4Click(Sender: TObject);
if ComboBox1.Text = ComboBox1.Items[0] then
begin
end
else
if ComboBox1.Text = ComboBox1.Items[1] then
begin
end
end;
Синтаксис норм? У меня там где IF, красится в красній цвет.
JNLYSk вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Delphi компонент ComboBox severin Общие вопросы Delphi 12 08.10.2010 20:19
ComboBox и работа с ним 54rus Помощь студентам 6 23.07.2009 15:40
работа с Combobox и Listbox TSilver Общие вопросы Delphi 7 18.06.2009 18:48
Работа с ComboBox Sanakan Помощь студентам 2 27.03.2009 19:16
работа с ComboBox netman БД в Delphi 2 15.05.2007 14:11