hallo,
ich brauche hilfe. ich will ein stringgrid sortieren was aus folgendem besteht:
(Name Punkte)
x 50
fgd 100
esg 24
dsg 1
....
das problem ist er sortiert aber nur nach der ersten zahl also steht eine 100 for niedrigeren zahlen... z.b. so sieht es dann bei mir aus
1
100
24
50
er sortiert also nur nach der ersten zahl
bitte helft mir - bin am verzweifeltn
der code:
Delphi-Quellcode:
procedure TForm1.SortierenClick(Sender: TObject);
var i,ii,anzahl:integer;
s:string;
begin
anzahl:=10;
for ii:= 1 to anzahl do
for i:=1 to anzahl do
begin
if tmpraster.Cells[1,i] < tmpraster.Cells[1,i+1] then
begin
s:=tmpraster.cells[1,i];
tmpraster.cells[1,i]:=tmpraster.cells[1,i+1];
tmpraster.cells[1,i+1]:=s;
s:=tmpraster.cells[0,i];
tmpraster.cells[0,i]:=tmpraster.cells[0,i+1];
tmpraster.cells[0,i+1]:=s;
s:=tmpraster.cells[2,i];
tmpraster.cells[2,i]:=tmpraster.cells[2,i+1];
tmpraster.cells[2,i+1]:=s;
end // if end
end // for i:=1
das prob ist bestimmt die überprüfung
if tmpraster.Cells[1,i] < tmpraster.Cells[1,i+1] then
vielen dank leute
korn117
[edit=sakura]Delphi-TAGs gesetzt. Mfg, sakura[/edit]