Discussion :

[Houben Jacques]

Existe-t-il une ou des méthodes pour obtenir la liste de tous les fichiers contenus dans un répertoire.
En entrée: un disque, un répertoire, un masque
En sortie:une liste avec le nom de tous les fichiers.

Ceci sans utiliser le composant FilelistBox.
Merci.

[RDM]

FindFirst, FindNext, FindClose

[Houben Jacques]

OK Parfait et merci.

Voici un exemple d'utilisation:

var F: TSearchRec;
..................................
n:=FindFirst('c:\*.dat',faArchive,F);
While n=0 do
begin
//par exemple F.name permet de récupérer le nom;
n:=FindNext(F);
end;
FindClose(F);

[jpminiscloux]

Bonjour,

Je viens d'écrire un petit composant pour Kylix de recherche de fichier inspiré de "FindFile" pour Delphi.
Il permet de rechercher un fichier sur l'ensemble du disque avec masque de saisie.

Si cela interesse quelqu'un !!

A bientôt

Jean-Paul