Begin Dialog Definition
Syntax
Begin Dialog UserDialog
[X, Y,]
DX, DY[,
Title$] _
[, .dialogfunc]
User Dialog Item
[User Dialog Item]...
End Dialog
Group
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/8ths 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/12ths 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/8ths of the average character width for the dialog's font. |
DY | This number value is the height. It is measured in 1/12ths of the character height for the dialog's font. |
Title$ | This string value is the title of the User Profile 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 DialogUserDialog 200,120
Text 10,10,180,15,"Please push the OK button"
OKButton 80,90,40,20
EndDialog
Dim dlg As UserDialog
Dialog dlg ' show dialog (wait for ok)
EndSub