[ Erledigt ] OpenFileRequester Frage

[udg]

Ich habe hier folgende Zeile:

Code: Alles auswählen

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

[matbal]

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"

[udg]

Danke - läuft.

Supi