TPAArea

From SCAR Divi Manual
Revision as of 14:57, 3 July 2011 by Freddy (talk | contribs) (Undo revision 736 by Freddy (talk))
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
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=737"