array mit records sortieren

[sakura]

für kleine Datenmengen wäre der Bubblesort geeignet:

Delphi-Quellcode:

  for i := Low(mannschaft) to Pred(High(mannschaft)) do
    for j := Succ(i) to High(mannschaft) do
      if mannschaft[i].pkt > mannschaft[j].pkt then
      begin
        Hilfe := mannschaft[i];
        mannschaft[i] := mannschaft[j];
        mannschaft[j] := Hilfe;
      end;

......