BLOCKWRITE |
Écrire un bloc |
|---|---|
| Free Pascal | System |
Syntaxe
| Procedure BlockWrite(var f: ;const Buf;Count:Int64;Var Result:Int64); |
| Procedure BlockWrite(var f: ;const Buf;Count:LongInt;Var Result:LongInt); |
| Procedure BlockWrite(var f: ;const Buf;Count:Cardinal;var Result:Cardinal); |
| Procedure BlockWrite(var f: ;const Buf;Count:Word;Var Result:Word); |
| Procedure BlockWrite(var f: ;const Buf;Count:Word;Var Result:Integer); |
| Procedure BlockWrite(var f: ;const Buf;Count:LongInt); |
Paramètres
| Nom | Description |
|---|---|
| f | Ce paramètre permet d'indiquer l'identificateur de fichier. |
| Buf | Ce paramètre permet d'indiquer le tampon de réception des données. |
| Count | Ce paramètre permet d'indiquer le nombre d'enregistrement à lire. |
| Result | Ce paramètre retourne le nombre d'enregistrement écrit. |
Description
Cette instruction permet d'effectuer l'écriture d'enregistrement dans un fichier.
Remarques
- La procédure BlockWrite écrit le nombre d'enregistrements de la mémoire tampon dans le fichier f. Un enregistrement est un bloc d'octets dont la taille est spécifiée par l'instruction Rewrite ou Reset. Si les enregistrements n'ont pas pu être écrits sur le disque, une erreur d'exécution est générée. Ce comportement peut être contrôlé par la directive {$I}.
- En fonction de l'état de la directive {$I}, une erreur d'exécution peut être générée en cas d'erreur. Dans l'état {$I-}, utilisez IOResult pour rechercher les erreurs.
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» :
GLADIRVoir également
Langage de programmation - Free Pascal - Référence de procédures et fonctions - BLOCKREAD
Langage de programmation - Free Pascal - Référence de procédures et fonctions - CLOSE
Langage de programmation - Free Pascal - Référence de procédures et fonctions - REWRITE
Langage de programmation - Free Pascal - Référence de procédures et fonctions - ASSIGN
Dernière mise à jour : Samedi, le 18 juillet 2015