Programming Reference Manual

Begin Dialog...End Dialog

 
Syntax
 
Begin Dialog UserDialog [X, Y,] DX, DY[, Title$] _
            [, .dialogfunc]
    User Dialog Item
    [User Dialog Item]...
End Dialog
 
Description
Define a UserDialog type to be used later in a Dim As UserDialog statement.
 
Parameter
Description
X
This numeric value is the distance from the left edge of the screen to the left edge of the dialog box. It is measured in 1/8 ths of the average character width for the dialog's font. If this is omitted then the dialog will be centered.
Y
This numeric value is the distance from the top edge of the screen to the top edge of the dialog box. It is measured in 1/12 ths of the average character width for the dialog's font. If this is omitted then the dialog will be centered.
DX
This number value is the width. It is measured in 1/8 ths of the average character width for the dialog's font.
DY
This number value is the height. It is measured in 1/12 ths of the character height for the dialog's font.
Title$
This string value is the title of the user dialog. If this is omitted then there is no title.
dialogfunc
This is the function name that implements the DialogFunc for this UserDialog. If this is omitted then the UserDialog doesn't have a dialogfunc.
User Dialog Item
One of: CancelButton, CheckBox, ComboBox, DropListBox, GroupBox, ListBox, MultiListBox, OKButton, OptionButton, OptionGroup, PushButton, Text, TextBox.
 
See Also
Dim As UserDialog.
Example
 
Sub Main
    Begin Dialog UserDialog 200,120
        Text 10,10,180,15,"Please push the OK button"
        OKButton 80,90,40,20
    End Dialog
    Dim dlg As UserDialog
    Dialog dlg ' show dialog (wait for ok)
End Sub