ich wollte mal ein etwas aelteres Projekt mit der aktuellsten PB 5.60 versuchen... allerdings scheitert es an dem Befehl 'SortStructuredArray()'. Im Gegensatz zu 4.61 & 5.31 scheint dieser nun nicht mehr mit multidimensionalen Feldern umgehen zu koennen.
[15:34:19] [ERROR] SortStructuredArray(): Multi-dimensioned Array is Not support by SortArray().
Die Fehlermeldung im LOG bezieht sicher auf 'SortArray()' und da steht auch in der Hilfe 'Multi-dimensioned arrays are not supported'. Dieser Hinweiss findet sich allerdings nicht unter 'SortStructuredArray()' und hat auch bisher mit multidimensionalen Feldern bestens funktioniert.
Hat sich hier was geaendert? Wurde der Befehl 'SortStructuredArray()' geaendert und die Funktion duch einen anderen Befehl ersetzt?
Wenn das so gewollt ist... gibt es einen Ersatz/Workaround?
Dieser (aus der Hilfe) erweiterte Code laeuft unter 4.61 & 5.31 ohne Probleme:
Code: Alles auswählen
Structure Animal
Name$
Speed.l
EndStructure
Dim Animals.Animal(2, 2)
Animals(0,0)\Name$ = "Tiger"
Animals(0,0)\Speed = 10
Animals(1,1)\Name$ = "Jaguar"
Animals(1,1)\Speed = 40
Animals(2,2)\Name$ = "Zebra"
Animals(2,2)\Speed = 30
Debug "***************"
Debug "Sorted by Name"
Debug "***************"
SortStructuredArray(Animals(), 0, OffsetOf(Animal\Name$), #PB_String)
For l= 0 To 2
For k=0 To 2
Debug Animals(k,l)\Name$+" - Speed: "+Str(Animals(k,l)\Speed)
Next
Next
Debug "***************"
Debug "Sorted by Speed"
Debug "***************"
SortStructuredArray(Animals(), 0, OffsetOf(Animal\Speed), #PB_Long)
For l= 0 To 2
For k=0 To 2
Debug Animals(k,l)\Name$+" - Speed: "+Str(Animals(k,l)\Speed)
Next
Next
