Assign |
Assignation |
|---|---|
| HighSpeed Pascal | System |
Syntaxe
| Procedure Assign(var F;name:String); |
Paramètres
| Nom | Description |
|---|---|
| F | Ce paramètre permet d'indiquer l'identificateur de fichier. |
| name | 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
- La procédure Assign permet l'association du nom d'un fichier externe à une variable de fichier.
- Vous devez utiliser cette procédure avant d'appeler reset, rewrite ou append. La chaîne de caractères de nom doit être conforme aux conventions du système d'exploitation AmigaDOS.
- L'attribution du nom externe reste en vigueur jusqu'à ce qu'une autre instruction Assign soit utilisée sur le même fichier ou que la version non standard à deux paramètres de reset, rewrite ou append soit utilisée.
Exemple
L'exemple suivant permet d'effectuer une assignation du fichier spécifié en paramètre de ligne de commande :
- Program AssignSamples;
- Uses DOS;
- Var
- TextF:Text;
- Data:String;
- Begin
- Assign(TextF,ParamStr(1)); { à partir de la ligne de commande }
- {$I-}
- Reset(TextF); { Ouvre le dossier}
- {$I+}
- If (IOresult = 0) Then Begin
- While NOT (Eof(TextF)) do Begin
- Readln(TextF,Data);
- Writeln(Data);
- End;
- Close(TextF);
- End
- Else
- Writeln('Il n''est pas possible d''ouvrir le fichier');
- END.
Dernière mise à jour : Lundi, le 20 avril 2020