Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Zählen wie viele Dateien von einer bestimmt Dateiendung vorhanden sind. (https://www.delphipraxis.net/163771-zaehlen-wie-viele-dateien-von-einer-bestimmt-dateiendung-vorhanden-sind.html)

LittleTee 14. Okt 2011 21:31

Zählen wie viele Dateien von einer bestimmt Dateiendung vorhanden sind.
 
Hallöle!

Ich habe ein kleines Problem.

Problem: Ich möchte das mein Programm nach Dateien mit der Endung *.jpg in einem bestimmtem Ordner sucht und die anzahl der Dateien dann als Integer also Zahl wiedergibt. Außerdem soll er die Namen der gefundenen Dateien in Strings speichern. Ist das möglich?

Ich habe schon es schon mit "FileExists" versucht aber bin leider zu keinem Erfolg gestoßen. Die Suche hat mir leider auch nichts gebracht.


Ich hoffe ihr könnt mir helfen ;)

Mit freundlichen Grüßen
LittlTee

jfheins 14. Okt 2011 21:57

AW: Zählen wie viele Dateien von einer bestimmt Dateiendung vorhanden sind.
 
Ja möglich ist das auf jeden Fall.

Um die nächste Frage schon einmal vorweg zu beantworten: Guck dir mal Delphi-Referenz durchsuchenFindFirst und Delphi-Referenz durchsuchenFindNext an, dazu gibt es auch jede Menge Beispiele. Filter auf "*.jpg", jeden Dateinamen in einem Array merken und am Ende gucken wieviele Elemente im Array sind.

himitsu 14. Okt 2011 22:01

AW: Zählen wie viele Dateien von einer bestimmt Dateiendung vorhanden sind.
 
Man könnte wohl auch eine StringListe nehmen, zum Merken und Zählen.

PS: Es schwirren auch mehrere Varianten von FindAllFiles in der DP rum, welche diese StringListe für dich füllen.

LittleTee 14. Okt 2011 22:11

AW: Zählen wie viele Dateien von einer bestimmt Dateiendung vorhanden sind.
 
Danke das mit FindFirst & FindNext funktioniert super!

Nochmal danke ;)


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:01 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz