BLOCKWRITE |
Écriture d'un bloc |
|---|---|
| Virtual Pascal | System |
Syntaxe
| Procedure BlockWrite(fich:File; var x;enrs:LongInt;Var enrs_ecrit:LongInt); |
Paramètres
| Nom | Description |
|---|---|
| fich | Ce paramètre permet d'indiquer l'identificateur de fichier |
| x | Ce paramètre permet d'indiquer le tampon de réception des données |
| enrs | Ce paramètre permet d'indiquer le nombre d'enregistrement à lire |
| enrs_ecrit | Ce paramètre retourne le nombre d'enregistrement écrit |
Description
Cette instruction permet d'effectuer l'écriture d'enregistrement dans un fichier.
Exemple
Voici quelques exemples typiques de l'utilisation de cette fonction :
- Program BlockWriteSamples;
-
- Var
- Handle:File;
- Buffer:Array[0..127]of Byte;
- ByteWrite:LongInt;
-
- BEGIN
- Assign(Handle,'TEST.BIN');
- Rewrite(Handle,1);
- FillChar(Buffer,SizeOf(Buffer),0);
- Buffer[0] := 71;
- Buffer[1] := 76;
- Buffer[2] := 65;
- Buffer[3] := 68;
- Buffer[4] := 73;
- Buffer[5] := 82;
- BlockWrite(Handle,Buffer,SizeOf(Buffer),ByteWrite);
- Close(Handle);
- END.
on obtiendra le résultat suivant dans le fichier «TEST.BIN» :
GLADIR
Dernière mise à jour : Vendredi, le 29 juillet 2016