Insertion-Sort

[Lomion]

Delphi-Quellcode:

Procedure InsertionSort; 
var i,j,v : Integer; 
Begin 
  For i:= 2 To N Do 
  Begin 
    v:= Data[i]; 
    j:= i; 
    While (j > 1) and (Data[j-1] > v) Do 
    Begin 
      Data[j]:= Data[j-1]; 
      dec( j ); 
    End; 
    Data[j]:= v; 
  End; 
End;

soweit sogut dank der suchfunktion aber welche parameter müssen angepasst werden um zB die items einer listbox der größe nach zu ordnen?

<<<< so fühl ich mich grad blick nix mehr 11 stunden schule am tach sind zu viel!

ty for help