Discussion :

[Younes Ch]

salut tous le monde,
le problème c'est que lorsque je fais ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

write(f,memo1.lines);

et

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

read(f,x); { x de type tstrings }

j'ai remarqué memo1.lines n'était pas enregistré .

alors que ce que je dois faire, SVP ne me dis pas savetofile parce que cette procédure permet d'enregistrer chaque tstrings dans un fichier et ce que je veux n'est pas ça, car je cherche a enregistrer plusieurs tstrings dans un seul fichier séquentielle

[Rayek]

Et bien, tu prends chaque ligne sur du memo et tu les enregistres une à une avec une boucle. Dans ce cas utilise WriteLnet ReadLn.

Sinon tu crées une TStringList en mémoire, et tu copies tous tes memo dedans et tu sauvegardes la TStringList avec un SaveToFile.

[Younes Ch]

merci bien, mais je suis pas vraiment satisfait je me sens qu'y a d'autre solution meilleur, car c'est un peux fatiguant et je vois que borland est capable de faciliter ça

[ShaiLeTroll]

Tu vois Younes Ch, tu as la même réponse que dans ton autre sujet
probleme avec les memo delphi

As-tu regarder SaveToStream différent de SaveToFile, c'est une fonction plus "ouverte" !
Cela peut te servir pour écrire dans un objet TFileStream, cela serait plus utile pour toi !
Pour un format binaire, il faudrait d'abord écrire la longueur de la chaine puis écrire la chaine, indispensable pour la relecture

Cela me rappel ce vieux sujet de 2008, cela pourrait t'interesser !