Section courante

A propos

Section administrative du site

DIRECTORYEXISTS

 Répertoire existe ?
Free Pascal SysUtils

Syntaxe

Function DirectoryExists(Const Directory:String):Boolean;

Paramètres

Nom Description
Directory Ce paramètre permet d'indiquer le répertoire qu'il faut vérifier la présence.

Description

Cette fonction permet de vérifier qu'un répertoire existe.

Exemple

Voici un exemple montrant comment tester la présence du dossier «C:\WINDOWS» :

  1. Program DirectoryExistsSamples;
  2.  
  3. Uses SysUtils;
  4.  
  5. BEGIN
  6.  If(DirectoryExists('C:\WINDOWS'))Then Begin
  7.   WriteLn('Le dossier par défaut du système d''exploitation de Windows est présent.');
  8.  End
  9.   Else
  10.  Begin
  11.   WriteLn('Le dossier C:\WINDOWS n''existe pas !');
  12.  End;
  13. END.

on obtiendra le résultat suivant s'il existe :

Le dossier par défaut du système d'exploitation de Windows est présent.

Voir également

Langage de programmation - Free Pascal - Référence de procédures et fonctions - FileExists


Dernière mise à jour : Vendredi, le 29 août 2014