Description
This example shows a function that returns an AnsiString with all the ancestor classes of
a given component.
Function Get_AncestorClasses()
Copyright © 1997-2002 Rodolfo A. Frino. All rights reserved.
String Get_AncestorClasses( TComponent* p , String Separator )
{
TClass type = p->ClassType();
String S;
while( 1 )
{
if ( !(type = type->ClassParent()) )
break;
S += String( type->ClassName() ) + Separator;
}
return S;
}