Процедура DisposeLoadMenu |
Освобождает ресурсы, выделенные при загрузке меню функцией LoadMenu.
Если к моменту завершения приложения в памяти остались неосвобождённые меню, в каталоге запуска формируется файл MenuLeakage.log, содержащий список неосвобождённых меню и интерфейсов из которых они загружались.
procedure DisposeLoadMenu (menuID : longInt);
menuID : longInt - идентификатор меню, полученный функцией LoadMenu.
В случае, если идентификатор переданный в функцию не является результатом удачного вызова функции LoadMenu, возбуждается исключение ExVip.ExRunMenuError.
//============================================================= const cmTest1 = 3000; ... cmTest5 = 3004; end; //============================================================= interface DisposeMenuExample; ... //------------------------------------------------------------- handleEvent cmHotKeys : { menuID := LoadMenu('TestMenu'); if IsValid (tn...) case RunLoadMenu(menuID) of cmTest1: message('Test1'); ... cmTest5: message('Test5'); else DisposeLoadMenu (menuID); } end; end.