Difference between revisions of "ReverseATPA"
From SCAR Divi Manual
(Created page with "==Definition== <source lang="scar" lines="false"> procedure InvertATPA(var ATPA: T2DPointArray); </source> ==Availability== SCAR Divi 3.28 > Current ==Description== This functi...") |
|||
| (3 intermediate revisions by the same user not shown) | |||
| Line 1: | Line 1: | ||
==Definition== | ==Definition== | ||
<source lang="scar" lines="false"> | <source lang="scar" lines="false"> | ||
| − | procedure | + | procedure ReverseATPA(var ATPA: T2DPointArray); |
</source> | </source> | ||
==Availability== | ==Availability== | ||
| − | SCAR Divi 3.28 > | + | SCAR Divi 3.36 > Current |
| + | |||
| + | ===Aliases=== | ||
| + | *InvertATPA (SCAR Divi 3.28 > 3.35) | ||
==Description== | ==Description== | ||
| − | This function | + | This function reverses a given [[T2DPointArray]] '''ATPA''' by reversing the order of the arrays contained in within it. |
==Example== | ==Example== | ||
| Line 21: | Line 24: | ||
ATPA[1] := [Point(1, 1), Point(2, 2)]; | ATPA[1] := [Point(1, 1), Point(2, 2)]; | ||
ATPA[2] := [Point(5, 10)]; | ATPA[2] := [Point(5, 10)]; | ||
| − | + | ReverseATPA(ATPA); | |
for i := 0 to High(ATPA) do | for i := 0 to High(ATPA) do | ||
WriteLn(TPAToStr(ATPA[i])); | WriteLn(TPAToStr(ATPA[i])); | ||
Latest revision as of 23:16, 7 September 2012
Definition
procedure ReverseATPA(var ATPA: T2DPointArray);
Availability
SCAR Divi 3.36 > Current
Aliases
- InvertATPA (SCAR Divi 3.28 > 3.35)
Description
This function reverses a given T2DPointArray ATPA by reversing the order of the arrays contained in within it.
Example
var
ATPA: T2DPointArray;
i: Integer;
begin
SetLength(ATPA, 3);
ATPA[0] := [Point(1, 6), Point(5, 4), Point(1, 5)];
ATPA[1] := [Point(1, 1), Point(2, 2)];
ATPA[2] := [Point(5, 10)];
ReverseATPA(ATPA);
for i := 0 to High(ATPA) do
WriteLn(TPAToStr(ATPA[i]));
end.Output:
(5,10) (1,1);(2,2) (1,6);(5,4);(1,5)
