Re: pascal - binarni soubor

From: Paco (paco@seznam.cz)
Date: 09. 08. 2002, 21:44 CEST


> a to me prave zajima!
> nejde nejakou direktivou nebo necim jinym nastavit aby se ukladaly delky
> tech stringu v zavislosti na pouzite delce? martin

Hmm, tys to zjevne nepochopil. File of string je proste
jen standardni typovy soubor, cili soubor zaznamu o pevne
delce, respektive delce odpovidajici pouzitemu typu. Obecne
tedy file of <type> kde type je nejaka datova struktura
(o pevne delce). Je lhostejne, jde-li o nejakou standardni
strukturu jako treba string, nebo explicitne definovany
typ. A jelikoz typ string ma v Pascalu implicitne delku
256 bytes, je soubor tvoren prave zaznamy o delce 256 bytes,
kde byte 0 obsahuje 'vyuzitou' delku stringu a zbyle bytes
1..255 pak obsahuji text (o delce byte 0) a evtl. zbyla
'prazdna' mista (do delky typu string).

Pokud by ti vadila jen zbytecna delka implicitniho stringu,
kterou v konkretnim pripade nikdy nevyuzijes, deklaruj si
typ stringu o potrebne delce a na tomto typu pak postav ten
soubor (str64:string[64]; .... f:file of str64;  ...)

Jinak nevidim duvod, proc nepouzit textfile, chces-li jenom
ukladat text, respektive obsah stringu. Nic ti prece nebrani
potom k tomu souboru pristupovat jako k netypovemu, nebo
treba file of bytes (char).

Nemuzes-li z nejakeho duvodu pouzit textfile a ukladat do
zcela obecneho souboru vzdycky pouze onu 'vyuzitou' delku
stringu, pouzij netypovy 'binarni' soubor a data ze stringu
do nej zapisuj cyklem pres string. Budes pak ale mit potize
se ctenim takoveho souboru, pokud nebudes vkladane stringy
oddelovat napriklad crlf (cimz vzniknou radky a soubor se
bude chovat jako textfile). Taky muzes ukladat stringy
vcetne byte 0 (delka) a na cteni takoveho souboru si napises
fci, ktera bude tuto strukturu predpokladat a bude moci
cist jednotlive stringy budto ciste sekvencne, nebo 'jakoby'
primym pristupem k n-temu stringu. Jakoby, protoze interne
se bude zase muset k n-temu stringu prokousat sekvencne
podle delek, pocinaje byte 0.

Taky existuje moznost pouzit (tusim od verze TP 7) strukturu
stringu tzv. zero-terminated strings, podobne jako je tomu
treba v C. Jejich support je mozno nastavit v compileru, ale
blizsi podrobnosti RTFM :), protoze jsem to v dobach Pascalu
nepouzival a nevim, jak je to v TP implementovane.

pako Paco. 


______________________________________________________________________
Reklama:
Jak si stoji kurz koruny? http://kurzy.seznam.cz



This archive was generated by hypermail 2.1.2 : 09. 08. 2002, 21:44 CEST