TPAUnique

From SCAR Divi Manual
Revision as of 11:50, 14 July 2012 by Freddy (talk | contribs)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to: navigation, search

Definition

procedure TPAUnique(var TPA: TPointArray);

Availability

SCAR Divi 3.28 > Current

Aliases

  • TPARemoveDupl (SCAR Divi 3.26 > 3.35)

Description

This function removes all of the duplicate coordinates in a given TPointArray TPA.

Example

var
  TPA: TPointArray;

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

Output:

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

See Also