Функция RunLoadMenu |
Запускает ранее загруженное меню. После выхода из функции RunLoadMenu меню выгружается из памяти и для повторного использования необходимо снова использовать функции LoadMenu и AddMenuItem.
Если к моменту завершения приложения в памяти остались неосвобождённые меню, в каталоге запуска формируется файл MenuLeakage.log, содержащий список неосвобождённых меню и интерфейсов из которых они загружались.
function RunLoadMenu ( menuID : longInt; xPos : integer; yPos : integer ) : word;
menuID : longInt- идентификатор меню, полученный от функции LoadMenu.
xPos : integer - горизонтальная позиция меню. Параметр может отсутствовать.
yPos : integer - вертикальная позиция меню. Параметр может отсутствовать.
Идентификатор команды выбранного пункта меню.
В случае, если идентификатор переданный в функцию не является результатом удачного вызова функции LoadMenu, возбуждается исключение ExVip.ExRunMenuError.
const cmTest1 = 3000; cmTest2 = 3001; cmTest3 = 3002; cmTest4 = 3003; cmTest5 = 3004; cmAddTest = 3005; cmRunMyMenu = 3010; end; interface ATest; create view test var menuID : longInt; as select * from Order; ... handleEvent cmDefault : { PutCommand(cmRunMyMenu); } cmRunMyMenu : { menuID := LoadMenu('TestMenu'); AddMenuItem(menuID,'Новый пункт',cmAddTest); case RunLoadMenu(MenuID) of cmTest1: Message('Test1'); cmTest2: Message('Test2'); cmTest3: Message('Test3'); cmTest4: Message('Test4'); cmTest5: Message('Test5'); cmAddTest: Message('AddTest'); end; // case } end; // handleEvent end.