FIX: Modal Form and Form with Treeview Causes Memory Error

MORE INFORMATION

Steps to Reproduce Behavior

1. Create a form called Ztest and add a pageframe to the form.
2. Right-click the pageframe and choose Edit. Place a Microsoft TreeView control on each page and name them OLEControl1 and OLEControl2 respectively.
3. Place a command button on the form change the Caption property to Refresh.
4. In the Click event of the command button add the following code:

         * Refresh the first page of the pageframe.
         THISFORM.pageframe1.page1.OLEControl1.nodes.CLEAR
         FOR i= 1 TO 5
           THISFORM.pageframe1.page1.OLEControl1.nodes.ADD(,,,STR(RAND()*100))
           THISFORM.pageframe1.page1.OLEControl1.nodes.ADD(,,,STR(RAND()*100))
         ENDFOR
         * Refresh the second page of pageframe.
         THISFORM.pageframe1.page2.OLEControl2.nodes.CLEAR
         FOR i= 1 TO 5
           THISFORM.pageframe1.page2.OLEControl2.nodes.ADD(,,,STR(RAND()*100))
           THISFORM.pageframe1.page2.OLEControl2.nodes.ADD(,,,STR(RAND()*100))
         ENDFOR
         THISFORM.REFRESH
   								

5. Add a second command button and change the Caption to "Do Modal Form."
   Add the following to the Click event of the command button:

         DO FORM modalform

6. Create a form called modalform, and change the Windowtype to 1-Modal. Add a command button to the form that has the following code in the Click event:

         ThisForm.Release

   Change the Caption property of the command button to Exit.
7. Save both forms.
8. Run the form using the following command:

         Do Ztest.scx

   Press the refresh button, and click the second page of the pageframe. Next, click the first page of the pageframe. Then, press the "Do Modal Form" button to call the modal form. Once the modal form appears, press the Exit button on the modal form. Finally, press the refresh button on Ztest.scx. The error occurs.