Sub class <-> Parent class

[Skyrunner2]

hallo!
ich habe eine haupt klasse, und hab nun eine unter klasse erstellt

Type ChildClass=class(ParentClass)


wenn ich nun in einem form test vom typ ParentClass habe, und durch functionen Private Variablen in dieser klasse definiere, ist es dann möglich auf diese privaten variablen über die Child Class zu zugreifen? wenn ja, wie?


also noch mal anders:

Delphi-Quellcode:

Type Parent=Class
      Private
        PrivateVAR:Integer;
       Public
         Procedure ChangePrivateVar(NewValue:Integer);
       end;

       Child=Class(Parent)
        Public
          Function ReadParentPrivateVar():Integer;
         end;

//[...]

Var TestParent:Parent;
    TestChild:Child;

begin
//[... create...]
// dann:

TestParent.ChangePrivateVar(5);

TestChild.ReadParentPrivateVar;//-> Sollte 5 ausgeben...

Ich denke ich muss irgentwie TestChild mit Test Parent verknüpfen... doch wie, und ist das überhaupt möglich??