Difference between revisions of "TFileStream/fr"

From Free Pascal wiki
Jump to navigationJump to search
m
m
Line 1: Line 1:
 
{{TFileStream}}
 
{{TFileStream}}
 
+
<br>
 +
__TOC__
 +
<br>
 +
=Description=
 
Un '''TFileStream''' est un descendant de [[TStream]] qui lit/écrit ses données depuis/vers un fichier sur disque. Un TFileStream charge l'entièreté des données d'un fichier en mémoire, et vice versa.
 
Un '''TFileStream''' est un descendant de [[TStream]] qui lit/écrit ses données depuis/vers un fichier sur disque. Un TFileStream charge l'entièreté des données d'un fichier en mémoire, et vice versa.
 
+
<br>
 +
=Constantes de création=
 
{| class="wikitable sortable"
 
{| class="wikitable sortable"
 
! Constante !! Décimal !! Description
 
! Constante !! Décimal !! Description
Line 26: Line 30:
 
| Empêche l'écriture si le fichier est déjà ouvert
 
| Empêche l'écriture si le fichier est déjà ouvert
 
|}
 
|}
 
+
<br>
 +
=Lecture de données=
 
Lecture du fichier ''fnam'' :
 
Lecture du fichier ''fnam'' :
 
<syntaxhighlight>
 
<syntaxhighlight>
Line 47: Line 52:
 
end;
 
end;
 
</syntaxhighlight>
 
</syntaxhighlight>
 
+
<br>
 +
=Ecriture de données=
 
Ecriture de ''txt'' dans le fichier ''fnam'' :
 
Ecriture de ''txt'' dans le fichier ''fnam'' :
 
<syntaxhighlight>
 
<syntaxhighlight>
Line 65: Line 71:
 
end;
 
end;
 
</syntaxhighlight>
 
</syntaxhighlight>
 
+
<br>
== Voir aussi ==
+
=Voir aussi=
 
* [[doc:rtl/classes/tfilestream.html|Documentation de TFileStream]]
 
* [[doc:rtl/classes/tfilestream.html|Documentation de TFileStream]]
 
* [[doc:rtl/classes/tstream.html|Documentation de TStream]]
 
* [[doc:rtl/classes/tstream.html|Documentation de TStream]]

Revision as of 21:15, 30 August 2017

Deutsch (de) English (en) français (fr) polski (pl)


Description

Un TFileStream est un descendant de TStream qui lit/écrit ses données depuis/vers un fichier sur disque. Un TFileStream charge l'entièreté des données d'un fichier en mémoire, et vice versa.

Constantes de création

Constante Décimal Description
fmCreate 65280 Crée un nouveau fichier
fmOpenRead 0 Ouvre un fichier en lecture
fmOpenWrite 1 Ouvre un fichier en écriture
fmOpenReadWrite 2 Ouvre un fichier en lecture/écriture
fmShareDenyWrite 32 Empêche l'écriture si le fichier est déjà ouvert


Lecture de données

Lecture du fichier fnam :

function readstream( fnam: string ): string;
var
  strm: TFileStream;
  n: longint;
  txt: string;
begin
  txt := '';
  strm := TFileStream.Create( fnam, fmOpenRead or fmShareDenyWrite );
  try
    n := strm.Size;
    SetLength( txt, n );
    strm.Read( txt[1], n );
  finally
    FreeAndNil( strm );
  end;
  result := txt;
end;


Ecriture de données

Ecriture de txt dans le fichier fnam :

procedure writestream( fnam: string; txt: string );
var
  strm: TFileStream;
  n: longint;
begin
  strm := TFileStream.Create( fnam, fmCreate );
  n := Length( txt );
  try
    strm.Position := 0;
    strm.Write( txt[1], n );
  finally
    FreeAndNil( strm );
  end;
end;


Voir aussi