FIX: Fix From Debugger Does Not Show VFP Desktop if Visible=.F.

MORE INFORMATION

Steps to Reproduce Behavior

1. Make sure you have configured the Debugger to use the Debug Frame. To do this, from the Tools menu, select Options, and then click the Debug tab in the Options dialog box. The Environment drop-down list box must be set to Debug Frame. Note that the Debugger must be closed for this drop- down list box to be enabled.
2. Run the following code from a program (.PRG) file:

         PUBLIC oform
         oform=CREATEOBJECT("TL_form")
         oform.SHOW()
         READ EVENTS
   
         DEFINE CLASS TL_form AS FORM
            ShowWindow = 2
            AutoCenter = .T.
            lIsFormUp=.F.
            ADD OBJECT command1 AS COMMANDBUTTON WITH ;
               TOP = 180, ;
               LEFT = 80, ;
               HEIGHT = 27, ;
               WIDTH = 195, ;
               CAPTION = "Press to display Debugger", ;
               NAME = "Command1"
   
            PROCEDURE DESTROY
               Clear EVENTS
               _SCREEN.VISIBLE=.T.
            ENDPROC
   
            PROCEDURE ACTIVATE
               IF !THIS.lIsFormUp
                  _SCREEN.VISIBLE = .F.   && We wait till now to hide desktop
                     && to ensure Top Level form is active window.
                  THIS.lIsFormUp = .T.
               ENDIF
            ENDPROC
   
            PROCEDURE command1.CLICK
              SET STEP ON
              x = 1
            ENDPROC
         ENDDEFINE

3. Press the "Press to display Debugger" command button.
4. In the Debugger, select Debug then Fix from the menu.
5. Select Yes to cancel the program.