Adds a specified class to the group in which another class appears.
procedure GroupDescendentsWith(AClass: TPersistentClass; AClassGroup: TPersistentClass);
GroupDescendentsWith(TPersistentClass AClass, TPersistentClass AClassGroup);
Classes
Call GroupDescendentsWith to add the class specified by AClass to the same group as the one that contains AClassGroup. If AClassGroup is a member of more than one group, GroupDescendentsWith adds AClass to the group that contains the nearest ancestor of AClassGroup. (The nearest ancestor is the ancestor for which CountGenerations returns the lowest value).
If AClassGroup is not a member of any group, GroupDescendentsWith raises an exception.
|
Copyright(C) 2008 CodeGear(TM). All Rights Reserved.
|
|
What do you think about this topic? Send feedback!
|
File