INI-Einträge nach Alphabet sortieren

DeepRed92

Hallo,

ich habe eine INI-Datei das so aufgebaut ist:

Code

[index]
Einslive=Senderurl1,Sender1,Genre1,Bewertung1
WDR 2=Senderurl2,Sender2,Genre2,Bewertung2
WDR 3=Senderurl3,Sender3,Genre3,Bewertung3
WDR 4=Senderurl4,Sender4,Genre4,Bewertung4
WDR 5=Senderurl5,Sender5,Genre5,Bewertung5




[Sendername]
Sender1=Einslive
Sender2=WDR 2
Sender3=WDR 3
Sender4=WDR 4
Sender5=WDR 5




[Senderurl]
Senderurl1=http://www.wdr.de/wdrlive/media/einslive-wm32.asx
Senderurl2=http://www.wdr.de/wdrlive/media/wdr2-wm32.asx
Senderurl3=http://www.wdr.de/wdrlive/media/wdr3-wm32.asx
Senderurl4=http://www.wdr.de/wdrlive/media/wdr4-wm32.asx
Senderurl5=http://www.wdr.de/wdrlive/media/wdr5-wm32.asx




[Genre]
Genre1=Top 40
Genre2=Pop
Genre3=Sonstige
Genre4=Mix
Genre5=Kinder




[Bewertung]
Bewertung1=*****
Bewertung2=**
Bewertung3=**
Bewertung4=**
Bewertung5=**

Alles anzeigen

Ja ich weiß, (Mein Radio)...
Wie kann ich alle die Einträge unter Index sortieren?
Mithilfe der Sort.exe?

zemkedesign

Was möchtest du denn genau sortieren und was bringt das Sortieren einer INI-Datei?

DeepRed92

Nun, es wird sortiert, damit alle Einträge in einer Combobox ebenfalls sortiert dargestellt werden.
Es müssen nur die Einträge unter "Index" und Sendername sortiert werden. Aber wie soll man das denn machen?

zemkedesign

Lies lieber die Sektion ein und sortiere anschließend im Array. Dann kannst du dich 100% auf die richtige Reihenfolge verlassen. In der INI kann immer mal jemand rumspielen.

DeepRed92

Meinst du es so? :

[autoit]

#include <Array.au3>

[/autoit][autoit][/autoit][autoit]

$Name = IniReadSection(@ScriptDir & "\Sender.ini", "Sendername")

[/autoit][autoit][/autoit][autoit]

Dim $Zahl[$Name[0][0]]

[/autoit][autoit][/autoit][autoit]

For $1 = 1 To $Name[0][0]
$Zahl[$1 - 1] = $Name[$1][1]
Next

[/autoit][autoit][/autoit][autoit]

_ArraySort($Zahl)
_ArrayDisplay($Zahl)

[/autoit]

Dietmar

evtl. besser ubound benutzen ?

Hier Beispiel aus der Hilfe für ubound

Dim $myArray[10][20] ;element 0,0 to 9,19
$rows = UBound($myArray)
$cols = UBound($myArray, 2)
$dims = UBound($myArray, 0)

MsgBox(0, "The " & $dims & "-dimensional array has", _
$rows & " rows, " & $cols & " columns")

;Display $myArray's contents
$output = ""
For $r = 0 to UBound($myArray,1) - 1
$output = $output & @LF
For $c = 0 to UBound($myArray,2) - 1
$output = $output & $myArray[$r][$c] & " "
Next
Next
MsgBox(4096,"Array Contents", $output)

prizma

So geht es auch:

[autoit]

$foo = IniReadSection($file, "bar")
If Not @error Then _ArraySort($foo)

[/autoit]

Edit: Huch hast es ja schon gelöst

DeepRed92

Ja habs jetzt gelöst. Thx