
Danke und Gruß,
Stonedar
Stonedar hat geschrieben:Blöde Sache, naja was soll man machen
Danke und Gruß,
Stonedar
Code: Alles auswählen
atest
atest
atest
test2
test
test3
test4
test2
test2
test4
test2
Johann Wolfgang von Geothe hat geschrieben:Wie dieses oder jenes Wort geschrieben wird, darauf kommt es doch eigentlich nicht an, sondern darauf, daß die Leser verstehen, was man damit sagen wollte.
Code: Alles auswählen
; Structure ist in jaPBe enthalten
; bei Verwendung von jaPBe entsprechend auskommentieren
Structure STRING
s.s
EndStructure
NewList Daten.STRING()
For i=0 To 10
AddElement(Daten())
Read Daten()\s
Next i
; SortList(Daten(),3)
SortStructuredList(Daten(), 2, OffsetOf(String\s), #PB_Sort_String)
ForEach Daten()
Debug Daten()\s
Next
DataSection
Data.s "atest","atest","atest","test2","test","test3"
Data.s "test4","test2","test2","test4","test2"
EndDataSection
Code: Alles auswählen
atest
atest
atest
test
test2
test2
test2
test2
test3
test4
test4
Code: Alles auswählen
Structure x
key.s
EndStructure
NewList Daten.x()
For i=0 To 10
AddElement(Daten())
Read Daten()\key
Next i
SortStructuredList(Daten(), 2, OffsetOf(x\key), #PB_Sort_String)
;SortList(Daten(),0)
ForEach Daten()
Debug Daten()\key
Next
DataSection
Data.s "atest","atest","atest","test2","test","test3"
Data.s "test4","test2","test2","test4","test2"
EndDataSection
Diese StructureMr.X hat geschrieben:...
Aber zurück zum Thema; der o.a. Code geht bei mir unter v3.93 leider auch nicht
...
Code: Alles auswählen
Structure STRING
s.s
EndStructure