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

GETDIR	Demande le répertoire
Turbo Pascal 3+	System

Syntaxe

Procedure GetDir(unite:Integer;Var reper:String);	Version 3
Procedure GetDir(unite:Word;Var reper:String);	Version 4 à 7

Paramètres

Nom	Description
reper	Ce paramètre permet de retourner le répertoire courant
unite	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 connaître le répertoire courant de l'unité spécifié avec une chaîne de caractères de format standard Pascal.

Remarques

Le paramètre unite est une expression de type entier et reper est une variable de type chaîne de caractères. Le répertoire actuel de l'unité de disque spécifié par unite est renvoyé dans reper. Le paramètre unite = 0 indique l'unité de disque actuel, 1 indique l'unité de disque A, 2 indique l'unité de disque B,...
La procédure GetDir n'effectue aucune vérification d'erreur en soi. Si l'unité de disque spécifié par unite n'est pas valide, reper renvoie «\», comme s'il s'agissait du répertoire racine de l'unité de disque non valide.

Exemple

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



				
Program GetDirSamples;

         

Var

 S:String;

         

BEGIN

 ChDir('C:\WINDOWS');

 GetDir(0,S);

 WriteLn('Repertoire courante = ',S);

END.

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

Repertoire courante = C:\WINDOWS

Voir également

Langage de programmation - Turbo Pascal - Référence de procédures et fonctions - GETCURDIR

Référence

Aide-mémoire de Turbo Pascal versions de 3 à 6, Edition Marabout, De Groote, Virga, 1992, ISBN: 2-501-01833-8, page 202.
Le grand livre du Turbo & Borland Pascal 7.0, Edition Micro Application, Reiner Scholles, 1993, ISBN: 2-86899-873-9, page 1239.

Dernière mise à jour : Dimanche, le 25 janvier 2015

Section courante

A propos

Section administrative du site

GETDIR