Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.01.05;
Скачать: CL | DM;

Вниз

ClicksDisabled   Найти похожие ветки 

 
DNS   (2003-12-21 16:22) [0]

Написал я компонент (потомок TCheckBox), для работы с реестром, в котором есть метод CheckState, который вызываеться в цикле по масиву компонент, и в нем меняеться свойство Checked, при этом автоматически выполняеться OnClick компонента... А это вообщем то и не нужно :( У предка на изменение checked повешена проверка - если свойство ClicksDisabled поставить, то не будет выполняться OnClick компонента (это в TButtonControl).
Проблема же в том, что обратиться к этому свойству нельзя, почему и как это обойти ? Подскажите пожалуйста!

procedure TCustomCheckBox.SetState(Value: TCheckBoxState);
begin
if FState <> Value then
begin
FState := Value;
if HandleAllocated then
SendMessage(Handle, BM_SETCHECK, Integer(FState), 0);
if not ClicksDisabled then Click;
end;
end;


 
jack128 ©   (2003-12-21 16:51) [1]


> Проблема же в том, что обратиться к этому свойству нельзя,
>

как нельзя? ClicksDisabled - это ж protected! Из потомка можно обратиться..



Страницы: 1 вся ветка

Текущий архив: 2004.01.05;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.05 c
1-11848
Xtz
2003-12-20 17:17
2004.01.05
Как узнать реальный размер компанента (для записи в файл)


1-11914
Sam Stone
2003-12-21 15:27
2004.01.05
Парочка вопросов


1-11971
TUser
2003-12-19 12:39
2004.01.05
label.Caption:TStrings


1-11870
Goshi
2003-12-21 22:54
2004.01.05
Загрузка TrueColor иконок в TImageList


3-11780
Darrin
2003-12-10 11:02
2004.01.05
ADO + *.dbf