>Dear Experts
>
>I use following codes to close form with only close button, that works fine.
>Now I want to use some codes in main prg to apply following code to all the forms in project instead of writing on every form.
>
>Please help
>
>
>MESSAGEBOX("Please press close button to exit",_screen.ActiveForm.caption)
>NODEFAULT
>
>
>
>these code are on queryunload evetn

QueryUnload Event will be fired ONLY if you press [X] button. If you have somewhere in the form thisform.Release() that event will be not fired.