Begin Dialog Definition

Syntax:

Begin Dialog UserDialog [X, Y,] DX, DY[, Title$] _

[, .dialogfunc]

User Dialog Item

[User Dialog Item]...

End Dialog

Group: User 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, 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