Возвращает имя меню для заданной позиции строки меню.
Синтаксис:
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