Etwa so?
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.id2 - Right.id2;
end)
);
In meinem Beispiel funktioniert es aber ich habe testweise nur wenig Daten.
Gruß Kostas