Difference between revisions of "SortATPAByMiddleEx"

From SCAR Divi Manual
Jump to: navigation, search
(Created page with "==Definition== <source lang="scar" lines="false"> procedure SortATPAByMiddleEx(var ATPA: T2DPointArray; const Point: TPoint); </source> ==Availability== SCAR Divi 3.28 > Current...")
 
(Redirected page to SortATPAByMeanEx)
 
(5 intermediate revisions by the same user not shown)
Line 1: Line 1:
==Definition==
+
#REDIRECT [[SortATPAByMeanEx]]
<source lang="scar" lines="false">
 
procedure SortATPAByMiddleEx(var ATPA: T2DPointArray; const Point: TPoint);
 
</source>
 
  
==Availability==
+
[[Category:Deprecated Functions]]
SCAR Divi 3.28 > Current
 
 
 
==Description==
 
Sorts the given [[T2DPointArray]] '''ATPA''' by the distance of the middle of the points calculated with [[TPAMiddle]] to the [[TPoint]] given in '''Point''' using the fast [http://en.wikipedia.org/wiki/Shell_sort ShellSort] algorithm.
 
 
 
==Example==
 
<source lang="scar">
 
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)];
 
  SortATPAByMiddleEx(ATPA, Point(5, 5));
 
  for i := 0 to High(ATPA) do
 
    WriteLn(TPAToStr(ATPA[i]));
 
end.
 
</source>
 
 
 
Output:
 
(1,6);(5,4);(1,5)
 
(5,10)
 
(1,1);(2,2)
 
 
 
==See Also==
 
*[[SortATPAByMiddle]]
 
*[[SortATPABySize]]
 
 
 
[[Category:Functions]]
 
[[Category:TPA Functions]]
 
[[Category:Array Functions]]
 

Latest revision as of 18:08, 22 November 2012

Redirect to: