Функция GETPAD()

Возвращает имя меню для заданной позиции строки меню.

Синтаксис:

GETPAD(cMenuBarName, nMenuBarPosition)

Параметры:
cMenuBarName
Задает имя строки меню.
nMenuBarPosition
Задает позицию в строке меню. Значение nMenuPosition может изменяться в диапазоне от 1 (самое левое имя в строке меню) до общего числа имен в строке меню.

Результат:
Символьный.

Комментарии:
Имена меню можно добавлять, удалять и переставлять в строке заголовка. Команда DEFINE PAD позволяет добавить имя меню в строку заголовка, а команда RELEASE PAD удалить имя меню.

Пример:

* Следующая программа с помощью функции GETPAD( ) проверяет, входит
* ли имя меню Edit в системную строку меню Visual FoxPro. Если это так,
* GETPAD( ) возвращает имя меню. (Чтобы восстановить строку меню Edit в
* состояние, которая она имеет по умолчанию, выдайте команду SET
* SYSMENU TO DEFAULT.)

FOR gnCount = 1 TO CNTPAD('_msysmenu')		&& Number of pads
	IF PRMPAD('_msysmenu', GETPAD('_msysmenu', gnCount)) = 'Edit'
		RELEASE PAD (GETPAD('_msysmenu', gnCount)) OF _msysmenu
		EXIT
	ENDIF
ENDFOR

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