boujour j'ai une source en delphi et j'ai un message d'erreur qu'il me met à la compilation.
Le deboggeur s'arrete sur cette ligne.
" if SelectDirectory('Sélectionnez un dossier de fichiers','',Dossier) then "

[Erreur]Dossier.pas(46): Les types des paramètres VAR Originaux et formels doivent être identiques.

En fait, je développe en VB et j'ai besoin de cette source pour l'inclure à mon projet.

Merci pour les réponses. Vincent

Hibi
SelectDirectory(const Caption:string;constRoot:WideString;var Directory:string):Boolean
Cette version permet de choisir le répertoire de départ de la recherche et le titre de la fenêtre.
le parametre Caption est passé a la fonction comme constante

une autre version:
SelectDirectory(var Directory:string;Options:TSelectDirOpts;HelpCtx:Longint):Boolean;
Cette version permet de définir ce qu'il se passe si l'utilisateur choisi un répertoire inexistant.
dans cette version le parametre Directry est passe par adresse
donc respecter le passage des parametres comme indiqué dans la liste des parametres de la fonction.et ca va marcher

Merci de ta réponse, mais malheureusement je n'ai pas tout compris. Est-ce que je pourrais te filer ma source pour que tu puisse m'en dire plus. est-ce qu'il est possible qu'il y ait une différence de version. source en delphi 6 et moi j'ai delphi 7.