RadioButton?

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
Vlad
Постоянный обитатель
Сообщения: 101
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Красноярск

RadioButton?

Сообщение Vlad »

Как установить Checked для элемента RadioButton?
Что нибудь типа RadioButton.items[1].Checked:=true;
san
Местный житель
Сообщения: 412
Зарегистрирован: 28 апр 2005, 11:34
Откуда: Галактика Млечный Путь

Сообщение san »

там же за состояние переменная отвечает
Vlad
Постоянный обитатель
Сообщения: 101
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Красноярск

Сообщение Vlad »

Спасибо, я и не догадался, что переменную изменять можно :)
А проще варианты есть?
На форуме нашел, видимость элемента контролируют через функцию
cfsSetProp ('c_BR_TBLACT.MOL_МОЛ', 'Visible' ,False);
к сожалению cfsSetProp ('ci_BR_TBLACT.MOL_МОЛ', 'Checked' ,False) не работает.
Должна же быть подобная функция.
Goblin
Местный житель
Сообщения: 474
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Сибирь-матушка
Контактная информация:

Сообщение Goblin »

Есть в Атлантисе несколько партизанских функций, по названию которых не поймешь , что это за зверь :D

Эта функция как раз к ним и относится
procedure ClusterDisabledField (cluster : integer;
mask : word);

кластер - это идентификатор поля
маска - битовая маска, 0 - нельзя выбрать, 1 - можно
Питаю патологические отвращение и ненависть в особо тяжелой и крайне запущенной формах к семейству программ Microsoft Business Solution !
Восславим господа Кришну за то, что у нас есть ГАЛАКТИКА !
BlazeBio
Местный житель
Сообщения: 386
Зарегистрирован: 27 апр 2010, 14:31
Контактная информация:

Re: RadioButton?

Сообщение BlazeBio »

Как узнать какое значение RadioButton выбрано?
BlazeBio
Местный житель
Сообщения: 386
Зарегистрирован: 27 апр 2010, 14:31
Контактная информация:

Re: RadioButton?

Сообщение BlazeBio »

Всё сам нашёл как :grin:

Код: Выделить всё

		cmCheckField:
		{
			   if (CurField() = #typeDoc)
			   {
				  case (typeDoc) of
					 0: {message('1')};
					 1: {message('2')};
				  end;
			   }
		}
Ответить