Hallo!
Also ich hab ein Sortierprogramm für eine Listbox mit integer Zahlen geschrieben,und möchte das jetzt auf einen String übertragen. Also eine Listbox mit Buchstaben, die dann sortiert wird.
Ich weiß, dass man das gleich auf sorted=true stellen kann, ich benutz aber verschiedene Sortiermethoden und will die geschwindigkeiten vergleichen können und sowas.
So, Problem: es werden nur die ersten Buchstaben, also alle 'a' "sortiert" angezeigt.
Ich hab nicht so viel mit strings am Hut: ist ansicomparestr das richtige hier?
hier mein Versuch:
Delphi-Quellcode:
var i, j: integer; Merke : string;
begin
i:=2;
while i < Laenge do
begin
i:=i+1;
Merke:= Zahl[i]; //einen Buchstaben merken
j:= i;
while ((j > 1)and (ansicomparestr(Zahl[j-1], Merke)> 0 )) do // die beide Buchstaben vergleichen
begin
// Beide Buchstaben miteinader vertauschen
Zahl[j] := Zahl[j-1];
j := j-1;
end;
//Gemerkten Buchstaben auf korrekten Platz setzen
Zahl[j] := Merke;
end;
Zahl[] ist eig Buchstabe []... muss ich noch ändern
Danke schonmal!