Ecrire dans un fichier txt

Bonjour,

Je veux écrire des données retirées de 2 TEdit et les placé dans un fichier ".txt" dont l'utilisateur peut choisir le quel.

C'est a dire, quand il lance le programme, l'utilisateur écrit le chemin de son fichier ".txt", par exemple : "C:\Temp\toto.txt" et le programme doit ecrire dans ce fichier. J'ai crée ce code:

Code:

---

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

if(Key == VK_RETURN) {   AnsiString asTexteEcrire = "" ; FILE *FileRead = NULL ;   FileRead = fopen("C:\\cLocalisation","a+t") ; asTexteEcrire = edNomEcrire->Text ; asTexteEcrire = asTexteEcrire + "\t\t" ; fprintf(FileRead,asTexteEcrire.c_str()) ;   asTexteEcrire = edPrixEcrire->Text ; asTexteEcrire = asTexteEcrire + "\n" ; fprintf(FileRead,asTexteEcrire.c_str()) ;   asTexteEcrire = "" ; edNomEcrire->Clear() ; edPrixEcrire->Clear() ;   fclose(FileRead) ; }

---

Je ne sais pas pourquoi cela ne fonctionne pas, car le programme se lance sans aucune erreur mais j'ai rien qui se passe.

alors utilise un TMemo

tu met ton texte dedans

et ensuite tu fait Memo->SaveToFile(Nom du fichier)

et cela devrait faire ce que tu attend

J'ai le message: SaveToFile n'est pas un membre de TMemo...

Tu peux essayer cette methode d'écriture dans le fichier qui fonctionne pour moi :

Code:

---

1 2 3 4 5 6 7

AnsiString str = "bla bla bla"; AnsiString chemin = "C:\\cLocalisation";   file = new TFileStream(chemin, fmCreate); file->Write(str.c_str(),strlen(str.c_str())); delete file;

---

Merci pour ta réponse marcootz mais ca ne fonctionne pas... kurul1, est-tu sur de m'avoir donné le bon code ?

Salut,

Ca serait plutot :

Code:

---

Memo->Lines->SaveToFile(MonFichier)

---

A+

Salut,
C'est :

Code:

---

Memo1->Lines->SaveToFile("C:\\cLocalisation.txt");

---

Citation:

---

Envoyé par ero-sennin

Salut,

Ca serait plutot :

Code:

---

Memo->Lines->SaveToFile(MonFichier)

---

A+

---

MonFichier est le nom d'un variable dans laquelle je veux mettre la localisation de mon fichier ?

Oui!

Soit tu stockes dans une variable le chemin de ton fichier, ou tu l'écris directement sans passer par la variable ce qui donnerai :

Code:

---

Memo->Lines->SaveToFile("C:\\TEMP\\toto.txt");

---

Citation:

---

Envoyé par El-Diablo-

kurul1, est-tu sur de m'avoir donné le bon code ?

---

Excuse moi j'ai oublié de préciser

Code:

---

1 2 3

// pour ajouter une ligne dans ton Memo Memo->Lines->Add("Texte")

---

et comme te l'on déjà dit les collègues

Code:

---

1 2 3

//Pour enregistrer le fichier Memo->Lines->SaveToFile(NomFichier)

---

Le seule problème c'est qu'avec cette facon de faire la chose, quand je ferme le programme et que je veux ajouter des données dans le même fichier il efface tout et garde les donnés ajoutés la dernière fois.

J'ai parler trop vite ! Je vais testé ca !

Tu peux charger un fichier dans un Memo également

Code:

---

1 2	Memo->Lines->LoadFromFile(NomFichier);

---

Comment je fais si je veux modifier le texte introduit dans le TMemo avant de l'inscrire dans le fichier ".txt" ?

La propriété Lines de TMemo est un objet TStrings donc tu peux utiliser les propriétés de TStrings pour manipuler les lignes de ton Memo

Par exemple, admettons que tu veux récupérer la 30ème ligne de ton TMemo

Tu fait ceci

Code:

---

1 2	AnsiString Ligne = Memo->Lines->Strings[29];

---

Si tu veux modifier la totalité du texte, tu peux utiliser la propriété Text de ton Memo

n'oubli pas le bouton http://www.developpez.net/forums/ima...ons/resolu.gif
en bas de la page si ton problème est résolu.

J'ai juste encore une question, mon petit programme donne ceci :

http://img530.imageshack.us/img530/5249/commandecv5.jpg

