Difference between revisions of "TPARemovePointEx"

From SCAR Divi Manual
Jump to: navigation, search
Line 27: Line 27:
 
==See Also==
 
==See Also==
 
*[[TPARemovePoint]]
 
*[[TPARemovePoint]]
*[[TPARemove]]
+
*[[TPADelete]]
 
*[[TPARemoveDupl]]
 
*[[TPARemoveDupl]]
 
*[[TPAAppend]]
 
*[[TPAAppend]]

Revision as of 09:53, 24 October 2011

Definition

procedure TPARemovePointEx(var TPA: TPointArray; const Point: TPoint; const All: Boolean);

Availability

SCAR Divi 3.26 > Current

Description

Removes the last occurrence of a given TPoint Point in a TPointArray TPA if All is false. If All is true, it will remove every occurrences of Point.

Example

var
  TPA: TPointArray;

begin
  TPA := [Point(0, 0), Point(2, 2), Point(4, 5), Point(2, 2), Point(5, 10)];
  TPARemovePointEx(TPA, Point(2, 2), True);
  WriteLn('TPointArray: ' + TPAToStr(TPA));
end.

Output:

TPointArray: (0,0);(4,5);(5,10)

See Also