FIX: Pageframe.Addobject() to a New Page Disables Mouse

MORE INFORMATION

Steps to Reproduce Problem

1. Create a new form, and place a Pageframe on it.
2. Add a command button to the form, and place the following code in its Click event:

      THISFORM.Pageframe1.Pagecount=3
      WITH THISFORM.Pageframe1.Page3
       .Addobject('TEXT1','TEXTBOX')
       .Addobject('TEXT2','TEXTBOX')
      ENDWITH
   
      WITH Thisform.Pageframe1.Page3.text1
       .top=5
       .width=80
       .left=5
       .height=20
       .visible=.t.
       .Controlsource='lctext1'
      ENDWITH
   
      WITH Thisform.Pageframe1.Page3.text2
       .top=30
       .width=80
       .left=5
       .height=20
       .visible=.t.
       .Controlsource='lctext2'
      ENDWITH
   
      * THISFORM.PAGEFRAME1.PAGE3.REFRESH  && add this line and mouse will
      * work properly
   						

3. Run the form, and select Page 3. Note that you cannot use the mouse to select the text box.