Привет!

Сделал класс на основе OptionGroup и у меня такая проблема, что при единственном пункте если сначала его выбрать - выберется, но повторный клик по нему убирает точку, т.е. снимает "выбранность опции". Получается эффект чекбокса и это мешает!

В чем м.б. дело? Как устранить сей эффект?

в классе ничего нет - просто создал класс на основе OptionGroup и все, впрочем стандарный OptionGroup с одной кнопкой ведет себя точно так же. В свойствах ничего такого не нашел и в хелпах тоже - я понимаю что опг создан для выбора когда он есть, но иногда бывает что его нет - дизаблить его тогда, чтоли...

вфп90

спасибо

спасибо за подсказки!

Но теперь я вообще в полном недоумении...
Итак, сделал следующее - если опция одна, все равно ставлю Value=0, но в InteractiveChange следующее:
вторая строчка необходима т.к. у OptionGroup есть метод enabled_assign, который выставляет всем опциям такой же Enabled как и у родителя, т.е.
т.е. как только я нажму на единственный батон OptionGroup становится недоступным, а опция в нем - выглядит доступной, но т.к. OptionGroup недоступен, то и опция в нем - тоже. Но только фигушки! Прекрасно себе отрабатывает дальше как чекбокс! Причем уже проверял многократно - Enabled точно .F., но опция в нем при этом щелкается! Убираю косметическую строчку this.Buttons(1).Enabled = .T. - тогда все нормально, но дизаблиццо и опция в нем. Издевательство какое-то... тупо все равно ему Enabled он или нет...

переделал все под идею со второй невидимой кнопкой - все нормально стало! Все таки получается что игра в OptionGroup.Enabled приводит к глюкам. Хочет OptionGroup минимум 2 опции и все тут :)

1) смысл такой:
- при выборе 1 из предлагаемых пунктов осуществляется автоматический переход на следующую страницу (организовано на PageFrame без заголовков). Если сделать автовыбор, то на ините, а тогда программа падает, т.к. переход происходит в инитеконтрола, т.е. когда форма еще не инициализировалась.
Поэтому, даже если пункт всего 1 его надо явно выбрать вручную чтобы перейти на следующий шаг. Кроме того юзер дложен понимать что происходит, что выбрано и что соответственно от него требуется.
По сути пункт бывает один только на ранней стадии, когда юзеры просто еще не повносили в соотв. таблицы разнообразия.

2) смысл в том чтобы юзер явно видел что контрол недоступен, т.к. при Enabled=.F. контрол выглядит доступным и в понимании юзера - глючит.

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