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

ASSIGN	Assigné
Turbo Pascal 1+	System

Syntaxe

Procedure Assign(var fich:File; nomfich:String);

Paramètres

Nom	Description
varfich	Ce paramètre permet d'indiquer l'identificateur de fichier
nomfich	Ce paramètre permet d'indiquer le nom du fichier

Description

Cette procédure permet d'associer un nom de fichier à une variable de type fichier.

Remarques

Le paramètre fich est une variable de fichier de tout type de fichier et nomfich est une expression de type chaîne de caractères. Toutes les opérations ultérieures sur
fich opéreront sur le fichier externe avec le nom de fichier nomfich.
Après un appel à Assign, l'association entre fich et le fichier externe continue d'exister jusqu'à ce qu'une autre affectation soit effectuée sur fich.
Un nom de fichier consiste en un chemin de zéro ou plusieurs noms de répertoire, séparés par des barres obliques inverses, suivis du nom de fichier réel :

Drive:\DirName\ ... \DirName\FileName

Si le chemin commence par une barre oblique inverse, il commence dans le répertoire racine; sinon, il commence dans le répertoire en cours. Drive est un identifiant d'unité de disque (A à Z). Si Drive et les deux-points sont omis, l'unité par défaut est utilisé. \DirName\...\DirName est le répertoire racine et le chemin du sous-répertoire vers le nom du fichier. FileName consiste en un nom de huit caractères au maximum, éventuellement suivi d'un point et d'une extension de trois caractères au maximum. La longueur maximale du nom de fichier complet est de 79 caractères.

Un cas particulier se présente lorsque nomfich est une chaîne de caractères vide, c'est-à-dire lorsque la longueur de nomfich est zéro. Dans ce cas, fich devient associé au fichier d'entrée standard ou au fichier de sortie standard. Ces fichiers spéciaux permettent à un programme d'utiliser la fonctionnalité de redirection d'entrée/sortie du système d'exploitation DOS. Si un nom vide lui est attribué, alors, après un appel à Reset(fich), fich fera référence au fichier d'entrée standard, et après un appel à Rewrite(fich), fich se référera au fichier de sortie standard.
La procédure Assign ne doit jamais être utilisé sur un fichier ouvert.

Exemples

Voici un exemple montrant comme écrire une chaîne de caractères dans le fichier «TEST.TXT» :


				
Program AssignSamples;

 
Var

 Handle:Text;


 
BEGIN

  Assign(Handle,'TEST.TXT');

  Rewrite(Handle);


  Writeln(Handle,'Ecrit cette ligne dans le fichier TEST.TXT');

  Close(Handle);


END.

on obtiendra le résultat suivant dans le fichier «TEST.TXT» :

Ecrit cette ligne dans le fichier TEST.TXT

L'exemple suivant permet de sortir de texte vers la sortie standard (comme par exemple l'écran, l'imprimante,...) :



Program AssignSamples2;

 
Var 

 F:Text;

 
BEGIN

 Assign(F,'');

 Rewrite(F) ;

 Writeln(F,'Sortie standard...');

 Close(F);

END.

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 102 à 103.
Le grand livre du Turbo & Borland Pascal 7.0, Edition Micro Application, Reiner Scholles, 1993, ISBN: 2-86899-873-9, page 1210.

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

Section courante

A propos

Section administrative du site

ASSIGN