>

>IF _Screen.FormCount > 0
>    FOR x = 1 TO _Screen.FormCount
>       _Screen.Forms(x).Release
>    ENDFOR
>ENDIF
>

This code can get you into trouble. The problem is that the formcount decreases each time you release a form. It's better to start with the higher number and decrement your counter in this case:

IF _Screen.FormCount > 0
    FOR x = _screen.FormCount to 1 step -1
       _Screen.Forms(x).Release
    ENDFOR
ENDIF