Syntaxe
|
TYPE nomtyp=FILE;
|
|
VAR nomvar=FILE;
|
Paramètres
| Nom |
Description |
| nomtyp |
Ce paramètre permet d'indiquer le nom du type de données. |
| nomvar |
Ce paramètre permet d'indiquer le nom de la variable. |
Description
Ce mot réservé permet de définir une variable de format fichier.
Remarque
- Contrairement au Turbo Pascal, le Free Pascal contient un bogue retournant un code d'erreur 998 si vous lisez un bloc d'octets avec une procédure BlockRead.
La solution est donc d'écrire File of Byte en Free Pascal et File tout simplement dans Turbo Pascal. Ainsi, vous devriez avoir un code source ressemblant à ceci :
- Var
- MonFichier:File{$IFDEF FPC}of Byte{$ENDIF};
- OctetLue:Word;
- Tampon:Array[0..511]of Byte;
- BEGIN
- Assign(MonFichier,'nomdufichier.ext');
- { ... }
- Seek(MonFichier,0);
- BlockRead(MonFichier,Tampon,SizeOf(Tampon),OctetLue);
- { ... }
- Close(MonFichier);
- END.
Dernière mise à jour : Dimanche, le 28 février 2016
