eg Var AClass: TClass;
then
AClass := TCustomPanel.ClassParent;
Myles
> -----Original Message-----
> From: Donovan J. Edye [SMTP:[EMAIL PROTECTED]]
> Sent: Monday, 28 February 2000 15:12
> To: Multiple recipients of list delphi
> Subject: [DUG]: How do you get the anscestor of a class....
>
> G'Day,
>
> Does someone know how to get the ancestor of a class say:
>
> GetAncestor(TPanel) would be TCustomPanel??
>
> TIA
>
> ------------------------------------------------------------------------
> --Donovan
> Donovan J. Edye [www.edye.wattle.id.au]
> Namadgi Systems, Delphi Developer
> Web: www.namsys.com.au E-Mail: [EMAIL PROTECTED]
> Voice: +61 2 6285-3460 Fax: +61 2 6285-3459
> TVisualBasic = Class(None);
> ------------------------------------------------------------------------
>
> --------------------------------------------------------------------------
> -
> 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
