Текущий архив: 2005.03.20;
Скачать: CL | DM;
Вниз
Наследники Найти похожие ветки
← →
webpauk (2005-03-04 17:25) [0]Есть
Tcontrol = class;
public
property Enabled: Boolean read fEnabled write SetEnabled;
end;
ЕстьTcustomControl = class(TControl);
Вопрос: как у TcustomControl исключить какое-нибудь свойство Tcontrol?
← →
BlackTr (2005-03-04 17:30) [1]
property Enabled: Boolean read fEnabled;
← →
mrAld © (2005-03-04 17:37) [2]поставить свойство в TControl в private
или я что-то не так понял?
← →
webpauk (2005-03-04 17:38) [3]это исключит запись в свойство. Надо полностью всё свойство.
← →
webpauk (2005-03-04 17:40) [4]>mrAld
Tcontrol - свойство Enabled - надо.
TcustomControl - не надо!
← →
begin...end © (2005-03-04 17:46) [5]> webpauk (04.03.05 17:25)
Никак.
← →
Anton_K © (2005-03-04 17:46) [6]>webpauk
Это нарушает принципы ООП.
← →
Defunct © (2005-03-04 17:47) [7]низя исключить свойства предка.
← →
webpauk (2005-03-04 17:48) [8]Вот ведь гадство какое!
Ладно запрещу хотя бы запись!
← →
Vlad © (2005-03-04 17:50) [9]Может в protected вынести?
Tcontrol = class;
public
property Enabled: Boolean read fEnabled write SetEnabled;
end;
TcustomControl = class(TControl);
protected
property Enabled;
end;
← →
webpauk (2005-03-04 17:50) [10]А чего такое?
[Warning] Control.pas(80): Property declaration references ancestor private "TControl.fEnabled"
← →
webpauk (2005-03-04 17:52) [11]> Vlad
Спасибо!
← →
begin...end © (2005-03-04 17:57) [12]> Vlad © (04.03.05 17:50) [9]
Сужение области видимости свойства в потомке невозможно.
← →
MU (2005-03-04 18:02) [13]может, создать предка обоих этих классов
TBaseControl = class(Txxxxx);
protected
property Enabled read ... write ...;
end;
а у двух потомков уже "открывать", что надо?
Страницы: 1 вся ветка
Текущий архив: 2005.03.20;
Скачать: CL | DM;
Память: 0.49 MB
Время: 0.025 c
