Entwickler-Ecke

Sonstiges (Delphi) - Zahlenstring aufsteigend sortieren


Deerfield - Do 11.05.06 14:59
Titel: Zahlenstring aufsteigend sortieren
Hallo,

wenn ich einen String der Form '012354' habe, wie kann ich den aufsteigend in die Form '012345' sortieren?

Grüße,
Deerfield


Narses - Do 11.05.06 15:04

Moin!

Du kannst einen String auch als array[] of Char betrachten und dann sortieren:

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
var
  MyString: String;
  tmp: Char;

MyString := '41320769';

if (MyString[1] > MyString[2]) then begin
  tmp := MyString[1];
  MyString[1] := MyString[2];
  MyString[2] := temp;
end;

cu
Narses


Deerfield - Do 11.05.06 15:48

Nunja, ich würde gern den String als Parameter an eine Funktion übergeben, da seine Länge variabel ist. Und das ganze muss irgendwie in eine Schleife, damit alle Elemente sortiert werden. Zurückgegeben werden soll der sortierte String. Ich experimentiere gerade mit Arrays rum, aber irgendwie klappt das nicht so richtig...