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.

CurrentViewport

CurrentViewport



Gets the Upper right and lower left points of the viewport.



Syntax:

Procedure: CurrentViewport;

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 PlanSwift Object Model
//PlanSwift code:
var
  oLine : ILine;
begin
  oLine := PlanSwift.CurrentViewport();
end;



//FreshDesk code:
procedure TForm1.psCurrentViewPort(Sender: TObject);
var
  ps: IPlanSwift;
  psline: ILine;
  pg,d: IItem;
 
begin
  //Create Planswift Interface
  ps := coPlanswift.Create;
  //Get Current Viewport size and store it into a line
  psline := ps.CurrentViewport;
  // Get the current page in the viewport
  pg := ps.SelectedPage;
  //Add a dimension to the current page
  d := pg.NewItem('Dimension','ViewPort Dimension');
  //Set the PageGUID of the dimension so that it shows on the proper page
  d.SetPropertyFormula('PageGUID',pg.GUID);
  //Add Start point of the dimension
  d.NewPoint(psline.Point1.X,psline.Point1.Y);
  //Add End Point of the dimension
  d.NewPoint(psline.Point2.Y,psline.Point2.Y);
  //Free the planswift interface
  ps := nil;
end;


C#

Using IItem Object Model
public class PlanswiftApi
{
    private PlanSwift Planswift { get; }
    public PlanSwiftApi()
    {
        Planswift = new PlanSwift();
    }
}
Using PlanSwift Object Model
Coming soon


VB/VBA (OLE)

Using IItem Object Model
Coming soon
Using PlanSwift Object Model
Coming soon

Copyright 2023 ConstructConnect