InvertTPA

From SCAR Divi Manual
Jump to: navigation, search

Definition

procedure InvertTPA(var TPA: TPointArray);

Availability

SCAR Divi 3.36 > Current

Description

This function inverts a given TPointArray TPA by replacing it by all of the points inside of the array's bounds that were not defined in the array.

Example

var
  TPA: TPointArray;  
  
begin
  TPA := [Point(0, 0), Point(1, 1)];   
  InvertTPA(TPA);
  WriteLn(TPAToStr(TPA));  
end.

Output:

(1,0);(0,1)