écriture dans un fichier binaireRésolu

Question

salut &#224; tous!! je voudrais savoir comment ecrire dans un fichier binaire, j'ai atendu dire que cel&#224; me permetrait aussi d'avoir une taille de fichier plus l&#233;ger par rapport &#224; un fichier texte.Quelqu'un pourait m'aider s'il vous plait?mici beaucoup.

cs_Kenavo · Accepted Answer

Tout &#224; fait, Elementalord !



Tu obtiens un fichier typ&#233; qui offre les possibilit&#233;s suivantes



connaitre le nombre d'enregistrements : 

  FileSise(recFich);


Lire directement un enregistrememt : 

  Seek(recFile,n);  

 data :=  read(f);



Si tu veux gagner encore plus de place, tu peux utiliser un  Packed Record , cette notation interdit l'alignement des donn&#233;es : un octet n'occupe qu'un octet et non pas, comme en cas d'alignement, 2, 4 voire 8 octets !

Ton fichier sera alors compatible avec toutes les versions de ton
programme que tu pourrais compiler avec - par exemple - Delphi 4
(alignement sur 2 octets), ou Delphi 7  (alignement sur  8
octets par d&#233;faut !)



L'inconv&#233;nient peut &#234;tre un l&#233;ger ralentissement du programme g&#233;rant des donn&#233;es non align&#233;es.



Les fonctions BlockRead et BlockWrite peuvent &#234;tre utilis&#233;es avec tous
types de fichiers : les donn&#233;es sont &#233;crites ou lues &#224; partir d'un
buffer de ... n'importe quoi (byte, char, word,  ect...).  Il
vaut mieux savoir ce qu'on manipule !...



Ken@vo
<hr size ="2" width="100%">Code, Code, Codec !




http://www.pourflorenceethussein.org/

[%3C/body ]

jlen100 · Answer

salut,

pour ecrire sous forme binaire il te faudra suivre des procedures suivantes:

soit declarer un fichier typ&#233; et utiliser la procedure write;

soit ouvrir le fichier avec rewrite(file,taille_de _l'enregistrement) avec aille_de _l'enregistrement:=1 et utiliser la procedure blockwrite(file,variable,sizeof(variable));

pour lire un tel fichier tu utilise les procedure reset et blockread avec les m&#234;mes parametres.

bonne prog;

cs_Kenavo · Answer

Un fichier binaire, c'est plus court qu'un fichier texte surtout si tu enregistres autre chose de du texte !



Tu peux aussi, si tu n'as qu'un type de donn&#233;es &#224; enregitrer, utiliser
les fichiers typ&#233;s : un fichier de r&#233;els pour enregistrer des r&#233;els, un
fichier de TPoint pour enregistrer des points , etc...



Ken@vo

<hr size="2" width="100%">Code, Code, Codec !




http://www.pourflorenceethussein.org/

[%3C/body ]

elementalord · Answer

ok merci,
est ce que c'est bon si j'ecris cel&#224;:
Type
    TrecData = Record
             Datteheur : TDateTime;
             etat      : string[2];
             omc       : byte;
             country   : byte;
             common    : word;
             system    : word;
             net       : word;
             alarme    : byte;
             rssi      : byte;
             reserve   : byte;
end;
var
  Form1      : TForm1;


  recFich    : file of TrecData;
  data       : TrecData;
c'est bien un fichier typ&#233;?


a propo du blockread et blockwrite ceula concerne les fichier non typ&#233;?

jlen100 · Answer

kenavo je suis d'accord avec toi pour ce qui concerne les lichiers non
typ&#233;s . Mais les instructions blockwrite et blockread permettent de
lire et d'enregistrer des donnees de longueur variable. C'est une fa&#231;on
simple de gerer des donnees contenant des datas et des champs de type
"memo" du genre que l'on trouve pour des fiches produits .

 j.len.

elementalord · Answer

Je vous remercie d'avoir m'aider.Merci encore.

écriture dans un fichier binaire

6 réponses

Votre réponse

Discussions similaires