Delphi 7, CheckBox

@San22Rus · Регистрация: 07.03.2016

Author24 — интернет-сервис помощи студентам

Всем добрый вечер! Признаюсь вопрос у меня очень простой. И так, на форме расположены компоненты CheckBox и RadioGroup. Свойство Enabled компонента RadioGroup в False. Нужно чтобы было так: Если CheckBox.Checked установлено значение true, то и RadioGroup.Enabled в True. И наоборот. Как и в каком событии описать это? Заранее спасибо!

Добавлено через 4 минуты
Пробую вот так, не получается

Delphi

1	if CheckBox1.Checked=false then RadioGroup1.Enabled:=False else RadioGroup1.Enabled:=true;

@Kamero · 31.05.2016, 15:39

Delphi

procedure TForm9.CheckBox1Click(Sender: TObject);
begin
if checkbox1.Checked=false then
RadioGroup1.Enabled:=False
else
RadioGroup1.Enabled:=true;

@San22Rus · 31.05.2016, 15:44 **[ТС]**

Теперь понял, код у меня правильный был. Просто я использую компоненты AlphaControls и почему то именно эта операция не работает с ними. А когда кидаю обычные компоненты с вкладки "Standart" то всё хорошо. Может кто знает почему они глючат?

@qwertehok · 31.05.2016, 15:47

Сообщение от San22Rus

Может кто знает почему они глючат?

покажите код с компонентами и укажите их версию

@San22Rus · 31.05.2016, 15:58 **[ТС]**

Версию библиотеки не помню если честно какую ставил
вот код:

Delphi

1	if sCheckBox1.Checked=false then sRadioGroup1.Enabled:=False else sRadioGroup1.Enabled:=true;

Добавлено через 7 минут
Если дадите ссылку на проверенную библиотеку буду очень благодарен

@qwertehok · 31.05.2016, 16:01

Сообщение от San22Rus

Если дадите ссылку на проверенную библиотеку буду очень благодарен

они на сайте, бесплатны для рускоговорящих

Сообщение от San22Rus

вот код:

ваш код полностью рабочий

@northener · 31.05.2016, 16:42

Сообщение от Kamero

if checkbox1.Checked=false then
RadioGroup1.Enabled:=False
else
RadioGroup1.Enabled:=true;

Слишком длинно

Delphi

1	RadioGroup1.Enabled:=checkbox1.Checked;

@San22Rus 14 / 14 / 8 Регистрация: 07.03.2016 Сообщений: 152
	31.05.2016, 15:44 [ТС]	3
	Теперь понял, код у меня правильный был. Просто я использую компоненты AlphaControls и почему то именно эта операция не работает с ними. А когда кидаю обычные компоненты с вкладки "Standart" то всё хорошо. Может кто знает почему они глючат? 0

@qwertehok 5395 / 4323 / 1060 Регистрация: 29.08.2013 Сообщений: 27,129 Записей в блоге: 3
	31.05.2016, 15:47	4
	Сообщение от San22Rus Может кто знает почему они глючат? покажите код с компонентами и укажите их версию 0

@qwertehok 5395 / 4323 / 1060 Регистрация: 29.08.2013 Сообщений: 27,129 Записей в блоге: 3
	31.05.2016, 16:01	6
	Сообщение от San22Rus Если дадите ссылку на проверенную библиотеку буду очень благодарен они на сайте, бесплатны для рускоговорящих Сообщение от San22Rus вот код: ваш код полностью рабочий 0

	31.05.2016, 16:42

Delphi 7, CheckBox

Решение