Section courante

A propos

Section administrative du site

GETDIR

Demande un chemin
Delphi/Kylix/Lazarus System

Syntaxe

Procedure GetDir(D:Byte; Var S:String);

Description

Nom Description
S Ce paramètre permet de retourner le répertoire courant
D Ce paramètre permet d'indiquer l'unité de disque souhaité :
Valeur Description
0 Cette valeur permet d'indiquer l'unité de disque courante
1 Cette valeur permet d'indiquer l'unité de disque A:
2 Cette valeur permet d'indiquer l'unité de disque B:
3 Cette valeur permet d'indiquer l'unité de disque C:
4 Cette valeur permet d'indiquer l'unité de disque D:
5 Cette valeur permet d'indiquer l'unité de disque E:
6 Cette valeur permet d'indiquer l'unité de disque F:
7 Cette valeur permet d'indiquer l'unité de disque G:
8 Cette valeur permet d'indiquer l'unité de disque H:
9 Cette valeur permet d'indiquer l'unité de disque I:
10 Cette valeur permet d'indiquer l'unité de disque J:
11 Cette valeur permet d'indiquer l'unité de disque K:
12 Cette valeur permet d'indiquer l'unité de disque L:
13 Cette valeur permet d'indiquer l'unité de disque M:
14 Cette valeur permet d'indiquer l'unité de disque N:
15 Cette valeur permet d'indiquer l'unité de disque O:
16 Cette valeur permet d'indiquer l'unité de disque P:
17 Cette valeur permet d'indiquer l'unité de disque Q:
18 Cette valeur permet d'indiquer l'unité de disque R:
19 Cette valeur permet d'indiquer l'unité de disque S:
20 Cette valeur permet d'indiquer l'unité de disque T:
21 Cette valeur permet d'indiquer l'unité de disque U:
22 Cette valeur permet d'indiquer l'unité de disque V:
23 Cette valeur permet d'indiquer l'unité de disque W:
24 Cette valeur permet d'indiquer l'unité de disque X:
25 Cette valeur permet d'indiquer l'unité de disque Y:
26 Cette valeur permet d'indiquer l'unité de disque Z:

Description

Cette procédure permet de connaitre le répertoire courant de l'unité spécifié avec une chaine de caractères de format standard Pascal.

Exemple

Voici quelques exemples typiques de l'utilisation de cette fonction :

  1. Program GetDirSamples;
  2.  
  3. {$APPTYPE CONSOLE} 
  4. Uses SysUtils;   
  5.  
  6. Var
  7.  S:String;
  8.              
  9. BEGIN
  10.  ChDir('C:\WINDOWS');
  11.  GetDir(0,S);
  12.  WriteLn('Repertoire courante = ',S);
  13. END.

on obtiendra le résultat suivant si le répertoire «C:\WINDOWS» existe :

Repertoire courante = C:\WINDOWS

Voir également

Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - ChDir
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - CreateDir
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - GetCurrentDir
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - ForceDirectories
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - MkDir
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - RemoveDir
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - RmDir
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - SelectDirectory
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - SetCurrentDir

Dernière mise à jour : Mercredi, le 18 février 2015