Buchstaben im String sortieren?

[BungeeBug]

Hi,

ich hätte da ne "schnellere" Idee.

Delphi-Quellcode:

var
 MyStringList : TStringList;
 i : integer;
begin
 MyStringList := TStringList.Create;
 
 for i := 1 to Length(s) do
  begin
   MyStingList.Add(s[i]);
  end;
 
 s := ''; 
 MyStringList.Sort;
 
 for i := 0 to MyStringList.Item.Count -1 do
  begin
   s := s + MyStringList.Item[i];
  end;

 MyStringList.Free;
  
end;

Ist aber grad so aus dem Kopf entstanden. Könnte also sein das ein paar von den Funktionen nicht stimmen oder anders geschrieben werden.