Boog писал(а) 28. Января 2011 :: 17:11:Уважаемые!
Есть непонятное поведение компоненты.
Добавляю команду в меню Сервис:
мнСервис.ДобавитьКоманду("Права","Права ","ОткрытьФорму(""Справочник.Права.ФормаСписка"")");
Пункт меню появляется, но реакции на нажатие нет.
Странно! У меня практически так-же, и все работает
мнСервис.ДобавитьКоманду("РедактироватьДопМеню", "Редактировать меню ""Доп. возможности""", epAdmin.ert"");");
Разве что точки с запятой у тебя в конце команды нету..... неужели критично?
Цитата:Если определяю процедуру ПриПолученииКоманды(Команда,БлокировкаКоманды) в глобальнике (присоединен формексом), то его тоже никто никогда не вызывает.
Подскажите, что я делаю не правильно!
А данная процедура как я понял для отлова стандартных пунктов меня. И она у меня тоже нормально работает
// Событие ВК RWidjets
Процедура ПриПолученииКоманды(пКоманда, пЗаблокироватьКоманду)
Перем лЖурнал;
Если пКоманда = КомандыИнтерфейса.ИзменитьВремяДокумента Тогда
Сервис = СоздатьОбъект("Сервис");
Если Сервис.АктивныйКонтекст(лЖурнал) = 1 тогда
Если ТипЗначенияСтр(лЖурнал) = "ГрупповойКонтекст" Тогда
ФормаРасш=СоздатьОбъект("РасширениеФормы");
ФормаРасш.УстановитьФорму(лЖурнал.Форма);
ТипОбъекта = ФормаРасш.ТипОбъекта();
Если ТипОбъекта = "Журнал" Тогда
Если глИспользоватьУчетПоСменам(лЖурнал.ТекущийДокумент) = 1 Тогда // Для остальніх документов стандартный диалог "Время документа"
пЗаблокироватьКоманду = 1;
//*avgreen@molvest.org.ua, 2009-11-24 08:38:19
// ОткрытьФормуМодально("Отчет", лЖурнал.ТекущийДокумент, КаталогИБ()+"ExtForms\В разработке\Время документа.ert");
// -------- заменено на:
ОткрытьФормуМодально("Обработка.ВремяДокумента", лЖурнал.ТекущийДокумент);
//\avgreen@molvest.org.ua, 2009-11-24 08:38:19
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецЕсли;
//Иначе
// Сообщить(пКоманда);
КонецЕсли;
КонецПроцедуры
Страницы: 
[RWidjets] Динамическое меню программы (число прочтений - 116832 )
