Модераторы: Snowy, MetalFan, bems, Poseidon

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Компонент RadioGroup 
:(
    Опции темы
Leliks
Дата 3.11.2007, 21:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 8
Регистрация: 3.11.2007

Репутация: нет
Всего: нет



Подскажите пожалуйста как имея две  RadioGroupы включать переключатели в одной групе и в другой? smile 
PM MAIL   Вверх
kemiisto
Дата 3.11.2007, 22:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Дикий Кот. =^.^=
****
Награды: 1



Профиль
Группа: Участник Клуба
Сообщений: 3292
Регистрация: 29.7.2007

Репутация: 2
Всего: 160



А поподробнее можно? Что значит 
Цитата
 включать переключатели в одной групе и в другой 
 ?


--------------------
PM MAIL WWW GTalk Jabber   Вверх
Leliks
Дата 3.11.2007, 22:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 8
Регистрация: 3.11.2007

Репутация: нет
Всего: нет



Есть две группы переключятелей включаю переключать в одной групе, а е сли включаю в другой то то в первой он  отключается.
PM MAIL   Вверх
ivan219
  Дата 3.11.2007, 22:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1121
Регистрация: 19.11.2005
Где: Планета земля

Репутация: 5
Всего: 12



Если правильно понял то:
Код

procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
 RadioGroup2.ItemIndex := -1;
end;

procedure TForm1.RadioGroup2Click(Sender: TObject);
begin
 RadioGroup1.ItemIndex := -1;
end;

PM MAIL ICQ   Вверх
Leliks
Дата 3.11.2007, 22:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 8
Регистрация: 3.11.2007

Репутация: нет
Всего: нет



Ivan219 Они должны включатся и в первой и во второй ,пробовл как ты написал они переключаются просто,мож я неправильно обЪясняю.
PM MAIL   Вверх
kemiisto
  Дата 3.11.2007, 22:47 (ссылка) |    (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Дикий Кот. =^.^=
****
Награды: 1



Профиль
Группа: Участник Клуба
Сообщений: 3292
Регистрация: 29.7.2007

Репутация: 2
Всего: 160



Ты хочешь, чтоб при выборе в какой-либо группе в другой выбиралься тот же по счету элемент ?

Тогда так:  
Код

procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
 RadioGroup2.ItemIndex := RadioGroup1.ItemIndex;
end;

procedure TForm1.RadioGroup2Click(Sender: TObject);
begin
 RadioGroup1.ItemIndex := RadioGroup2.ItemIndex;
end;


Уточни - чего конкретно желаешь !


--------------------
PM MAIL WWW GTalk Jabber   Вверх
Leliks
Дата 3.11.2007, 22:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 8
Регистрация: 3.11.2007

Репутация: нет
Всего: нет



Вот так должно быть

Присоединённый файл ( Кол-во скачиваний: 14 )
Присоединённый файл  __________.JPG 24,12 Kb
PM MAIL   Вверх
Leliks
Дата 3.11.2007, 22:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 8
Регистрация: 3.11.2007

Репутация: нет
Всего: нет



Нет чтоб я сам мог выбрать в одной к примеру 3 а в другой второй

Присоединённый файл ( Кол-во скачиваний: 10 )
Присоединённый файл  __________.JPG 24,12 Kb
PM MAIL   Вверх
kemiisto
Дата 3.11.2007, 22:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Дикий Кот. =^.^=
****
Награды: 1



Профиль
Группа: Участник Клуба
Сообщений: 3292
Регистрация: 29.7.2007

Репутация: 2
Всего: 160



А зачем это у тебя внутри RadioGroup находятся компоненты RadioButton?

У RadioGroups есть свойство Items, вот его то и надо использовать.


--------------------
PM MAIL WWW GTalk Jabber   Вверх
Alexeis
Дата 3.11.2007, 23:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 34
Всего: 459



Цитата(kemiisto @  3.11.2007,  22:59 Найти цитируемый пост)
А зачем это у тебя внутри RadioGroup находятся компоненты RadioButton?

  Скажу по секрету даже если итемы создавать при помощи свойства Items, то там создаются тоже объекты типа TRadioButton  smile , а по сути все верно, в RadioGroup не нужно кидать радиокнопки, их нужно создавать при помощи свойства Items.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
kemiisto
  Дата 3.11.2007, 23:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Дикий Кот. =^.^=
****
Награды: 1



Профиль
Группа: Участник Клуба
Сообщений: 3292
Регистрация: 29.7.2007

Репутация: 2
Всего: 160



А верно еще и потому, что кинуть радиокнопку на RadioGroup не получится! Она будет принадлежать форме. В итоге получим, чтовыбранной может быть только одна радиокнопка! Видимо это и не устраивает Leliks.


--------------------
PM MAIL WWW GTalk Jabber   Вверх
Leliks
Дата 3.11.2007, 23:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 8
Регистрация: 3.11.2007

Репутация: нет
Всего: нет



Вот точно оно и неустраивает smile

Добавлено через 3 минуты и 32 секунды
Акак создать радиокнупку при помощи свойства Items. smile  
PM MAIL   Вверх
ivan219
  Дата 3.11.2007, 23:54 (ссылка) |    (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1121
Регистрация: 19.11.2005
Где: Планета земля

Репутация: 5
Всего: 12



Цитата(Leliks @  3.11.2007,  23:31 Найти цитируемый пост)
Акак создать радиокнупку при помощи свойства Items.

А ты нажми на Items и в появившемся окошке набери несколько строк потом жми ОК smile

Добавлено @ 23:59
Код

procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
 case RadioGroup1.ItemIndex of
      -1:;// Ниодна кнопка не нажата
      0:;
.
.
 end;
end;

А вот так можно узнать какая кнопка нажата smile
PM MAIL ICQ   Вверх
Leliks
Дата 4.11.2007, 00:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 8
Регистрация: 3.11.2007

Репутация: нет
Всего: нет



Пасибки smile 
А штобы эта кнопка чето делала надо в том же окошке программу писать?
PM MAIL   Вверх
kemiisto
Дата 4.11.2007, 00:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Дикий Кот. =^.^=
****
Награды: 1



Профиль
Группа: Участник Клуба
Сообщений: 3292
Регистрация: 29.7.2007

Репутация: 2
Всего: 160



Нужно создать обработчик события OnClick для RadioGroup и там написать код по аналогии с тем, что написал ivan219 чуть выше.

Добавлено через 11 минут и 45 секунд
Дважды кликни на  компоненте RadioGroup. Delphi создаст процедуру-обработчик события OnClick для этого компонента:
Код

procedure TForm1.RadioGroup1Click(Sender: TObject);
begin

end;
 

Между begin и end вставляешь свой код:
Код

case RadioGroup1.ItemIndex of
   -1: оператор1;
   0: оператор2;
end;


Здесь идет проверка - какая по счету радиокнопка выбрана. ItemIndex - номер по порядку (нумерация начинается с 0). 
(ItemIndex = -1 означает, что ни нажата ни одна кнопка). 


--------------------
PM MAIL WWW GTalk Jabber   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Для новичков"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Для новичков | Следующая тема »


 




[ Время генерации скрипта: 0.2154 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.