Syntax

code

Function: PointCount: Integer;

Description

Returns the number of digitizer points for the item.

Code Reference

  • 1. Navigate to Plugin Store->Tool Manager and create a new Plugin
  • 2. Set the plugin type to Script Code and open the Editor
  • 3. Copy Code into the editor
  • 4. press run

code

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

procedure TForm1.psPointCount(Sender: TObject);

var

  ps: IPlanSwift;

  est: IItem;

  itm: IItem;

  sect: IItem;

begin

  //Create the Planswift Interface

  ps := coPlanswift.Create;

  //Get the Estimating Tab

  est := ps.GetItem('Job\Takeoff');

  //Create an Area Item

  itm := est.newItem('Area','Point Count Area');

  //Create a Section to the Area

  sect := itm.NewSection('Point Count Section');

  //Create a box on the selected page

  sect.NewPoint(0,0);

  sect.NewPoint(0,200);

  sect.NewPoint(200,200);

  sect.NewPoint(200,0);

  //Show the Point Count

  ShowMessage(intToStr(sect.PointCount));

  //free Planswift Interface

  ps := nil;

end;