Difference between revisions of "TPAEdge"
From SCAR Divi Manual
(Created page with "==Definition== <source lang="scar" lines="false"> procedure TPAEdge(var TPA: TPointArray); </source> ==Availability== SCAR Divi 3.37 > Current ==Description== Filters all po...") |
(No difference)
|
Latest revision as of 13:48, 10 November 2012
Contents
Definition
procedure TPAEdge(var TPA: TPointArray);
Availability
SCAR Divi 3.37 > Current
Description
Filters all points out of the given TPointArray TPA which aren't edge-points. Edge-points are points that are on the edge of the TPA, not completely surrounded by other points.
Example
var TPA: TPointArray; begin TPA := TPAFromBox(Box(1, 1, 3, 3)); TPAEdge(TPA); WriteLn(TPAToStr(TPA)); end.
Output:
(1,1);(1,2);(1,3);(2,3);(3,3);(3,2);(2,1);(3,1)
