Функция MESSAGEBOX()

Отображает диалоговое окно, определенное пользователем.

Синтаксис:

MESSAGEBOX(cMessageText [, nDialogBoxType [, cTitleBarText]])

Параметры:
cMessageText
Задает текст, который должен появляться в диалоговом окне. Для переноса части сообщения на новую строку используйте в тексте cMessageText возврат каретки (CHR(13)). Высота и ширина диалогового окна будут соответствующим образом отрегулированы, чтобы вместить весь текст cMessageText.
nDialogBoxType
Определяет кнопки и значки диалогового окна, кнопку по умолчанию при появлении диалогового окна и поведение диалогового окна.
В приведенных ниже таблицах значения от 0 до 5 задают кнопки, отображаемые в диалоговом окне, а значения 16, 32, 48 и 64 значки диалогового окна. Значения 0, 256 и 512 определяют, какая кнопка в диалоговом окне используется по умолчанию, то есть изображается нажимаемой в открывающемся диалоговом окне.
Если аргумент nDialogBoxType опущен, это эквивалентно заданию значения 0.

Значение		Кнопка диалогового окна
0		Только кнопка OK.
1		Кнопки OK и Cancel.
2		Кнопки Abort, Retry и Ignore.
3		Кнопки Yes, No и Cancel.
4		Кнопки Yes и No.
5		Кнопки Retry и Cancel.

Значение		Значок
16		Знак останова.
32		Вопросительный знак.
48		Восклицательный знак.
64		Значок информации (i).

Значение		Кнопка, принимаемая по умолчанию
0		Первая кнопка.
256		Вторая кнопка.
512		Третья кнопка.

Аргумент nDialogBoxType может представлять собой сумму трех значений ѕ по одному из каждой таблицы. Например, если nDialogBoxType равняется 290 (2+32+256), он задает диалоговое окно со следующими характеристиками:

cTitleBarText
Задает текст для строки заголовка диалогового окна. Если аргумент cTitleBarText опущен, в строке заголовка будет стоять текст "Microsoft Visual FoxPro".

Результат:
Числовой.

Комментарии:
Значение, возвращаемое функцией MESSAGEBOX( ), указывает, какая кнопка была выбрана в диалоговом окне. Если в диалоговом окне с кнопкой Cancel для выхода из него нажимается клавиша ESC, то возвращается то же значение (2), что и при нажатии кнопки Cancel.
Обратите внимание, что самая короткая аббревиатура данной функции MESSAGEB( ).
В следующей таблице перечислены значения, возвращаемые функцией MESSAGEBOX( ) для каждой кнопки.

Возвращаемое значение	Кнопка
1			OK
2			Cancel
3			Abort
4			Retry
5			Ignore
6			Yes
7			No

Пример:

* В следующем примере отображается пользовательское диалоговое окно.
* Сообщение "Record not found. Would you like to search again?" [Запись не
* найдена; не желаете ли повторить поиск?] отображается в качестве
* названия этого диалогового окна, а в строке заголовка отображается
* "My Application".
* Пользовательское диалоговое окно содержит кнопки Yes и No, а также
* значок в виде вопросительного знака; вторая кнопка (No) используется по
* умолчанию. Когда вы нажимаете одну из этих кнопок, выбранная опция
* показывается на экране.

cMessageTitle = 'My Application'
cMessageText = 'Record not found. Would you like to search again?'
nDialogType = 4 + 32 + 256
*  4 = Yes and No buttons
*  32 = Question mark icon
*  256 = Second button is default

nAnswer = MESSAGEBOX(cMessageText, nDialogType, cMessageTitle)

DO CASE
	CASE nAnswer = 6
		WAIT WINDOW 'You chose Yes'
	CASE nAnswer = 7
		WAIT WINDOW 'You chose No'
ENDCASE

Предыдущий Шаг | Следующий Шаг | Оглавление
Автор Каев Артем.