Hi Peter,

Thanks for confirming the crash. Unfortunately, Ctrl+Alt+Del is not an acceptable workaround.

KM


>When running this code, the only way I see to quit is with ctrl+alt+del. And that does not crash here. (vfp7sp1)
>
>>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