Begin Dialog Definition
Syntax
Begin Dialogname [X, Y,] DX, DY[, Title$]
_
[,
.dialogfunc]
User Dialog
Item
[User Dialog Item]...
EndDialog
Group User Dialog
Description Define a user dialog type to be used later in a Dim As name 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 user dialog. 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.
Example
'#Language
"WWB-COM"
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