Sortieren in Listbox

[Yader22]

Hallo,
muss in einer listbox eine sortierte Artikelliste ausgeben,aber es werden nicht alle werte sortiert!!!
Was könnte ich als anweisung nehmen????

[ibp]

was hast du bisher genommen?

[alcaeus]

Hallo Yader22,

Zitat von Yader22:

muss in einer listbox eine sortierte Artikelliste ausgeben,aber es werden nicht alle werte sortiert!!!
Was könnte ich als anweisung nehmen????

ich gehe mal davon aus, dass du bereits einen Algorithmus eingebaut hast, da du sagst, es wuerden nicht alle Werte sortiert werden. Ohne Code zu sehn koennen wir eigentlich nur raten was falsch ist Guck dir mal Daniels Sortieralgorithmen-Tutorial an. Dort solltest du was finden.

Greetz
alcaeus

[Yader22]

Ich habe es über eine if anweisung geschreiben,falls der ein wert größer als ein wert der schon vorher bezogen worde,wird dieser über eine andere Variable ausgetauscht!Gibt es vielleicht eine sort anweisungung welche besser geeignet wäre?

[Sharky]

Warum nicht einfach:

ListBox1.Sorted := True;

[Luckie]

Ja, nun zeigt doch mal Code, ist doch wohl offensichtlich, dass da ein Fehler in deiner Implementation ist.

[Yader22]

Delphi-Quellcode:

for j:=i+1 to Anzahl do
   begin
   if((Artikelliste[i].Bestand*Artikelliste[i].Preis)
    <((Artikelliste[j].Preis*Artikelliste[j].Preis)))
      then
      begin
      tauschen:=Artikelliste[i];
      Artikelliste[i]:=Artikelliste[j];
      Artikelliste[j]:=tauschen;

[edit=Luckie]Delphi-tags ergänzt. Bitte beim nächsten Mal selber machen. Mfg, Luckie[/edit]

[Totti]

Ist das net grzndsätzlich nen Bubbler?
Müsste halt noch ne 2. Schleife drüber dann ... weil so wird ja nur einmal drchlaufen - wenn ich nicht grad wieder nen Knick in meiner Optik hab

[Yader22]

die zweite schleife ist drüber,aber der fehler bleibt bin nicht unbedingt die leuchte beim programmieren sondern brach das wegen meiner belegarbeit