Einzelnen Beitrag anzeigen

Kostas

Registriert seit: 14. Mai 2003
Ort: Gerstrhofen
1.062 Beiträge
 
Delphi 10 Seattle Enterprise
 
#1

TArray.Sort sortieren von mehreren Feldern

  Alt 5. Feb 2017, 18:39
Delphi-Version: 5
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
  Mit Zitat antworten Zitat