IUiLicenseManager.AddFeature

Синтаксис Fore

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

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

AddFeature(LicenseCode: String; MakePermanent: Boolean=False; ): Prognoz.Platform.Interop.ForeSystem.UiLicenseStatusCode;

Параметры

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

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

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

• если параметр установлен в False, то код будет добавлен только на текущую сессию. По умолчанию параметр установлен в False.

Описание

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

Комментарии

Метод актуален для использования, только если используется автономная лицензия. В противном случае будет выдано соответствующее сообщение.

Пример Fore

Для выполнения примера разместите на форме компоненты Button и Editbox с идентификаторами «Button1» и «Editbox1» соответственно, подключите системную сборку «Ui». Пример является обработчиком события OnClick для компонента «Button1».

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    LicManager: IUiLicenseManager;
    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("Status: " + StatusCode.ToString);
    End If;
End Sub Button1OnClick;

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

Пример Fore.NET

Для выполнения примера подключите системные сборки «Ui», «Fore», «ForeSystem». Разместите на форме компоненты Button и TextBox с идентификаторами «Button1» и «TextBox1» соответственно. Для TextBox установите свойство Multiline в True. Пример является обработчиком события OnClick для компонента «Button1».

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: IUiLicenseManager;
    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("Status: " + StatusCode.ToString(), New IWin32WindowForeAdapter(Self));
    End If; 
End Sub;

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

См. также:

IUiLicenseManager