Comment je fais si je veux additioner tout les montants qui sont dans la "colonne" de droite ?

Est-ce que tes lignes on toujours le même format ?

Ecoute j'ai fait différament, j'ai fait comme ceci : J'ai créer un deuxieme TMemo où je mets touts les prix, et j'ai garder l'autre TMemo ou je garde le libellé. Donc il faudrai juste additionner toutes les lignes d'un TMemo. Comment faire ?

C'est plus simple comme tu as fait la, ca pa plus mal
Si tu es sur que ton TMemo ne contient que des chiffres tu peux faire ceci

Code:

---

1 2 3 4 5 6 7 8 9 10

// Somme double Somme = 0.0;   // on balaye l'ensemble des lignes du Memo for(int i = 0; i < Memo->Lines->Count; i++) { // Tu ajoute la valeur Somme += Memo->Lines->Strings[i].ToDouble(); }

---

Après pour être sur de ne pas avoir d'erreur, tu peux tester si ta ligne contient bien un double.

Je pense que ma facon ne va pas jouer après pour l'écriture dans le fichier. Si je reprend ma première facon, oui mes lignes ont toujours le même format, ca fait comme ceci : Libellé + 6 tabulations + prix + retour a la ligne... Ainsi de suite...

Citation:

---

Envoyé par kurul1

C'est plus simple comme tu as fait la, ca pa plus mal
Si tu es sur que ton TMemo ne contient que des chiffres tu peux faire ceci

Code:

---

1 2 3 4 5 6 7 8 9 10

// Somme double Somme = 0.0;   // on balaye l'ensemble des lignes du Memo for(int i = 0; i < Memo->Lines->Count; i++) { // Tu ajoute la valeur Somme += Memo->Lines->Strings[i].ToDouble(); }

---

Après pour être sur de ne pas avoir d'erreur, tu peux tester si ta ligne contient bien un double.

---

Ca fonctione très bien, mais maintenant comment je fais pour ecrire tout dans un fichier, actuellement j'ai ceci :
http://img65.imageshack.us/img65/1442/commandeyk1.jpg

Je veux écrire le libellé + le prix dans un fichier ".txt" ... Mais je sais pas comment faire pour tout concatené !

je te donne un exemple avec une fonction qui reçoit en paramètre le chemin du fichier

Je suppose que le Memo ou tu as les libéllé, c'est Memo1
et celui ou il y a les prix c'est Memo2

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26

void __fastcall TForm1::EcrireFichier(AnsiString CheminFichier) { // Je crée un Memo pour l'enregistrement TMemo *Memo = new TMemo(Form1);   // On balaye l'ensemble des lignes du Memo1 // Memo 1 et Memo2 ont le même nombre de ligne for(int i = 0; i < Memo1->Lines->Count; i++) { // On récupère la ligne de Memo1 AnsiString Ligne1 = Memo1->Lines->Strings[i];   // On récupère la ligne de Memo2 AnsiString Ligne2 = Memo2->Lines->Strings[i];   // On construit la ligne AnsiString Ligne = Ligne1 + Ligne2;   // on ajoute la ligne dans le Memo Memo->Lines->Add(Ligne); }   // On enregistre le fichier Memo->Lines->SaveToFile(CheminFichier); }

---

Salut,

Ce que tu m'as donné à l'aire très correct. C'est une fonction donc ? Si je ne me trompe pas (je précise que ca fait longtemps que je ne fait plus de prog.), une fonction il faut la déclarer comme ceci dans le .h

Code:

---

int EcrireFichier(AnsiString CheminFichier) ;

---

Si je mets cela et que je copie le code que tu m'as donné dans le .cpp cela devrait fonctionner ?

Non tu la déclare comme ceci pour mon exemple

Code:

---

1 2	void __fastcall EcrireFichier(AnsiString CheminFichier);

---

Tu reprend la meme ligne que dans le .cpp en enlevant le TForm1::

Le programme se plante à l'éxecution de cette ligne:

Code:

---

1 2	// on ajoute la ligne dans le Memo Memo->Lines->Add(Ligne);

---

http://img232.imageshack.us/img232/1323/commandery7.jpg

Ok, j'ai oublié une ligne excuse

en dessous de la création du Memo dans la fonction, rajoute cette ligne

Code:

---

1 2	Memo->Parent = Form1;

---

Merci beaucoup de ton aide kurul1. Tout fonctionne très bien !

C'est résolu !

De rien le forum est fait pour ça.