Visual Graph Getting Started - Make and Use Dialog Box

Now, we will make a dialog box to control a VKnife element's status: right-click the VKnife element, the dialog box will appear, select Status and click <OK> on this dialog box to change VKnife's status, the running interface might look like this:

Make and Use Dialog Box 1

Please follow these steps to make it.

1. Run Visual Graph IDE, click File -> Open library... menu item to open bin\controls.tbl as elements library, and then use GroupBox, RadioButton, Button and KeyManager elements in the controls group to design a dialog box as below:

Make and Use Dialog Box 2

Open and Use Elements Library -> Make and Use Dialog Box 3

2. Select current sheet by click the blank, and then click Functions tab at left and double-click OnKeyDown function, write the following script:

KeyManager1.OnKeyDown( KeyManager1, Key )

Select <OK> button and write Close( 1 ) in its OnClick event; select <Cancel> button and write Close( 0 ) in its OnClick event.

3. Click Tools -> Document settings... menu item and make the following changes:

Make and Use Dialog Box 4

4. Save current document as h:\dlg.tbl.

5. Create a new file in IDE, click File -> Open library... menu item to open lib\power.tbl as elements library, and then use VKnife element in the power group to design current sheet as below:

Make and Use Dialog Box 5

Please note that you can change VKnife1 size by mouse.

6. Select VKnife1 and write the following code in its OnRButtonDown event:

' Create a dialog box.
doc = Create( "h:\dlg.tbl", false, false )
' Initialize the RadioButton's status.
doc.ActiveSheet.RadioButton1.Checked = Sender.IsOff
' Run the dialog box.
doc.ShowModal()
' IsOff is VKnife1's status property.
Sender.IsOff = doc.ActiveSheet.RadioButton1.Checked
' Free the memory.
doc.Free()

7. Click Program -> Run menu item or press <F9> to run this file, right-click the VKnife element, the dialog box will appear, select Status and click <OK> on this dialog box to change VKnife's status.