Имя: Пароль:
1C
1С v8
Зашифровать модуль используя СЛК
0 leobrn
 
26.12.16
10:54
Подскажите, как зашифровать с помощью слк объекты. Перенес в свою конфу нужные общие модули(СЛК,МенеджерОбъектовСЛК) Слк и т.д . Дальше я должен в модулях объекта что-то прописывать для проверки ключа?

Допустим надо отчет закрыть то в модуле объекта или менеджера надо писать что-то подобное?

// Ссылка на менеджер объектов, который создал этот объект, получена
// в предопредленной процедуре "ПриСозданииОбъекта"
Перем _менеджерОбъектов;

//
// Предопределенная процедура, вызывающаяся при создании объекта методом "СоздатьОбъект"
//
// Позволяет разработчику запретить создание обаботки, для чего
// необходимо установить значение параметра "Отказ" в "Истина"
//
// МенеджерЛицензий - ссылка на менеджре лицензий, которым создан объект
// Отказ            - признак запрета создания
// ОписаниеОшибки   - описание ошибки, устанавливаемое разработчиком в случае запрета
// создания объекта
//
// В этой процедуре рекомендуется проверять значения лицензионных
// параметров и в зависимости от них разрешить или запретить создание
// объекта.
//
Процедура ПриСозданииОбъекта(МенеджерОбъектов, Отказ, ОписаниеОшибки) Экспорт
    _менеджерОбъектов = МенеджерОбъектов;
КонецПроцедуры

//
// Предопределенная процедура, вызывающаяся при создании объекта методом
// "СоздатьОбъект" перед проверкой лицензии сеанса
//
// Позволяет разработчику отказаться от проверки лицензии, для чего
// необходимо установить значение параметра "Отказ" в "Истина".
//
// Используется в случае когда достаточно только защитить код и данные объекта и
// нет необходимости в контроле лицензий
//
Процедура ПередКонтролемЛицензии(Отказ) Экспорт
    Отказ = Ложь;
КонецПроцедуры

//
// Предопределенная процедура, вызывающаяся при создании объекта методами
// "Создать" и "СоздатьПоСсылке"
//
Процедура ПриСоздании(МенеджерЛицензий, КлиентскаяСылка, Отказ, ОписаниеОшибки) Экспорт
    // Контроль лицензий сеанса выполняется при создании объекта методом
    // "СоздатьОбъект".
    //
    // Чтобы объект было невозможно создать старвми методами без контроля
    // лицензий сеанса запрещаем создание
    Отказ = Истина;
КонецПроцедуры

//
// Пример функции, использующей значение лицензионного параметра. Для получения
// значения используется менеджер объектов, установленный в предопредленной
// процедуре "ПриСозданииОбъекта" (см. выше)
//
Функция МетодОбъекта() Экспорт
    Стр =
      ЭтотОбъект.Метаданные().ПолноеИмя() + Символы.ПС +
      "Ключ = " + Строка(_менеджерОбъектов.ПолучитьНомерКлюча()) +
      ", ТипПриложения=" + _менеджерОбъектов.ПолучитьЗначениеПараметра("ТипПриложения");
    Возврат Стр;
КонецФункции
1 abuca
 
26.12.16
11:19
Может лучше посмотреть в сторону стандартного шифрования 1С:

МенеджерКриптографии = Новый МенеджерКриптографии(...

СЛК штука специфическая. Не у всех есть.