PureBoard

Verfasst: **05.09.2022 13:38**

Ich habe hier folgende Zeile:

Files = OpenFileRequester("Open Shader", "", "Shader File (*.txt)|*.png|*.txt", 0)

Diese zeigt mir im Fenster nur PNG Dateien an. Wenn ich nun aber auf *.txt klicke soll es dann nur noch die TXT Dateien Anzeigen.

Was fehlt hier?

Die completten Zeilen:

Code: Alles auswählen

Files = OpenFileRequester("Open Shader", "", "Shader File (*.txt)|*.png|*.txt", 0)
            If Files <> ""
              Files = StringField(Files, 1, #LF$) ; Nur das erste File, wenn es mehrere sind
              AddElement(Shaders())
              Shaders()\ShaderID = LoadShader(#PB_Any, GetFilePart(Files, #PB_FileSystem_NoExtension) + ".txt")
              Shaders()\Name     = GetFilePart(Files, #PB_FileSystem_NoExtension)
              Shaders()\File     = Files
              Shaders()\Check    = 0
              ShaderFile$ = Files
              ShaderFile$ = GetFilePart(Files ,#PB_FileSystem_NoExtension)
              Break
            EndIf
          EndIf

Verfasst: **05.09.2022 14:31**

Im Pattern müssen sich immer der beschreibende Text und die Dateierweiterungen abwechseln. z.B. so:

Code: Alles auswählen

Pattern$ = "Text|*.txt|Bilder|*.png;*.jpg;*.bmp|Musik|*.mp3;*.wav;*.ogg;*.opus"

Verfasst: **06.09.2022 09:29**

Danke - läuft.

Supi

PureBoard

[ Erledigt ] OpenFileRequester Frage

[ Erledigt ] OpenFileRequester Frage

Re: OpenFileRequester Frage

Re: OpenFileRequester Frage