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
Everything makes sense in someone's mind
public class SystemCrasher :ICrashable
In addition, an integer field is not for irrational people