TPAArea

From SCAR Divi Manual
Revision as of 09:06, 3 July 2011 by Freddy (talk | contribs)
Jump to: navigation, search

Definition

function TPAArea(const TPA: TPointArray): Integer;

Source Code

function TPAArea(const TPA: TPointArray): Integer;
var
  w, h: Integer;
begin
  TPADimensions(TPA, w, h);
  Result := w * h;
end;

Availability

SCAR Divi 3.26 > Current

Description

Returns the size of the area covered by a given TPointArray TPA.

Example

begin
  WriteLn(TPAArea([Point(0, 0), Point(1, 2), Point(5, 4)]));
end.

Output: 

30

See Also

Retrieved from "https://wiki.scar-divi.com/index.php?title=TPAArea&oldid=692"