TPAFilterPoints

Definition

procedure TPAFilterPoints(var TPA: TPointArray; const FilterTPA: TPointArray);

Availability

SCAR Divi 3.26 > Current

Description

Filters a TPointArray TPA by removing all coordinates that are part of the given TPointArray FilterTPA.

Example

var
  TPA: TPointArray;

begin
  TPA := [Point(0, 0), Point(2, 2), Point(2, 3), Point(5, 10), Point(2, 2)];
  WriteLn('Unfiltered TPointArray: ' + TPAToStr(TPA));
  TPAFilterPoints(TPA, [Point(2, 2)]);
  WriteLn('Filtered TPointArray: ' + TPAToStr(TPA));
end.

Output:

Unfiltered TPointArray: (0,0);(2,2);(2,3);(5,10);(2,2)
Filtered TPointArray: (0,0);(2,3);(5,10)

See Also

• TPAFilterBoxes
• TPARemovePoint
• TPARemovePointEx