![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Регистрация: 13.12.2009
Сообщений: 7
|
![]()
Добрый день, уважаемые программисты.
У меня такая проблема. Я делаю тест. Вопрос написан в заголовке GroupBox а варианты ответа в виде 5 radioButton. Пока пользователь не выбрал какой-либо вариант ответа, кнопке далее стоит св-во невидима. (Это условие заказчика). Вопрос: как сделать, чтобы при выборе ответа кнопка снова появлялась? А точнее на выполнение чего расположить процедуру появления кнопки. Я понимаю, что можно создать ее на каждую RadioButton, но это как-т не кошерно. У меня есть предположение что надо использовать св-ва овнер и парент, но опять же я не знаю куда запихнуть такую процедуру. Жду ваших предложений, заранее спасибо! Последний раз редактировалось Nesta23; 22.05.2011 в 16:51. |
![]() |
![]() |
![]() |
#2 |
Форумчанин
Регистрация: 06.06.2007
Сообщений: 282
|
![]()
В событие RadioButton1Click первого RadioButton'a пишем: Button1.Visible := true;
И это событие присваиваем всем RadioButton'ам
Не важно, как часто вы падаете. Важно, как часто вы поднимаетесь. Винс Ломбарди.
|
![]() |
![]() |
![]() |
#3 |
Форумчанин
Регистрация: 08.10.2010
Сообщений: 101
|
![]()
В событии OnEnter компонента GroupBox делаете кнопку видимой. Только если по умолчанию Checked какой-то RadioButton установлен в True, то кнопка будет видна сразу.
"Думаешь, будет трудно? Конечно, будет! Но, только закаляя дух, людьми становятся люди!"
|
![]() |
![]() |
![]() |
#4 |
Регистрация: 13.12.2009
Сообщений: 7
|
![]() |
![]() |
![]() |
![]() |
#5 | |
Регистрация: 13.12.2009
Сообщений: 7
|
![]() Цитата:
procedure TForm1.GroupBox1Enter(Sender: TObject); begin If (RadioButton1.Checked =true) or (RadioButton2.Checked =true) or (RadioButton3.Checked =true) or (RadioButton4.Checked =true) or(RadioButton5.Checked =true) then button1.Visible := true; end; Не работает. |
|
![]() |
![]() |
![]() |
#6 |
Форумчанин
Регистрация: 25.04.2010
Сообщений: 881
|
![]()
хз может условие не выполняетса? скиньте проект посмотрим..
|
![]() |
![]() |
![]() |
#7 |
220400
Форумчанин
Регистрация: 21.05.2010
Сообщений: 726
|
![]()
на событие нажатия каждого радибатона (их же у вас всего 5), дальше уже идут извращения, например, создайте параллельный процесс (поток), который будет через некоторый промежуток времени отслеживать состояния радиобатонов.
Cерьёзной помощи не ждите - помогаю в перерывах на "перекур".
Не существует ничего невозможного для человека, который не собирается ничего делать сам. Не учите человека, если вы не его учитель. |
![]() |
![]() |
![]() |
#8 |
Форумчанин
Регистрация: 08.10.2010
Сообщений: 101
|
![]() Код:
Хотя тут можно заставить кнопку появиться, если кликнуть левой над RadioButton и не отпуская кнопку мыши увести курсор в сторону. При этом Checked не становится True, а кнопка появляется. Так что больше ничего не могу посоветовать кроме того, что уже написано в предыдущем посте.
"Думаешь, будет трудно? Конечно, будет! Но, только закаляя дух, людьми становятся люди!"
Последний раз редактировалось A-IX-2; 23.05.2011 в 08:56. |
![]() |
![]() |
![]() |
#9 |
Форумчанин
Регистрация: 06.06.2007
Сообщений: 282
|
![]()
На мой взгляд, это самый оптимальный вариант. И, как заметил товарищ Sparkman: "...дальше уже идут извращения...".
Не важно, как часто вы падаете. Важно, как часто вы поднимаетесь. Винс Ломбарди.
|
![]() |
![]() |
![]() |
#10 |
220400
Форумчанин
Регистрация: 21.05.2010
Сообщений: 726
|
![]()
Если использовать RadioGroup:
Код:
Cерьёзной помощи не ждите - помогаю в перерывах на "перекур".
Не существует ничего невозможного для человека, который не собирается ничего делать сам. Не учите человека, если вы не его учитель. |
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как получит номер RadioButton выбраного в GroupBox | sergey113 | Помощь студентам | 0 | 24.03.2011 17:37 |
Правильно определить знак перед строкой и в зависимости от этого выставить checked свойство | Человек_Борща | Общие вопросы Delphi | 9 | 18.02.2011 01:11 |
Ranged checked error | agarum | Общие вопросы Delphi | 6 | 19.09.2010 23:34 |
CheckListBox checked iz zarosa | marisham0612 | Общие вопросы Delphi | 1 | 18.12.2009 00:56 |
[VC#] DataGridView - DataGridViewCheckBoxColumn - Checked | MuForum | Общие вопросы .NET | 0 | 07.06.2008 00:57 |