Seite 2 von 2

Verfasst: 20.09.2006 17:25
von vonTurnundTaxis
AND51 hat geschrieben: gnozal's
Das ist ohnehin falsch.

Warum kann sich das hier keiner merken?
Bin ich seit zwei Jahren umsonst in diesem Forum aktiv?

Verfasst: 20.09.2006 17:28
von AND51
Kein Witz: ich hoffte, das keiner das mit dem ' merkt... Ich dachte schon, hoffentlich komt vTuT nicht... :lol:
Du hast Recht. Aber ich wollt das einfache angehängt s duch ein vorangehendes ' deutlicher machen.

Verfasst: 20.09.2006 17:35
von vonTurnundTaxis
Dafür gibts [b] [/b] ;)

Verfasst: 20.09.2006 21:02
von man-in-black
Irgendwie schweift ihr vom Thema ab :? .

meine Frage war, ob einer eine Lösung parat hat! :|

Wenn nicht, dann sagt's mir.

Man-in-black

Verfasst: 20.09.2006 21:18
von Tafkadasom2k5
Liste in Array einlesen.
Unten anfangen, Buchstabe 1 von den unteren Beiden lesen. Wenn unterer Buchstabe (oder ASCII-Zahl) kleiner ist als der darüber tauschen. Von vorne anfangen. Und das so oft, wie Einträge in der Liste vorhanden sind.

Pseudocode (ich versuchs mal lauffähig zu halten)

Code: Alles auswählen

anzahl_der_Eintraege.l = (Zahl einsetzen)
Buffer.s = ""
array(anzahl_der_Eintraege).s

for i=anzahl_der_Eintraege to 0 step -1
  if ASC(LEFT(array(i-1),1)) > ASC(LEFT(array(i),1))
    BUFFER = array(i-1)
    array(i-1) = array(i)
    array(i) = BUFFER
    i=1
  endif
next
So überprüft man die ersten Zeichen zumindest... Wie man das mit den Nächsteren macht übrlass ich mal dir (das ist ja ned so schwer- eine For-Schleife dazu und den Left-Befehl durch nen Mid ersetzen ;)

Gr33tz
Tafkadasom2k5

Edit:
Ein Blick in die Hilfe.. ö.ö...
SortArray() tuts auch..Mühen umsonst ;) Egal, aber das prinzip wurde erklärt ^^

Editedit:
Codefehler behoben

Verfasst: 20.09.2006 21:48
von ts-soft
Autom. aufsteigende Sortierung: #LVS_SORTASCENDING
Autom. absteigende Sortierung: #LVS_SORTDESCENDING
Als Flag beim erstellen übergeben, sortiert aber nur nach 1. Spalte,
ansonsten ist ein Beispiel im CodeArchiv, ist aber recht aufwendig.