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

Вниз

Доступ к закрытым членам   Найти похожие ветки 

 
kaif ©   (2002-02-02 16:07) [0]

Был какой-то хакерский способ (типа породить псевдо-потомка объявленного класса) добраться до секции implementation другого модуля. Я все перерыл, но не могу найти, в какой-то книжке читал и даже пробовал, но забыл, как это делалось... И не помню, до чего можно было так добраться. Например, до внутренней переменной? А может, это deja view?


 
DMN ©   (2002-02-02 16:57) [1]

Так можно было добраться до protected свойств и методов класса. Например, у TControl есть защищенное свойство Color. Чтобы менять цвет у любого контрола, не задумываясь, TEdit это, TLabel или еще кто, описываем в своем юните:

type
THackedControl=class(TControl)
end;


Затем просто приводим того потомка TControl, цвет которого мы хотим поменять, к нашему типу:

THackedControl(Label1).Color := clRed;
THackedControl(Edit1).Color := clBlue;


 
Loxly ©   (2002-02-02 17:04) [2]

Около года назад на сайте Мастеров лежала статья о том как добраться до private-методов класса. Если нужно, могу поискать ее у себя - где-то она должна у меня валяться.


 
Serg001 ©   (2002-02-02 17:07) [3]

>Loxly
Мне бы не помешала такая статейка.


 
kaif ©   (2002-02-02 17:16) [4]

Спасибо Loxly ©.
Я нашел статью в Мастерах ("Как вызвать private метод класса, находящегося в другом модуле", Андрей Руфин).
Теперь я могу принять решение - лучше этого не делать.
Спасибо DMN
Пожалуй лучше ограничится этим методом (доступ только к защищенным членам). Тут, по крайней мере нет явного криминала, который не был бы заметен компилятору.



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

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

Наверх




Память: 0.47 MB
Время: 0.009 c
1-57146
Loxly
2002-02-03 19:57
2002.02.18
Создание формы приводит к ее появлению


7-57233
neverbee
2001-11-13 14:32
2002.02.18
Подскажите как програмно можно выключить/включить Service?


3-57030
Витал
2002-01-17 12:38
2002.02.18
QReport


1-57073
Злой_Гном
2002-02-01 18:23
2002.02.18
Все, про ProgressBar дотумкал :-)))


3-57014
Константин
2002-01-23 20:46
2002.02.18
Чтение таблиц Paradox 3.5 в Дельфи...