Discussion :

[jeanmichmuch66]

Bonjour,
dans mon programe j'utilise un fichier externe a mon prog pour y stocker des infos.
je le crée comme suit:

Code :

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

1
2
3
4
AnsiString Chemin;
ForceDirectories(Chemin);
TFileStream * file = new TFileStream(Chemin+"Selection.sel",fmCreate);
delete file;

Mais j'aimerais inclure en "ligne 0"(par exemple) un texte, j'arrive a écrire tout le contenu grace a la fonction SaveToFile mais pour écrire a une ligne bien précise .... je sais pas faire.
Est ce que quelqu'un aurait la solution svp.
Merci

[Gilles Louïse]

Pour un fichier Texte, on passe plutôt par un TStringList, par exemple :

Code :

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

1
2
3
4
5
6
7
TStringList *SL;
 
SL=new TStringList;
SL->Add("j'ajoute une ligne de texte");
SL->Add("j'ajoute une ligne de texte");
SL->SaveToFile("essai.txt");
delete SL;

À bientôt
Gilles

[jeanmichmuch66]

Merci Gilles (si tu permets que je t'appèle ainsi)
Merci de venir encore a ma rescousse.
Mais avec ta solution il n'est pas possible de selectionner la ligne a modifier ou a inserer.
Merci encore.

[Gilles Louïse]

Merci Gilles (si tu permets que je t'appèle ainsi)
Merci de venir encore a ma rescousse.
Mais avec ta solution il n'est pas possible de selectionner la ligne a modifier ou a inserer.
Merci encore.

Mais si, vous avez l'instruction Insert e.g. SL->Insert(0,"bonjour") insère en début de fichier et pour modifier la ligne n on écrit SL->Strings[n]="nouvelle ligne".

À bientôt
Gilles

[jeanmichmuch66]

Encore un grand Merci Gilles.

[Mangacker]

je sais que ça se fait pas tellement mais comme le sigle résolu n'est pas la je le fais quand meme... na

Mais si, vous avez l'instruction Insert e.g. SL->Insert(0,"bonjour") insère en début de fichier et pour modifier la ligne n on écrit SL->Strings[n]="nouvelle ligne".

À bientôt
Gilles

lorsque j'utilise ton code Gilles j'ai un message d'erreur qui je dit:

Indice de liste hors limite (0)

si le numéro de la ligne est à 0

Indice de liste hors limite (1)

si le numéro de la ligne est à 1
...


as-tu une solution??


bye

[Gilles Louïse]

Vous êtes toujours le bienvenu pour poser des questions, si vous n'arrivez pas à faire marcher le code.

Pour utiliser Insert, il faut qu'il y ait déjà des lignes sinon effectivement vous êtes hors limites. C'est pourquoi, dans mon exemple, j'avais déjà fait des Add. Le premier indice des Insert est 0 à condition qu'il y ait dejà des lignes (ou au moins une c'est-à-dire l'indice 0 où l'insertion va avoir lieu). Idem pour Strings[n], vous invoquez une ligne qui doit exister.

À bientôt
Gilles

[corrector]

Code :

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

1
2
TFileStream * file = new TFileStream(Chemin+"Selection.sel",fmCreate);
delete file;

Sans lien direct avec la question (je ne connais pas TFileStream), pourquoi créer TFileStream sur le free-store (avec new)?

Pourquoi pas :

Code :

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

TFileStream file (Chemin+"Selection.sel",fmCreate);

tout simplement?