>>Dear All
>>
>>If I have an object reference to an object contained in another object
>>
>>
>>

>>function SomeFunction
>>lparameters oControl
>>
>>*oForm=??
>>
>>

>>
>>How do I grab object reference of a form that contains that object. I remember seeing posts in the past with some looping
>>up to the form level. Is that only way, or am I overlooking some foxpro function that can get to it straight.
>>
>>What I need is oControl.parent.parent.parent->> until parent is actually Form itself.
>>
>>TIA
>>Sergio
>
>I don't see a way to do it except for looping until oControl.Parent.BaseClass = 'Form'

Okay :)

 Function GetParentForm
        lparameters oControl
        local oParent
        oParent  = oControl.parent  
        do while oParent.baseclass<>'Form'
           oParent  = oControl.parent  
           oControl = oParent         
        enddo 
        return  oParent