Please see message#947895



>What are you trying to accomplish?
>
>
>
>>Can anybody tell me what's wrong with this code? Or, can anybody suggest a workaround?
>>
>>

>>x=.T.
>>On Shutdown x=.F.
>>
>>o=Createobject('MyClass')
>>
>>Define Class MyClass As Custom
>>	Function Init
>>	Do While x
>>		? Datetime()
>>		=Inkey(1)
>>	EndDo
>>EndDefine
>>

>>
>>In either development time or run time, when we try to close the application, VFP crashes!
>>
>>TIA