![]() |
Re: Unterordner und deren unterordner
In dem von "waub" verlinkten Thema (das über meinen Link auch aufgelistet wird) ist auch die Abbruchbedingung vorhanden. Das muss bei der Rekursion auch immer so sein, sonst ruft sich die Funktion so lange auf, bis es Speicherprobleme gibt.
Delphi-Quellcode:
Die Funktion ruft sich somit nur dann selbst wieder auf, wenn ein Unterverzeichnis gefunden wurde.
if SR.Attr and faDirectory = faDirectory then // Verzeichnis wurde gefunden
if (SR.Name <> '.') and (SR.Name <> '..') then // Verzeichnis ist nicht das aktuelle "." und nicht das übergeordnete ".." Verzeichnis FindAllFiles(RootFolder + SR.Name, Mask, Recurse); // rekusriver Aufruf Übrigens finde ich deine Einstellung super. :thumb: Das ist bei weitem nicht selbstverständlich. Es gibt hier welche, die wollen fertige Lösungen und diese ohne nachzudenken per Copy&Paste übernehmen. Und dann kommen ständig Fragen, wieso dies und jenes nicht funktioniert, wie man den Code ändern muss etc. Deine Einstellung sollten alle haben. Du lernst dadurch viel und kannst später auch selbst Probleme lösen. So macht es Spaß und da helfe ich dann auch gerne. Grüße, Matze |
Re: Unterordner und deren unterordner
Zitat:
|
Re: Unterordner und deren unterordner
Zitat:
![]() |
Re: Unterordner und deren unterordner
das weiß ich schon, aber dieses betrifft nur UNC-Pfade und diese nutzt fast keiner...
es leben die alten DOS-Pfade :roll: |
Re: Unterordner und deren unterordner
Zitat:
|
Re: Unterordner und deren unterordner
OK, es geht mit mindestens diesem \\.\X:\...
Bei X:\... geht es nur bis MAX_PATH und genau so machen es sehr viele auch. Und es kommt wohl recht selten vor, daß vorallem Privatanwender mal 'ne größere Pfadtiefe bei sich vorliegen haben :stupid: |
Re: Unterordner und deren unterordner
Zitat:
|
Re: Unterordner und deren unterordner
Liste der Anhänge anzeigen (Anzahl: 1)
ach was, da schmuggelt man einfach nur ein "böses" Zeichen in den Dateinamen und schon drehen noch mehr Programm durch
ein * macht sich da immer gut |
Alle Zeitangaben in WEZ +1. Es ist jetzt 20:30 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz