| Autor |
Beitrag |
Mitmischer 1703
      
Beiträge: 754
Erhaltene Danke: 19
Win 7, Debian
Delphi Prism, Delphi 7, RAD Studio 2009 Academic, C#, C++, Java, HTML, PHP
|
Verfasst: Sa 28.02.09 10:38
Wie erhalte ich die Anzahl von Dateien in einem beliebigen Ordner? Mit einer Findfirst/next Konstruktion und inc(i) oder gibt es dafür eine Routine?
_________________ Die Lösung ist nicht siebzehn.
|
|
DeddyH
Ehemaliges Mitglied
Erhaltene Danke: 1
|
Verfasst: Sa 28.02.09 10:41
Mir ist dafür keine fertige Routine bekannt.
|
|
martin300
      
Beiträge: 186
Erhaltene Danke: 2
|
Verfasst: Sa 28.02.09 11:23
|
|
jaenicke
      
Beiträge: 19346
Erhaltene Danke: 1754
W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
|
Verfasst: Sa 28.02.09 11:25
In der MFT (bei NTFS) wird eine solche Anzahl ja auch gar nicht geführt. Es gibt lediglich einen Index mit einer Liste der Dateien und deren ID in jedem Verzeichnis. Theoretisch würde es also reichen diese Liste ohne weitere Informationen auszulesen. Ich wüsste aber keine API-Funktion dafür, es ist also nicht ganz so einfach und lohnt deshalb für deine Zwecke wohl kaum, denn das würde ja nur ein paar Sekundenbruchteile sparen, wenn es klappen würde...
|
|
Mitmischer 1703 
      
Beiträge: 754
Erhaltene Danke: 19
Win 7, Debian
Delphi Prism, Delphi 7, RAD Studio 2009 Academic, C#, C++, Java, HTML, PHP
|
Verfasst: Sa 28.02.09 12:35
Stimmt  ...
Ich habe vor Dateien Datei für Datei zulöschenund währenddessen eine ProgressBar laufen zu lassen. Mathe:
(Schon gelöschte Dateien):(Insgesamte Dateien)= Fortschritt 
_________________ Die Lösung ist nicht siebzehn.
|
|
DeddyH
Ehemaliges Mitglied
Erhaltene Danke: 1
|
Verfasst: Sa 28.02.09 12:40
Wieso nicht per SHFileOperation, dann übernimmt Windows das für Dich?
|
|
Mitmischer 1703 
      
Beiträge: 754
Erhaltene Danke: 19
Win 7, Debian
Delphi Prism, Delphi 7, RAD Studio 2009 Academic, C#, C++, Java, HTML, PHP
|
Verfasst: Sa 28.02.09 14:44
Uff, hab in der DF nix dazu gefunden. Kannst du mir mal ne Hilfestellung geben?
_________________ Die Lösung ist nicht siebzehn.
|
|
jaenicke
      
Beiträge: 19346
Erhaltene Danke: 1754
W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
|
Verfasst: Sa 28.02.09 14:49
Ich poste mal einfach mal nochmal den Link aus meinem letzten Post in deinem anderen Thread:
www.delphi-treff.de/...ateienverzeichnisse/
Gleich das erste unter Dateioperationen zum Beispiel, oder weiter unten das bereits im anderen Thread genannte "Dateien und Verzeichnisse löschen".
|
|
DeddyH
Ehemaliges Mitglied
Erhaltene Danke: 1
|
Verfasst: Sa 28.02.09 14:53
Oder bei Microsoft nachschauen. Hier sind besonders die Flags in SHFILEOPSTRUCT interessant.
|
|