TPARemove

Definition

procedure TPARemove(var TPA: TPointArray; const Point: TPoint);

Availability

SCAR Divi 3.28 > Current

• Before SCAR Divi 3.28, TPARemove performed the function of TPADelete.

Aliases

• TPARemovePoint (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 TPARemoveEx.

Example

var
  TPA: TPointArray;

begin
  TPA := [Point(0, 0), Point(2, 2), Point(4, 5), Point(2, 2), Point(5, 10)];
  TPARemove(TPA, Point(2, 2));
  WriteLn(TPAToStr(TPA));
end.

Output:

(0,0);(2,2);(4,5);(5,10)

See Also

• TPARemoveEx
• TPADelete
• TPAUnique
• TPAAppend
• TPAInsert