Íme néhány példa:

...fpcsrc//fpcsrc/packages/fcl-base/examples/fstream.pp - TFileStream adatfolyam alapok
...fpcsrc//fpcsrc/packages/fcl-base/examples/testz.pp - TFileStream adatfolyam és tömörítés
...fpcsrc//fpcsrc/packages/fcl-base/examples/testz2.pp - TFileStream adatfolyam és GZ tömörítés használata együtt
...fpcsrc//fpcsrc/packages/fcl-base/examples/dparser.pp - TFilestream adatfolyam és TParser használata együtt
...fpcsrc//fpcsrc/packages/fcl-base/examples/testbs.pp - TFileStream adatfolyam kezelése pufferrel

A problémádat a testz.pp és a testz2.pp átnézése után valószínűleg meg fogod tudni oldani.

Ha egy T*Stream osztályú objektumot egy másik objektum használ akkor annak írását és olvasását nem neked kell megoldanod: a használó objektum szükség estén automatikusan hívja a használt (forrás/cél) objektum szükséges eljárásait.

Most hirtelen ezt a minimalista példát javaslom átnézni: wiki.freepascal.org/TFileStream
... de az FPC-vel is települnek minták és tesztkódok.

Helló!

Egy programot írok ami TTCPBlockSocket-tel kapcsolódik egy másik példányához és fájlokat szeretnék küldeni a kapcsolaton keresztül. Sajnos nem sokat sikerült felfognom a TFileStream használatából.
Hogyan kell vele írni/olvasni?

wiki.freepascal.org/TFileStream
www.freepascal.org/docs-html/rtl/classes/tfilestream.html
www.freepascal.org/docs-html/rtl/classes/tfilestream.create.html