Hast du je einen Index auf den zu sortierenden Feldern liegen?
'ne einfache Sortierung eines solchen Arrays ginge z.B. so
Delphi-Quellcode:
Type TArr = Array of String;
TArrArr = Array of TArr;
Var i, k: Integer:
Temp: TArr;
Arr: TArrArr;
For i := 0 to High(Arr) - 1 do
For k := i + 1 to High(Arr) do
If (Arr[i].ArtikelNr > Arr[k].ArtikelNr) or ((Arr[i].ArtikelNr ) Arr[k].ArtikelNr)
and (Arr[i].Lieferdatum > Arr[k].Lieferdatum)) Then Begin
Temp := Arr[i];
Arr[i] := Arr[k];
Arr[k] := Temp;
End;
Dieses kann man dann auch auf QuickSort und Co. anwenden, fals es immernoch zu langsam ist.
PS: es gab dieses Jahr schonmal so'nen Sortierthread, auch wenn ich ihn grad einfach nicht finden kann.
