TObjectList sortieren funktioniert nicht

[Brainstalker]

Hm Ok stimmt, irgendwie klar. Hatte bloß den Code den ich oben gepostet hatte hier im Forum gefunden. Ich hatte den bloß ein bisschen modifiziert, sollte angeblich aus der Delphi Hilfe gewesen sein.
Vielleicht hab ich auch nur was durcheinander gebracht, egal jetzt geht es dankeschön!