[Fichiers] BlockRead/Write et les Strings

Encore moi :D

J'ai un doute sur la fonction BlockWrite et les Strings.

Code:

---

1 2	BlockWrite(f, S, SizeOf(S));

---

Ce code ecrit comment dans le fichiers ?
Il me semble que en memoire un string est u ntableau de char dont S[0] contient la longeur de la chaine et S[1]..S[N] les caracteres.
Comment BlockWrite reagit dan ce cas ?

Il vaudrais pas mieux que je passe par un PChar ? ou bien que j'adapte ma lecture ? (car un BlockRead pour lire un String a besoin d'un SizeOf dont on ne connait pas a l'avance ...)

Bonjour,

Si tu veux sauvegarder/lire des chaînes dans/d'un fichier, pourquoi n'utilises-tu pas le TStrings.SaveToFile / TStrings.LoadFromFile ? C'est plus simple a utiliser non ?

Citation:

---

Envoyé par Jean44

Si tu veux sauvegarder/lire des chaînes dans/d'un fichier, pourquoi n'utilises-tu pas le TStrings.SaveToFile / TStrings.LoadFromFile ? C'est plus simple a utiliser non ?

---

PAr ce que je developpe un format de fichier proprietaire pour ma boite qui contient des Int, des Strings, des Float, etc .. :p

Salut !

Attention avec les strings, qui ne stokent pas leur longueur et sont en fait des pointeurs.
Si tu veux utiliser un bête BlockWrite, alors il faut utiliser des ShortString :

Code:

---

1 2 3 4 5 6

var S: ShortString; f: file; begin ... BlockWrite(f, S, SizeOf(S));

---

Sinon, il faut stocker également la longueur de la chaîne :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

var S: string; Len: Integer; f: file; begin ... Len := Length(S); BlockWrite(f, Len, SizeOf(Len)); BlockWrite(f, Pointer(S)^, Length(S));   ...   BlockRead(f, Len, SizeOf(Len)); SetLength(S, Len); BlockRead(f, Pointer(S)^, Len);

---

@++

ha oki ..... je vois mieux l'astuce.

Pour ce qui est de stoquer le longueur de la chaine pas de pb, je savais ca. mais ce qui me perturbait c'etait le format de la chaine (Taille+chaine indexee a partir de 1)
Bref, je m'embrouillais un peu ...
J'ai meme fini par stoqker la chaine puis les caracteres un a un :/

Merci de ces precisions ;p

Pour l'enregistrement des chaines :
http://alphomega.developpez.com/persauve/