Sortieren einer TList

Hallo,

Ich habe in Delphi 7 eine TList, die als einträge ein Record haben. Sagen wir, dieser Record heißt TTestRecord und enthält zwei Daten:
Name (String) und
Aufrufe (Integer)

So, und diese TList möchte ich nun mit Hilfe der schon vorhandenen Methode sort nach Aufrufe sortieren. Dazu brauche ich ja eine eigene Vergleichsroutine. Doch mir ist vollig unklar, wie diese aussehn soll und nach intensivem Studium der Hilfe bin ich jetzt völlig verwirrt. Das dort angegebene Beispiel hilft mir gar nicht weiter.

Ich will am Ende eine Liste haben, die nach der Anzahl der Aufrufe sortiert ist. Wie mache ich das?

also folgende deklarationen:

type
 
 PTestRecord = ^TTestRecord;
 
 TTestRecord = record
 Name: String;
 Aufrufe: Integer;
 end;

dann einfach mit:

deineListe.Sort(MySortProc); 

sortieren…

wobei MySortProc so aussehen würde:

function MySortProc(Item1, Item2: Pointer): Integer;
begin
 Result:=PTestRecord(Item1)^.Aufrufe - PTestRecord(Item2)^.Aufrufe;
end;

Danke schön! o.T.
o.T.