Изграждане клас дърво

Предишен ◈ Следващото

Хората, подтикнат как да се изгради по програмен клас дърво (дървото на наследяване) и не са регистрирани, включително чрез произволно избран клас. Те трябва да бъдат отменени и всички предци и потомци.







Аз не мисля, че като цяло това е възможно.

За предци всичко просто: TObject.ClassParent
Но потомците - лентяй, няма стандартни средства.

Написан на 30 секунди ;-)

процедура TForm1.FormCreate (Sender: TObject);
Var
# XA0; # XA0; TMP: # XA0; Чклас;
започвам
# XA0; TMP: = TDBGrid;
# XA0; опитате
# XA0; # XA0; повторение
# XA0; # XA0; # XA0; ListBox1.AddItem (tmp.ClassName, нула);
# XA0; # XA0; # XA0; TMP: = tmp.ClassParent;
# XA0; # XA0; докато невярна;
# XA0 изключение
# XA0; край;
приключи;

Но това е по-добре да се повтаря, докато заменя ПТУ <> нула правя


> Написан на 30 секунди ;-)

Благодаря ви :)
Но в обратната посока, тъй като. например:

Как да стигнем TMyForm от TForm, или дори от TObject.
TMyForm - не е регистриран.








> DmitryFox # XA0; (08/22/06 17:47) [6]

И да се мисли логично? Защо трябва прародител трябва да знаете нещо за техните потомци?


> И да се мисли логично? Защо трябва прародител трябва да направи нещо
> Бъдете наясно с техните потомци?

Всички родители знаят тяхното потомство :)

Разгледайте Символ като едни и същи # XA0; тя работи.

Лана, по никакъв начин - така че по никакъв начин.


> И да се мисли логично? Защо трябва прародител трябва да направи нещо
> Бъдете наясно с техните потомци?
>

Особено, ако :-) "два Penza и един в Камчатка"


> DmitryFox # XA0; (08/22/06 17:54) [9]
>
>> И да се мисли логично? Защо, за Бога трябва нещо предшественик
> на
>> да се знае за тяхното потомство?
>
> Всички родители знаят техните потомци

Е, класовете пораждат програмисти, това е за тях и да поиска.

това просто не е направено, и ще направя.

Списък на класове в една програма там, се срещна веднъж в мрежата как да се свържа с него. И тогава всичко е просто - да премине в този списък и да го превърне в едно дърво.


> DmitryFox # XA0; (08/22/06 17:54) [9]

> Всички родители знаят тяхното потомство :)

Аз много се съмнявам, че това е възможно в най-общия случай.
например в случай на изтегляне по време на изпълнение на пакети през loadpackage.

Duc. какво пречи подбуди същата процедура върху опаковката?


> Преглед на Symbol като едни и същи # XA0; тя работи.

Делфи IDE има предкомпилатор. Той знае нещо, но той е осъден на бога :)







Предишен ◈ Следващото