Difference between revisions of "OffsetATPA"

From SCAR Divi Manual
Jump to: navigation, search
(Created page with "==Definition== <source lang="scar" lines="false"> procedure OffsetATPA(var ATPA: T2DPointArray; const XOffset, YOffset: Integer); </source> ==Availability== SCAR Divi 3.28 > Cur...")
 
(No difference)

Latest revision as of 19:03, 24 October 2011

Definition

procedure OffsetATPA(var ATPA: T2DPointArray; const XOffset, YOffset: Integer);

Availability

SCAR Divi 3.28 > Current

Description

Offsets the points in every subarray of the given T2DPointArray ATPA using the OffsetTPA function.

Example

var
  ATPA: T2DPointArray;
  i: Integer;

begin
  SetLength(ATPA, 2);
  ATPA[0] := [Point(1, 6)];
  ATPA[1] := [Point(5, 6), Point(0, 0), Point(1, 1)];
  OffsetATPA(ATPA, 3, 2);
  for i := 0 to High(ATPA) do
    WriteLn(TPAToStr(ATPA[i]));
end.

Output:

(4,8)
(8,8);(3,2);(4,3)

See Also