*Решено* | Неожиданный вызов события OnClick в TRadioButton

Savant · Отправлено: **20:42, 04-04-2005** | #2

Kelasant
Виноват борландовский VCL

. Решение например такое (создаем в дополнение переменную ourChange):

Код:

// смена чекеда
ourChange = TRUE;
Control->Checked = FALSE;
...

а в обработчике OnClick пишем

Код:

if (ourChange) { ourChange = FALSE; return 0; };

Прошу прощения, если где-то что-то наврал, я на Билдере не программировал

) . Решение даю, основываясь на Дельфях

Kelasant · Отправлено: **21:04, 04-04-2005** | #3

В общем, ситуация несколько странная.
Оказывается, это не баг, а фича - почерпнуто из доки по соответствующему события TControl.
Если Чекед меняется, или устанавливается в тру - вызывается ОнКлик.
Сделано в виде исключения для внучка РадиоБаттона.
Не могу сказать, чтобы этот факт меня утешил.

За предложенное решение спасибо, Savant.
Хоть и не сильно красивое благодаря ВЦЛ-у, но действенное.