Difference between revisions of "ReverseTPA"
From SCAR Divi Manual
| Line 21: | Line 21: | ||
TPA := [Point(0, 0), Point(2, 2), Point(5, 10)]; | TPA := [Point(0, 0), Point(2, 2), Point(5, 10)]; | ||
InvertTPA(TPA); | InvertTPA(TPA); | ||
| − | WriteLn( | + | WriteLn(TPAToStr(TPA)); |
end. | end. | ||
</source> | </source> | ||
Output: | Output: | ||
| − | + | (5,10);(2,2);(0,0) | |
==See Also== | ==See Also== | ||
Revision as of 11:39, 21 October 2011
Definition
procedure InvertTPA(var TPA: TPointArray);
Availability
SCAR Divi 3.20b > Current
Aliases
- TPAInvert (SCAR Divi 3.26 > Current)
Description
This function inverts a given TPointArray TPA by reversing the order of the coordinates contained in within it.
Example
var TPA: TPointArray; begin TPA := [Point(0, 0), Point(2, 2), Point(5, 10)]; InvertTPA(TPA); WriteLn(TPAToStr(TPA)); end.
Output:
(5,10);(2,2);(0,0)
