Danke für die Hilfe.
Ich habe jetzt erst einmal dieser Variante
Delphi-Quellcode:
function less (a,b: string): boolean;
begin
less := copy(a,7,2)+copy(a,4,2)+copy(a,1,2) < copy(b,7,2)+copy(b,4,2)+copy(b,1,2)
end;
genutzt. So schnell muss es nicht sein da nur maximal ca. 100 Datensätze sortiert werden müssen.