Rekursion Ordern-Scan (Verständnis-Frage)

Anfängerfragen zum Programmieren mit PureBasic.
Benutzeravatar
Sunny
Beiträge: 290
Registriert: 19.02.2009 06:02

Rekursion Ordern-Scan (Verständnis-Frage)

Beitrag von Sunny »

Also ich hab hier mal ein kleines CodeBeispiel aus dem Forum (rekursieve durchsuchung von Ordnern + alle Unterordner) etwas auf meine Ansprüche angepasst.
Zu diesem Beispiel hab ich mal eine kleine Frage. Erstam der Code:

Code: Alles auswählen

Procedure sucheMusikdateien(pfad.s, List Liste.s(), typ.s="mp3,wma,wav")
  PathAddBackslash_(@pfad) ; Hängt Backslash an, falls nötig
  Protected dir=ExamineDirectory(#PB_Any, pfad, ""), n
  
  If dir
    While NextDirectoryEntry(dir)
      If DirectoryEntryType(dir) = #PB_DirectoryEntry_File
        For n=1 To CountString(typ, ",")+1
          
          If StringField(typ, n, ",") = LCase(GetExtensionPart(DirectoryEntryName(dir)))
            AddElement(Liste())
            Liste()=pfad+DirectoryEntryName(dir)
            
            Break
            
          EndIf
          
        Next
        
        Continue
        
      ElseIf DirectoryEntryName(dir) <> "." And DirectoryEntryName(dir) <> ".."
        sucheMusikdateien(pfad+DirectoryEntryName(dir), Liste(), typ)
      EndIf
      
    Wend
    
    FinishDirectory(dir)
  EndIf
EndProcedure

NewList MeineMucke.s()

sucheMusikdateien("C:\Dokumente und Einstellungen\Admin\Eigene Dateien\", MeineMucke())

ForEach MeineMucke()
   Debug MeineMucke()
Next
Jetzt zu meiner Frage. Also schlagt mich wenn ich falsch liege aber der Befehl "Continue" ist doch in diesem Beispiel absolut überflüssig, da er sowieso am Ende des If-Block's steht oder gibt es einen bestimmten Grund, warum das da steht?
Benutzeravatar
NicTheQuick
Ein Admin
Beiträge: 8809
Registriert: 29.08.2004 20:20
Computerausstattung: Ryzen 7 5800X, 64 GB DDR4-3200
Ubuntu 24.04.2 LTS
GeForce RTX 3080 Ti
Wohnort: Saarbrücken

Re: Rekursion Ordern-Scan (Verständnis-Frage)

Beitrag von NicTheQuick »

Ja, das ist da unnötig. Vielleicht wurde es ja mal in einer vorherigen Version des Codes sinnvoll genutzt.
Benutzeravatar
Sunny
Beiträge: 290
Registriert: 19.02.2009 06:02

Re: Rekursion Ordern-Scan (Verständnis-Frage)

Beitrag von Sunny »

OK, wollt nur nochmal auf Nummer sicher gehen, danke für die Antwort.
Antworten