[DUG] Accessing an ancestor class private field

[Conor Boyd]

<Shudder> ... ;-)

C.

-----Original Message-----
From: delphi-bounces at ns3.123.co.nz [mailto:delphi-bounces at ns3.123.co.nz] On
Behalf Of Kyley Harris

What you are looking for is a hack! 
The hack is like this.

in the unit that needs to access the private field

THackCollection = class(TPersistent)
  private
    FItemClass: TCollectionItemClass;
    FItems: TList;
    FUpdateCount: Integer;
    FNextID: Integer;
    FPropName: string;
end;

[snip]