[M.A.D.M.A.N.]

http://decoding.narod.ru/practic/cla...stitution.html

Какие плюсы и минусы есть у такого подхода?

Например зареинтродьюсить некий метод можно?

[poli-smen]

Сообщение от M.A.D.M.A.N.

http://decoding.narod.ru/practic/cla...stitution.html

Какие плюсы и минусы есть у такого подхода?

Например зареинтродьюсить некий метод можно?

В одном своём проекте я использовал подмену класса TListView. Я использую TListView почти всегда в режиме vsReport (т.е. как Grid), но меня немного раздражает, что к первой колонке нужно обращаться как к Caption, а к остальным как к SubItems, да ещё если SubItems пустой и попытаться из его колонки прочитать, то ещё и ошибку получаем
Поэтому я написал небольшой модуль который прописываю в uses модуля где лежит TListView (главное прописать после модуля ComCtrls ). И получается что хотя фактически в DesignTime лежит обыкновенный TListView, но в откомпилированной программе используется уже подменённый с которым я могу проделывать такие вещи:

Код:

ListView1.Values[10, 5] := 'Колонка №10, Строка №5';
// Или так:
ListView1.Items[5].Values[10] := 'Колонка №10, Строка №5';

Работает нормально, глюков не наблюдал. Правильнее наверно было бы своего наследника TListView добавить в палитру компонентов и уже его бросать на форму, но что если я захочу открыть этот проект в другом месте где этот компонент не установлен? - нужно его доустанавливать, и так всякий раз.

[angvelem]

Сообщение от M.A.D.M.A.N.

Какие плюсы и минусы есть у такого подхода?

Идея известна давно и используется наравне с классом THack. Плюсы также давно известны - доступ к закрытым полям. Минусы - а х... его знает.
P.S. Так как мои проекты, это в основном API, то для ListView у меня полностью свой модуль имеется.

[poli-smen]

Сообщение от angvelem

Идея известна давно и используется наравне с классом THack. Плюсы также давно известны - доступ к закрытым полям. Минусы - а х... его знает.

На сайте "Королевство Delphi" эта фича с подменой класса называется "Шаманский метод Geo"

[M.A.D.M.A.N.]

Ну вот, перегруженный конструктор зареинтродьюсить не получается.
Приходится делать реинтродьюс на все конструкторы.

[M.A.D.M.A.N.]

И еще, как быть с потомками, например чтоб подменил общего дельфового предка и все дельфовые потомки от этого класса обращались к подмененному классу.

Я так понимаю придется опять делать шаманство, получать адреса нужных ф-ий предкового класса, внутрь вписывать джамп.

Может есть что-то проще?

[M.A.D.M.A.N.]

Ладно, пофиг, проще переопределить нужные классы и зареинтродьюсить на всех одно и то же.

Спасибо всем, кто участвовал в дискуссии.