HOWTO: Use Usercontrolmode with Wizstyle Button Classes in VFP

MORE INFORMATION

Steps to Demonstrate the Usercontrolmode Property

1. Issue the following command in the Command window:

         SET DEFAULT TO HOME()+"\samples\data"
   							

   In Visual FoxPro 6.0, issue the following command:

         SET DEFAULT TO HOME(3)+"samples\data"
   							

2. Open the Testdata database.
3. Select Wizards and then Form from the Tools menu.
4. In the Wizard Selection dialog box, click OK for the Form Wizard.
5. In the Form Wizard dialog box, click the double arrow button to select all fields from the customer table, then click Finish.
6. Select the "Save form and modify it in the Form Designer" option, then click Finish. (The form is saved as Customer.scx by default.)
7. Click Save in the Save As dialog box.
8. Size the form so that you can see the buttons at the bottom.
9. From the Form Controls toolbar select a ComboBox, and place it on the form.
10. In the property sheet for the ComboBox set RowSourceType to "5 - Array."
11. Set RowSource to Thisform.myarray.
12. Click New Property from the Form menu. Define a new property by typing "myarray(20)" (without the quotes) into Name field and click "Add." Then click Close.
13. In the Init event method of the ComboBox enter the following:

           SELECT DISTINCT country FROM customer ;
              INTO ARRAY thisform.myarray NOCONSOLE
           This.DisplayValue = Thisform.country1.value  && the textbox
           This.refresh
    							

14. Run the form. Note that the ComboBox is enabled. Click Exit.
15. Back in the development mode, select the BUTTONSET1 control.
16. In the property sheet for BUTTONSET1 scroll down to the custom properties and find "Usercontrolmode." Set that to .T. (True). (It is not a toggled property, so type the string ".T." without quotes in the property setting combo box at the top of the sheet.)
17. Run the form. Note that the combo box is disabled. Click Edit and notice that the combo box, and all of the text boxes, are enabled. Click Revert and notice that the controls are disabled.