Lazarus 2.0.8 (2020.04.16.)
Letöltés

question-circle Synapse TTCPBlocksocket TFileStream

  • Gábor
  • Gábor profilkép
  • Adminisztrátor
  • Adminisztrátor
  • Hozzászólások: 432
  • Karma: 8
  • Köszönetek: 70

Gábor válaszolt a témára: Synapse TTCPBlocksocket TFileStream

Í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.
#2384

  • Gábor
  • Gábor profilkép
  • Adminisztrátor
  • Adminisztrátor
  • Hozzászólások: 432
  • Karma: 8
  • Köszönetek: 70

Gábor válaszolt a témára: Synapse TTCPBlocksocket TFileStream

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.
#2383

  • Jake012345
  • Jake012345 profilkép
  • Új fórumozó
  • Új fórumozó
  • Hozzászólások: 1
  • Köszönetek: 0

Jake012345 létrehozta a témát: Synapse TTCPBlocksocket TFileStream

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
#2382