Wenn man öfters sortiert, dann kann man die TList auch ableiten und die Sortierung direkt integrieren (override),
bzw. gleich eine Sortierte Liste verwenden, da geht dann das Suchen auch schneller.
Einigen Listen kann man den Comparer auch direkt im Constructor mitgeben.
Und falls man nur einmal an einer Stelle sortieren will und Delphi nicht zu alt ist, dann geht's eventuell auch anonym.
Delphi-Quellcode:
myList.Sort(function(Item1, Item2: Pointer): Integer;
begin
Result := CompareValue(TMyObject(Item1).ArtNr, TMyObject(Item2).ArtNr);
end);