BLOCKWRITE |
Écriture d'un bloc |
---|---|
Turbo Pascal pour Windows | System |
Syntaxe
Procedure BlockWrite(fich:File; var x;enrs:Word;Var enrs_ecrit:Word); |
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:Word;
-
- 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 : Dimanche, le 10 décembre 2017