This bug desc rings a bell from a project started in vfp6. I think we ran into this one or something very similar back then...
There was special Errorhandler code for OleControl at least ;-)
>>For an object of class 'Olecontrol', looks like aClass() chokes on the parent class:
>>
>>
>>form = CreateObject('form')
>>form.AddObject('oleClass_2', 'oleClass_2')
>>
>>? AClass(aa, form.oleClass_2), aa
>>
>>define class oleClass_2 as oleClass_1
>>enddefine
>>
>>define class oleClass_1 as Olecontrol
>> oleClass = 'Shell.explorer.2'
>>enddefine
>>
>
>Confirmed, happens with OLECONTROL only.
>
>VFP 9 SP2 (5185)