Hey,
Ich versuche den Inhalt eines Memefeldes zu sortieren, hier ein Besipiel des Inhalts:
1;Belletristik;Kempowski, Walter;Uns gehts ja noch gold;München;;dtv
2;Jugend;Pressler, Mirjam;Novemberkatzen;Weinheim;1986;Beltz & Gelberg
Nun mein Problem, ich möchte diese Liste nach Titeln sortieren. Mein bisheriger Code sieht so aus:
SQL-Code:
procedure TfMain.Image9Click(Sender: TObject);
var
i : Integer;
sortiert,x,y : String;
begin
For i:=0 to Memo1.Lines.Count-1 do begin
x:=Memo1.Lines[i];
y:=Memo1.Lines[i+1];
If x > y then
begin
sortiert:=Memo1.Lines[i];
Memo1.Lines[i]:=Memo1.Lines[i+1];
Memo1.Lines[i+1]:=sortiert;
end;
end;
end;
Das Problem ist so greift er nur auf die am Begin stehenden Zahlen zu, wie komm ich an dem an 4ter Stelle stehenden Titel ran?
Würde mich über schnelle Hilfe freuen
Gruß eCLips