ILicenseManager.AddFeature

Синтаксис Fore

AddFeature(LicenseCode: String; [MakePermanent: Boolean=False]): UiLicenseStatusCode;

Синтаксис Fore.NET

AddFeature(System.String, System.Boolean): Prognoz.Platform.Interop.ForeSystem.UiLicenseStatusCode;

Параметры

LicenseCode. Код активации лицензии;

MakePermanent. Параметр отвечает за сохранение кода активации:

если параметр установлен со значением True, то код будет сохранен в файл лицензии: %PROGRAMDATA%\Foresight\Prognoz Platform\lservrc;
если параметр установлен со значением False, то код будет добавлен только на текущую сессию. По умолчанию параметр принимает значение False.

Описание

Метод AddFeature добавляет код лицензии.

Пример Fore

Для выполнения примера разместите на форме компоненты Button и Editbox с наименованиями «Button1» и «Editbox1» соответственно.

Добавьте ссылки на системные сборки: Host, Ui, Forms.

Пример является обработчиком события OnClick для компонента «Button1».

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    LicManager: ILicenseManager;
    LicString: String;
    StatusCode: UiLicenseStatusCode;
Begin
    LicManager := WinApplication.Instance.LicenseManager;
    LicString := Editbox1.Text;
    StatusCode := LicManager.AddFeature(LicString, False);
    If StatusCode = UiLicenseStatusCode.Success Then
        WinApplication.InformationBox("Код успешно добавлен");
    Else
        WinApplication.InformationBox("Ошибка: " + StatusCode.ToString);
    End If;
End Sub Button1OnClick;

После нажатия на кнопку указанный код активации в Editbox будет добавлен для использования на текущую сессию. О результате добавления кода будет выдано соответствующее сообщение. Если при добавлении возникнут ошибки, то будет выдано сообщение с кодом возникшей ошибки.

Пример Fore.NET

Для выполнения примера разместите на форме компоненты Button и TextBox с наименованиями «Button1» и «TextBox1» соответственно. Для TextBox установите свойство Multiline в True.

Добавьте ссылки на системные сборки: Host, Ui, Fore, ForeSystem.

Пример является обработчиком события OnClick для компонента «Button1».

Imports Prognoz.Platform.Interop.Host;
Imports Prognoz.Platform.Interop.Ui;
Imports Prognoz.Platform.Interop.Fore;
Imports Prognoz.Platform.Interop.ForeSystem;

Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    WinApp: WinApplicationClassClass = New WinApplicationClassClass();
    Svc: IForeServices;
    RunContext: ForeRuntimeContext;
    LicManager: ILicenseManager;
    LicString: String;
    StatusCode: UiLicenseStatusCode;
Begin
    Svc := Self.Metabase As IForeServices;
    RunContext := Svc.GetRuntime().Context;
    LicManager := WinApp.Instance[RunContext].LicenseManager;
    LicString := textBox1.Text;
    StatusCode := LicManager.AddFeature(LicString, False);
    If StatusCode = UiLicenseStatusCode.lscSuccess Then
        WinApp.InformationBox("Код успешно добавлен", New IWin32WindowForeAdapter(Self));
    Else
        WinApp.InformationBox("Ошибка: " + StatusCode.ToString(), New IWin32WindowForeAdapter(Self));
    End If;
End Sub;

Результат выполнения примера Fore.NET совпадает с примером Fore.

См. также:

ILicenseManager