>DEFINE CLASS JimB AS CUSTOM > AlwaysLearning = .T. > *!* More properties here > FUNCTION GetNewKnowledge > *!* Secret code here > ENDFUNC >ENDDEFINE > >*!* Note how VFP's full inheritance plays here >oCindy = CREATEOBJECT("JimB") >oCindy.GetNewKnowledge() >oDoug = CREATEOBJECT("JimB") >oDoug.GetNewKnowledge()To speed things up, you could run your native oCindy object with GetNewKnowlege() method and use VFPCOM BindEvents(oCindy, oJimB)