Самое простое - запихать в отчеты пользователя.
В управлении персоналом зарезать протектом(для кадровиков).
Динамические - у вас наверняка есть образцы.
Но есть одна тонкость. При каждом обновлении надо будет динамические меню создавать снова.
+ Ресурс с добавляемым подменю(если вы его будете добавлять, а не пункты меню) должен быть один, и быть доступным всем, иначе возможна ситуация, что в сапорте будет одно, а в галактике другое.
Ну и при большем кол-ве меню возможны глюки - вроде все есть, а меню нет.
Код: Выделить всё
_try
{ MenuID:=LoadMenuEx('C_COMMON::Nastr_Admin',false,true);
AddMenuItemEx2(MenuID,'Регистрация дополнительных пунктов меню',
'Регистрация дополнительных пунктов меню','',cmRunInterface,0,'C_Common::ADD_MenuDynamic');
//=====================================
if (not StoreMenuHowDynamics(MenuID,'C_COMMON::Nastr_Admin'))
_raise ExStoreMenuHowDynamics;
}
_except
on ExStoreMenuHowDynamics:
message('Ошибка выполнения StoreMenuHowDynamics',error);
on ExVip:
message(ExploreException,error);
_finally {
if (MenuID<>0) DisposeLoadMenu(MenuID);
}
Перед добавлением лучше меню удалить, перезайти в галактику и потом снова добавить.
Код: Выделить всё
DeleteMenuHowDynamics('C_Common::Nastr_Admin');
Все это сидит в x$resource.