Hey zusammen
Ich habe irgendwie einen komigen Fehler, da er eigentlich dies hier in der richtigen Reihenfolge machen müsste.
Sprich: test3,test2,test1
Mein Skript sortiert es aber falsch... :
Spoiler anzeigen
#include <Array.au3>
guicreate("test",100,100)
$tray=GUICtrlCreateList("",0,0,100,60)
GUISetState()
dim $array[3]=["test1","test3","test2"]
$array=_ArraySortByString($array,"test3")
GUICtrlSetData($tray,"")
For $i=0 To UBound($array)-1
ConsoleWrite($array[$i]&"|")
GUICtrlSetData($tray,$array[$i]&"")
Next
Sleep(5000)
[/autoit] [autoit][/autoit] [autoit]Func _ArraySortByString($array,$func)
Dim $return[1]=[""]
_ArraySort($array)
For $i=0 To UBound($array)-1
$array=_ArrayShiftLeft($array)
If StringInStr($func,$array[0]) Then $return=$array
Next
Return $return
EndFunc
Func _ArrayShiftLeft($array)
$z=UBound($array)
Dim $return[$z]
For $i=0 To $z-1
If $i-1<0 Then
$u=$z-1
Else
$u=$i-1
EndIf
$return[$u]=$array[$i]
Next
Return $return
EndFunc
Thx4Help