You will need to put NODEFAULT in the QueryUnload method.
>Hi All:
>
>How do you stop a form from releasing? I've tried returning .f. in the DESTROY and UNLOAD, but to no avail.
>
>(Since I could destroy the form by xing out OR by pressing the 'Close' button, I don't want to put the code in the close button.)
>
>Here's the code:
>
>
>LPARAMETERS tlError
>
>retparm = .t.
>
>IF tlError
> lnResponse = MESSAGEBOX('At least 1 item has no labels! Are You Sure?', 52, 'No Labels')
> IF lnResponse = 7
> retparm = .f.
> ENDIF
>ENDIF
>
>IF retparm
> DODEFAULT()
>ENDIF
>
>RETURN retparm
>
>
>Thanks,
>
>Yossi
If it's not broken, fix it until it is.
My Blog