Seite 1 von 1
Problem mit SortStructuredList
Verfasst: 25.08.2021 02:56
von argus
Beim Versuch im folgenden Code mit SortStructuredList zu arbeiten, bekomme ich immer für die letzte Zeile vom Syntaxchecker den Fehler: "Struktur nicht gefunden: dsn":
Code: Alles auswählen
Structure dset
name$
datum.l
EndStructure
NewList dsn.dset()
Repeat
file$=ProgramParameter()
If file$="" : Break : EndIf
If UCase(GetExtensionPart(file$))<>"JPG" : Continue : EndIf
path$=GetPathPart(file$)
AddElement(dsn())
dsn()\name$=GetFilePart(file$,#PB_FileSystem_NoExtension)
dsn()\datum=GetFileDate(file$,#PB_Date_Modified)
ForEver
SortStructuredList(dsn(),#PB_Sort_Ascending,OffsetOf(dsn\datum),TypeOf(dsn\datum))
Ich sehe den Fehler nicht! Kann mir jemand helfen?
Re: Problem mit SortStructuredList
Verfasst: 25.08.2021 03:05
von jacdelad
Hallo,
du musst die Struktur, nicht die Liste, angeben:
Code: Alles auswählen
Structure dset
name$
datum.l
EndStructure
NewList dsn.dset()
Repeat
file$=ProgramParameter()
If file$="" : Break : EndIf
If UCase(GetExtensionPart(file$))<>"JPG" : Continue : EndIf
path$=GetPathPart(file$)
AddElement(dsn())
dsn()\name$=GetFilePart(file$,#PB_FileSystem_NoExtension)
dsn()\datum=GetFileDate(file$,#PB_Date_Modified)
ForEver
SortStructuredList(dsn(),#PB_Sort_Ascending,OffsetOf(dset\datum),TypeOf(dset\datum))
Nachtrag: Ach komm, jetzt hab ich dir schon so schnell mitten in der Nacht geantwortet und du haust ab.
Re: Problem mit SortStructuredList
Verfasst: 25.08.2021 03:31
von argus
Hey, danke dir.
Re: Problem mit SortStructuredList
Verfasst: 25.08.2021 03:36
von argus
Hatte nicht mit einer so schnellen Antwort gerechnet ...
Re: Problem mit SortStructuredList
Verfasst: 25.08.2021 04:11
von jacdelad
Hehe, ich schlafe nur 3 Stunden pro Woche. Bzw. ich hab Nachtschicht.