Es soll ein zweidimensionales Feld nach z.B. Feld(1,x) aufsteigend sortiert werden:
Code: Alles auswählen
Structure struct
Start.l
Stop.l
EndStructure
Dim Feld.struct(2,5)
For i=0 To 2
For j=0 To 5
Feld(i,j)\Start = (8-i)*10+(5-j)*100
Feld(i,j)\Stop = (8-i)*10+(5-j)*100+1
Next j
Next i
SortStructuredArray(Feld(), #PB_Sort_Ascending, OffsetOf(struct\Start), #PB_Sort_Long, 1*(ArraySize(Feld(),2)+1), (1+1)*(ArraySize(Feld(),2)+1)-1)
For i=0 To 2
For j=0 To 5
Debug Str(Feld(i,j)\Start) + " / " + Str(Feld(i,j)\Stop)
Next j
Next i
Debug ArraySize(Feld(), 1)
Debug ArraySize(Feld(), 2)
;Werte für Start und Ende in SortStructuredArray(), wahrscheinlich auch in anderen Sortierroutinen:
;(0,0) -> 1
;(0,1) -> 2
;(0,2) -> 3
;(0,3) -> 4
;(0,4) -> 5
;(0,5) -> 6
;(1,0) -> 7
;(1,1) -> 8
;..........
;(2,5) -> 18
Kann das 'mal jemand in die deutsche Hilfe einfließen lassen? Evtl. diesen Beitrag verschieben.
Danke
Grüße - WPo
----------------------
Aktion: Thread verschoben
Quelle>Ziel: FAQ & Tutorials > Bugs
Begründung: Kein FAQ oder Tutorial-Thema
Datum: 19.05.2009, 16:50
Moderator: Andesdaf
----------------------
