How to Use Indirect Referencing of Objects Creatively

MORE INFORMATION

Step-by-Step Example

1. Create a new form, and place a pageframe on the form.
2. Add the following code to the Page1.Activate event:

       ********* Begin Page1.Activate *********
       PUBLIC THISPAGEFRAME, THISPAGE
       THISPAGEFRAME=THIS.PARENT
       THISPAGE=THIS
       ********* End Page1.Activate ***********
   						

3. Add the following code to the Page1.Deactivate event:

       ********* Begin Page1.Deactivate *********
       RELEASE THISPAGEFRAME, THISPAGE
       ********* End Page1.Deactivate
   						

4. Repeat steps 2 and 3 for Page2 using the exact same code.
5. Add a command button to Page1, and place the following code in the Click event for the command button:

      *********** Begin CommandButton.Click ***************
      THISPAGE.Caption="Visual FoxPro"
      *********** End CommandButton.Click *****************
   						

6. Run the form. Click the command button. Note the Caption of page1 changes to Visual FoxPro.
   
   NOTE: The INIT event of the objects would not recognize THISPAGEFRAME and THISPAGE.