DEFINE CLASS myParent as Custom myNumber = 1234 ENDDEFINEand this one
DEFINE CLASS myChild as myParent OF myparent.prg *-- no action needed ENDDEFINEY and a test program
*-- testInheritance.prg o1 = NEWOBJECT("myParent","myparent.prg") ? o1.myNumber o1.myNumber = 5678 ? o1.myNumber o2 = NEWOBJECT("myChild","mychild.prg") ? o2.myNumber o1 = null o2 = nullNow, the question: