Difference between revisions of "TPAFilterBoxes"
From SCAR Divi Manual
(Created page with "==Definition== <source lang="scar" lines="false"> procedure TPAFilterBoxes(var TPA: TPointArray; const Boxes: TBoxArray); </source> ==Availability== SCAR Divi 3.25 > Current ==...") |
(No difference)
|
Revision as of 09:50, 1 July 2011
Contents
Definition
procedure TPAFilterBoxes(var TPA: TPointArray; const Boxes: TBoxArray);
Availability
SCAR Divi 3.25 > Current
Description
Filters a TPointArray TPA by removing all included coordinates that fall within the bounds of any of the boxes specified in the TBoxArray Boxes'.
Example
var
TPA: TPointArray;
TBA: TBoxArray;
begin
TPA := [Point(0, 0), Point(2, 2), Point(2, 3), Point(5, 10)];
TBA := [IntToBox(0, 0, 2, 2)];
WriteLn('Unfiltered TPointArray: ' + TPAToStr(TPA));
TPAFilterBoxes(TPA, TBA);
WriteLn('Filtered TPointArray: ' + TPAToStr(TPA));
end.Output:
Unfiltered TPointArray: (0,0);(2,2);(2,3);(5,10) Filtered TPointArray: (2,3);(5,10)
