ILicenseManager.IsStandalone

Fore Syntax

IsStandalone: Boolean;

Fore.NET Syntax

IsStandalone: Boolean;

Description

The IsStandalone property returns True if stand-alone license is used, and False if network network or temporary local licenses are used that are checked out from license server (network with the commuter attribute).

Comments

For details about license types and possible application scenarios see the About License Type and Period article.

Fore Example

To execute the example, place the Button component named Button1 on the form.

Add links to the Host, Ui, Forms system assemblies.

The example is a handler of the OnClick event for the Button1 component.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    LicManager: ILicenseManager;
Begin
    LicManager := WinApplication.Instance.LicenseManager;
    If LicManager.IsStandalone Then
        WinApplication.InformationBox("Stand-alone license");
    Else
        WinApplication.InformationBox("Network license");
    End If;
End Sub Button1OnClick;

After executing the example the message with the information about version in use is displayed.

Fore.NET Example

To execute the example, place the Button component named Button1 on the form.

Add links to the Host, Ui, Fore, ForeSystem system assemblies.

The example is a handler of the OnClick event for the Button1 component.

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;
Begin
    Svc := Self.Metabase As IForeServices;
    RunContext := Svc.GetRuntime().Context;
    LicManager := WinApp.Instance[RunContext].LicenseManager;
    If LicManager.IsStandalone Then
        WinApp.InformationBox("Stand-alone license", Null);
    Else
        WinApp.InformationBox("Network license", Null);
    End If;
End Sub;

The example of Fore.NET example execution matches with that in the Fore example.