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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 20.03.2009, 13:35   #1
KARUSHEV
Форумчанин
 
Аватар для KARUSHEV
 
Регистрация: 11.01.2009
Сообщений: 102
Вопрос Подскажите с RadioGroup

Всем доброго дня!

Подскажите пожалуйста, с таким вопросом. Мне на одной форме нужно создать две независимые RadioGroup's, в каждой по две Radio кнопки (чтобы в одной группе я мог выбрать одну кнопку и в другой одну), если просто создавать выбирается только одна.

И еще маленький вопрос: в этой же форме, есть три поля Edit, подскажите как можно сделать, чтобы при вводе в первое поле (число), если нажата первая RadioButton1, во втором поле отображалось число первого поля + 5, если нажата вторая RadioButton2, во втором поле отображалось число первого поля + 10. При нажатии Enter в поле Edit1 (после ввода числа) курсор будет переходить к Edit3.

Заранее спасибо!
KARUSHEV вне форума Ответить с цитированием
Старый 20.03.2009, 13:50   #2
XuTpbIu
Злобстер
Форумчанин
 
Аватар для XuTpbIu
 
Регистрация: 19.03.2009
Сообщений: 134
По умолчанию

Тебе надо создать их динамически что ли?
Что-то непонятен смысл вопроса.
Хотя кажется догадался ты ставишь радиогруппы, но на них СВЕРХУ ставишь радиокнопки? Если да, то не так делай. Ставишь радиогруппу и меняешь у неё свойство Items - радиокнопки добавятся сами.
По поводу второй части:
Тут всё просто. Надо только обрабатывать метод OnKeyDown, и анализировать параметр Key(клавиша, которая была нажата). Ну и соответственно делать то, что указано.
От знаний ещё никто не умирал, но рисковать не стоит.
XuTpbIu вне форума Ответить с цитированием
Старый 20.03.2009, 13:56   #3
KARUSHEV
Форумчанин
 
Аватар для KARUSHEV
 
Регистрация: 11.01.2009
Сообщений: 102
По умолчанию

по первой части: можно ли создать две RadioGroup на одной форме? Насчет динамически или нет - не знаю, я только учусь.

А по второй части можно подробнее?

Выложил исходник, если кто может подправьте, пожалуйста
Вложения
Тип файла: rar 0.rar (175.9 Кб, 14 просмотров)

Последний раз редактировалось Stilet; 20.03.2009 в 14:28.
KARUSHEV вне форума Ответить с цитированием
Старый 20.03.2009, 14:07   #4
XuTpbIu
Злобстер
Форумчанин
 
Аватар для XuTpbIu
 
Регистрация: 19.03.2009
Сообщений: 134
По умолчанию

Да конечно можно. У тебя сверху есть же панель инсрументов. Берёшь ставишь одну, а потом снова выбираешь радиогруппу и ставишь вторую.

По второй части я ошибся надо прописать метод OnKeyUp:
Код:
  If Key = 13 then
  	Edit3.SetFocus
  else
  begin
    If RadioGroup1.ItemIndex > 0 then
	    Edit2.Text := IntToStr(StrToInt(Edit1.Text) + 10)
    else
	    Edit2.Text := IntToStr(StrToInt(Edit1.Text) + 5);
  end;
З.Ы. Не забудь вначале у радиогруппы выставить поле ItemIndex в значение 0.
От знаний ещё никто не умирал, но рисковать не стоит.
XuTpbIu вне форума Ответить с цитированием
Старый 20.03.2009, 14:11   #5
KARUSHEV
Форумчанин
 
Аватар для KARUSHEV
 
Регистрация: 11.01.2009
Сообщений: 102
По умолчанию

Берёшь ставишь одну, а потом снова выбираешь радиогруппу и ставишь вторую.

В таком случае они у меня работают вместе, я не могу выбрать в двух группах сразу по одной кнопке.
KARUSHEV вне форума Ответить с цитированием
Старый 20.03.2009, 14:16   #6
XuTpbIu
Злобстер
Форумчанин
 
Аватар для XuTpbIu
 
Регистрация: 19.03.2009
Сообщений: 134
По умолчанию

Ты уверен, что ставишь ИМЕННО радиогруппу, а не радиокнопку?
А вообще скажи мыло я тебе прогу вышлю
От знаний ещё никто не умирал, но рисковать не стоит.
XuTpbIu вне форума Ответить с цитированием
Старый 20.03.2009, 14:19   #7
KARUSHEV
Форумчанин
 
Аватар для KARUSHEV
 
Регистрация: 11.01.2009
Сообщений: 102
По умолчанию

я выложил прогу посмотри мою, мыло: crush_17@mail.ru, но в принципе можно прямо здесь на форуме выкладывать файлы

по твоему коду все работает, только если пользователь при ошибочном вводе в Edit1 захочет стереть число, вылетает ошибка

Последний раз редактировалось KARUSHEV; 20.03.2009 в 14:27.
KARUSHEV вне форума Ответить с цитированием
Старый 20.03.2009, 14:27   #8
XuTpbIu
Злобстер
Форумчанин
 
Аватар для XuTpbIu
 
Регистрация: 19.03.2009
Сообщений: 134
По умолчанию

Лови:
Prj.rar
От знаний ещё никто не умирал, но рисковать не стоит.
XuTpbIu вне форума Ответить с цитированием
Старый 20.03.2009, 14:31   #9
KARUSHEV
Форумчанин
 
Аватар для KARUSHEV
 
Регистрация: 11.01.2009
Сообщений: 102
По умолчанию

расскажи как сделал две группы отдельно работающие, почему у меня работают вместе?
KARUSHEV вне форума Ответить с цитированием
Старый 20.03.2009, 14:36   #10
XuTpbIu
Злобстер
Форумчанин
 
Аватар для XuTpbIu
 
Регистрация: 19.03.2009
Сообщений: 134
По умолчанию

1) Навёл мышкой на панель инстументов и нашёл именно RADIOGROUP
2) Нажал на неё.
3) Нажал кнопкой на форме. Вуаля! Появилась первая радиогруппа.
4) Нашёл в Object Inspector свойство Items. Написал 2 строки(1 и 2)
5) Нажал Ок.
6) Свойство ItemIndex у радлиогруппы поставил в значение 0(При -1 - ничего не выбрано, при 0 - выбран первый пункт, при 1 - выбран 2 пункт и т.д.)
7) Выделил радиогруппу и нажал Ctrl+C. Нажал на форму и нажал Ctrl+V.
8)Появилась точно такая же и вторая радиогруппа. Только поле Name в свойствах в ObjectIspector у неё равно RadioGroup2

Вот и всё. Думаю подробнее уже сказать не могу
От знаний ещё никто не умирал, но рисковать не стоит.
XuTpbIu вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вопрос о RadioGroup Tomoyo Общие вопросы Delphi 4 17.03.2009 19:33
StringGrid и RadioGroup ARXangel Общие вопросы Delphi 4 11.02.2009 10:06
Radiogroup & radiobutton KlErik Компоненты Delphi 1 14.05.2007 09:35
RadioGroup в Delphi 2005 Nez Компоненты Delphi 7 15.02.2007 19:16