Intelligentes BubleSort; sortieren wie im Windows Explorer

[Stevie]

Für XP/Server 2003 gibt's auch folgende Möglichkeit:

Delphi-Quellcode:

function StrCmpLogicalW(P1, P2: PWideChar): Integer;  stdcall; external 'Shlwapi.dll';
function NaturalCompare(List: TStringList; Index1, Index2: Integer): Integer;
begin
  Result := StrCmpLogicalW(PWideChar(List[Index1]), PWideChar(List[Index2]));
end;

Und dann am besten wie schon erwähnt in Verbindung mit CustomSort benutzen.