oFrm = CREATEOBJECT('MyForm') >oFrm.show(1) > > >DEFINE CLASS MyForm as Form > >ADD OBJECT cmdTest as cmdChild > >ENDDEFINE > > >DEFINE CLASS cmdGrandParent as CommandButton > >FUNCTION click() >MESSAGEBOX('GrandParent') >ENDFUNC > >ENDDEFINE > >DEFINE CLASS cmdParent as cmdGrandParent > >FUNCTION click() >MESSAGEBOX('Parent') >ENDFUNC > >ENDDEFINE > >DEFINE CLASS cmdChild as cmdParent > >FUNCTION click() >** Call the GrandParent class method >RETURN cmdGrandParent::Click() >ENDFUNC > >ENDDEFINE>