0
leobrn
26.12.16
✎
10:54
|
Подскажите, как зашифровать с помощью слк объекты. Перенес в свою конфу нужные общие модули(СЛК,МенеджерОбъектовСЛК) Слк и т.д . Дальше я должен в модулях объекта что-то прописывать для проверки ключа?
Допустим надо отчет закрыть то в модуле объекта или менеджера надо писать что-то подобное?
// Ссылка на менеджер объектов, который создал этот объект, получена
// в предопредленной процедуре "ПриСозданииОбъекта"
Перем _менеджерОбъектов;
//
// Предопределенная процедура, вызывающаяся при создании объекта методом "СоздатьОбъект"
//
// Позволяет разработчику запретить создание обаботки, для чего
// необходимо установить значение параметра "Отказ" в "Истина"
//
// МенеджерЛицензий - ссылка на менеджре лицензий, которым создан объект
// Отказ - признак запрета создания
// ОписаниеОшибки - описание ошибки, устанавливаемое разработчиком в случае запрета
// создания объекта
//
// В этой процедуре рекомендуется проверять значения лицензионных
// параметров и в зависимости от них разрешить или запретить создание
// объекта.
//
Процедура ПриСозданииОбъекта(МенеджерОбъектов, Отказ, ОписаниеОшибки) Экспорт
_менеджерОбъектов = МенеджерОбъектов;
КонецПроцедуры
//
// Предопределенная процедура, вызывающаяся при создании объекта методом
// "СоздатьОбъект" перед проверкой лицензии сеанса
//
// Позволяет разработчику отказаться от проверки лицензии, для чего
// необходимо установить значение параметра "Отказ" в "Истина".
//
// Используется в случае когда достаточно только защитить код и данные объекта и
// нет необходимости в контроле лицензий
//
Процедура ПередКонтролемЛицензии(Отказ) Экспорт
Отказ = Ложь;
КонецПроцедуры
//
// Предопределенная процедура, вызывающаяся при создании объекта методами
// "Создать" и "СоздатьПоСсылке"
//
Процедура ПриСоздании(МенеджерЛицензий, КлиентскаяСылка, Отказ, ОписаниеОшибки) Экспорт
// Контроль лицензий сеанса выполняется при создании объекта методом
// "СоздатьОбъект".
//
// Чтобы объект было невозможно создать старвми методами без контроля
// лицензий сеанса запрещаем создание
Отказ = Истина;
КонецПроцедуры
//
// Пример функции, использующей значение лицензионного параметра. Для получения
// значения используется менеджер объектов, установленный в предопредленной
// процедуре "ПриСозданииОбъекта" (см. выше)
//
Функция МетодОбъекта() Экспорт
Стр =
ЭтотОбъект.Метаданные().ПолноеИмя() + Символы.ПС +
"Ключ = " + Строка(_менеджерОбъектов.ПолучитьНомерКлюча()) +
", ТипПриложения=" + _менеджерОбъектов.ПолучитьЗначениеПараметра("ТипПриложения");
Возврат Стр;
КонецФункции
|
|