TPARemovePoint
From SCAR Divi Manual
Definition
procedure TPARemovePoint(var TPA: TPointArray; const Point: TPoint);
Availability
SCAR Divi 3.26 > Current
Description
Removes the last occurrence of a given TPoint Point in a TPointArray TPA. An extended function with additional functionality is available as TPARemovePointEx.
Example
var
TPA: TPointArray;
begin
TPA := [Point(0, 0), Point(2, 2), Point(4, 5), Point(2, 2), Point(5, 10)];
TPARemovePoint(TPA, Point(2, 2));
WriteLn('TPointArray: ' + TPAToStr(TPA));
end.Output:
TPointArray: (0,0);(2,2);(4,5);(5,10)
