Ben
Look at the code for the GetClass function in the Classes unit and the
ClassParent property
Question - are you trying to do something for all classes (like a class
browser)
or want a form of multiple inheritance (in which case read up on interfaces)
Regards Neven
N.K. MacEwan B.E. E&E
----- Original Message -----
From: Ben Taylor <[EMAIL PROTECTED]>
To: Multiple recipients of list delphi <[EMAIL PROTECTED]>
Sent: Tuesday, 16 November 1999 11:56
Subject: [DUG]: class typing
> Hi all..
>
> all i'm trying to do is see if there are any
> registered subclasses of a given class...
>
> as part of this i guess i'll also need to iterate
> through classes registered with RegisterClass()
>
> ie is there a way of doing something like:
>
> { for each registered class do : }
> aClass:=TCircle;
> { should be true }
> if (aClass is TShape) then...
> { should be false }
> if (aClass is TAnimal) then...
>
> Comments/suggestions welcome..
> Thanks,
> Ben.
>
>
> __________________________________________________
> Do You Yahoo!?
> Bid and sell for free at http://auctions.yahoo.com
> --------------------------------------------------------------------------
-
> New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
> Website: http://www.delphi.org.nz
>
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
