To open any link in a new tab, preserving your position in the current article, just hold down the <CTRL> key on your keyboard before clicking the link or click using your mouse wheel.

IsUnlocked - FD

Owned by Former user (Deleted)
Last updated: Sept 11, 2019 by Daniel Wal

IsUnlocked

Checks the product activation status of a plugin. If AllowUnlock is true the user is prompted to Activate if needed.

Syntax:

Function: IsUnlocked(AProduct: String; AMajorVer: Integer; AMinorVer: Integer; AllowUnlock: Boolean): Boolean;

Code Reference:

    • 1. Create a New Form application
    • 2. Add a button to the form
    • 3. Add Planswift to reference (Planswift9_tlb in the uses)
    • 4. Copy code to button onclick event

API Calls

Delphi

Using IItem Object Model 
procedure TForm1.psUnlocked(Sender: TObject);
var
  ps: IPlanSwift;
begin
  ps := CoPlanswift.Create;
  if ps.IsUnlocked('SDK Sample',1,0,false) then
    ShowMessage('You have unlocked your version')
  else
    ShowMessage('You do not have a license for this plugin');
  ps := nil;
end;
Using PlanSwift Object Model

C#

Using IItem Object Model
Using PlanSwift Object Model

VB/VBA (OLE)

Using IItem Object Model
Using PlanSwift Object Model

Pascal Scripting (OLE)

Item Object Model
Root Object Model

Pascal Scripting

Item Object Model


Using the PlanSwift Object Model


Copyright 2023 ConstructConnect