ATPAArea

From SCAR Divi Manual
Jump to: navigation, search

Definition

function ATPAArea(const ATPA: T2DPointArray): Integer;

Availability

SCAR Divi 3.28 > Current

Description

Returns the size of the area covered by a given T2DPointArray ATPA.

Example

var
  ATPA: T2DPointArray;
  w, h: Integer;

begin
  SetLength(ATPA, 3);
  ATPA[0] := [];
  ATPA[1] := [Point(1, 1), Point(2, 2)];
  ATPA[2] := [Point(5, 10)];
  WriteLn(ATPAArea(ATPA));
end.

Output:

50

See Also