Hallo und Willkommen in der
DP 
,
das Problem ist nicht, wie Du sortierst, sondern was. Wenn Du beim Vergleichen vorher die Strings in Zahlen umwandelst (StrToInt, StrToFloat), sollte aus der alphanummerischen Sortierung eine nummerische werden (also das, was Du eigentlich bezweckst).
[edit]P.S.: Benutze für Delphi-Code doch bitte die Delphi-Tags (der Button mit dem Helm im Beitragseditor), dann ist er viel besser zu lesen. [/edit]