Difference between revisions of "ReverseTPA"

From SCAR Divi Manual
Jump to: navigation, search
 
(4 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 InvertTPA(var TPA: TPointArray);
+
procedure ReverseTPA(var TPA: TPointArray);
 
</source>
 
</source>
  
 
==Availability==
 
==Availability==
SCAR Divi 3.20b > Current
+
SCAR Divi 3.36 > Current
  
 
===Aliases===
 
===Aliases===
*TPAInvert (SCAR Divi 3.26 > Current)
+
*TPAInvert (SCAR Divi 3.26 > 3.34)
 +
*InvertTPA (SCAR Divi 3.26 > 3.35)
  
 
==Description==
 
==Description==
This function inverts a given [[TPointArray]] '''TPA''' by reversing the order of the coordinates contained in within it.
+
This function reverses the order of a given [[TPointArray]] '''TPA'''.
  
 
==Example==
 
==Example==
Line 20: Line 21:
 
begin
 
begin
 
   TPA := [Point(0, 0), Point(2, 2), Point(5, 10)];
 
   TPA := [Point(0, 0), Point(2, 2), Point(5, 10)];
   InvertTPA(TPA);
+
   ReverseTPA(TPA);
 
   WriteLn(TPAToStr(TPA));
 
   WriteLn(TPAToStr(TPA));
 
end.
 
end.

Latest revision as of 21:53, 7 September 2012

Definition

procedure ReverseTPA(var TPA: TPointArray);

Availability

SCAR Divi 3.36 > Current

Aliases

  • TPAInvert (SCAR Divi 3.26 > 3.34)
  • InvertTPA (SCAR Divi 3.26 > 3.35)

Description

This function reverses the order of a given TPointArray TPA.

Example

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

Output:

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

See Also