Coder Board Community

Der Topic-Name sagt es ja schon eigentlich, ich will die Namen der Dateien eines Verzeichnisses auslesen. Und zwar mit Pascal/Turbo Pascal.

Habt ihr da Tipps zu, wie ich das anfangen muss. Stehe irgendwie vor nem großen Berg und finde im Netz leider kaum was dazu.

Danke im Voraus.

Ich hab das jetzt irgendwie mit FSearch hinbekommen, nachdem ich "dos" includet habe.
Gibbet da noch ne bessere Lösung?

P.S.: Ich hab gestern und heute gesucht, nichts gefunden. Dachte ich poste hier mal und frage euch und was ist. 10 min. später hatte ich was gefunden. So lollig!!!

Ich hab noch ein Problem.

Ich müsste herausfinden, ob der vom Benutzer angegebene String ein Verzeichnis- oder eine Dateiangabe ist und ob diese Datei bzw. der Pfad existiert.

Wenn da einer was hat, wäre ich sehr dankbar. Tipps wären auch schon gut.

Hey, cool, ich werd's gleich mal ausprobieren.
Woher kennst du sowas bzw. wie findest du sowas?? Ich googel hier doch auch immer wie bekloppt rum.

Die Funktion "IsDirectory" benötigt die Unit "JclFileUtils".
Wenn die Unit einfüge kriege ich von FreePascal folgende Fehlermeldung zurück: "Can't find unit JCLFILEUTILS". Wie kann ich die Unit einbinden, wenn das überhaupt geth? Ist ja leider nicht Delphi.

Voll bekloppt. Ich hab noch so nen Problem.
Die Funktion "ExtractFileName" ist scheiße.

Wenn ich
C:\test\lalala\datei.exe
habe, dann bekomme ich von der Funktion "datei.exe" zurück.

Wenn ich
C:\test\lalala\
habe, dann bekomme ich nichts zurück. Soweit so gut.

Wenn ich aber
C:\test\lalala
habe, dann bekomme ich als Rückgabewert "lalala". Wie blöde ist das denn? Dann prüft diese Funktion also nur auf das erste Backslash von hinten und fertig ist, oder was? Mano!!

Hi Ephraim,

Quoted

Original von Ephraim
Übrigens lalala is in deinem Pfad durchaus ein Dateiname .... oder
kannst du an sowas erkennen (ohne aufs Dateisystem zuzugreifen) ob des ein
Verzeichnis oder eine Datei ist. Und die Funktion heißt halt einfach nur ExtractFileName Augenzwinkern.

Aber ich dachte die Funktion prüft vielleicht noch auf Dateiendung und/oder den Punkt. Ich würde auch aufs Betriebssystem zurückgreifen, wenn ich wüsste wie. Es soll später glaube ich nur unter Windows lauffähig sein, bin mir da aber nicht ganz sicher.

Was Delphi angeht, so ist meine Aufgabe mit "FreePascal" (DevPascal) zu arbeiten, ausgesucht habe ich mir den Scheiß bestimmt nicht selbst. Hier gibt es nämlich alle möglichen Funktionen nicht und man sucht nur dumm rum.

Zu JCL: Man bin ich blöde. Steht doch drunter...
VCL (Visual Component Library): Komponenten und Units, die bei Delphi zum Lieferumfang gehören. Nicht alle Units sind in allen Versionen enthalten.
JCL (JEDI Code Library): kostenlose Open Source-Bibliothek von Project JEDI. Weitere Infos.

Naja, kann ich die JCL dann abhacken denn "Einsetzbar ist die Bibliothek ab Delphi 5, frühere Versionen wurden nicht getestet.". D.h. unter FreePascal wird die wohl sehr wahrscheinlich nicht laufen. Ich wüsste auch gar nicht, wie ich Units einbinden kann. Sind die nicht im Compiler integriert?

Naja, jetzt steh ich jedenfalls wieder am Anfang und selbst die Funktion "ExtractFileName" muss ich nun selber schreiben.

Hey, die Seite ist cool. Endlich mal Units die auch FreePascal unterstützt.
Wie man ne Unit im Quelltext einbindet wusste ich ja "Uses ...", hab da auch "Crt, SysUtils und DOS" eingebunden. Das Problem war immer, wenn man ne neue Unit runtergeladen hat, dass ich nichts mit dem Heruntergeladenen anfangen konnte. Wusste nicht, wo ich es bei "Dev-Pascal" hinschieben/-kopieren sollte.
Die DOS-Unit ist aber Standard und somit schon fest integriert. Den Befehl "GetFAttr" kannte ich aber noch nicht, werde ihn aber mal testen.

big thx, piep