TArray.Sort sortieren von mehreren Feldern

[Kostas]

Hallo Zusammen,

zum sortieren von Arrays verwende ich gerne die Methode TArray.Sort.
Jetzt habe ich eine Anforderung, innerhalb des Feldes "id" zusätzlich nach einem weiteren Feld "id2" zu sortieren.

Mein Record beinhaltet also id,id2:integer. Es soll zuerst nach id und bei gleicher id nach id2 sortieren.

Ist das mit TArray.Sort möglich?

Delphi-Quellcode:

  TArray.Sort<TNeuTblRecord>( NeuTblArray , TDelegatedComparer<TNeuTblRecord>.Construct(
    function(const Left, Right: TNeuTblRecord): Integer
      begin
        Result := (Left.id - Right.id);
        if Result = 0 then
          Result := Left.id - Right.id;

      end)
  );

Gruß Kostas