[delphi] Problème lecture-ecriture ds fichier Fermé

Question

Bonjour a tous,

Voila, je voudrai créer un petit programme qui enregistre et lit des variables dans un fichier.
J'ai donc copier quarément la source du programme type carnet d'adresse qui était disponible avec le bouquin de delphi que je me suis acheté.
J'ai juste renomé les variables, j'en ai ausssi ajouté 2.

Cependant j'ai un problème : lorsque je clique sur le bouton "précédent" , impossible de retrouver les valeurs des variables précédement enregistrées.

Vous pourrez trouver les sources de mon petit programme ici :
[url]http://jerome.brianne.free.fr/source/sources.zip[/url]

Je vous remercie beaucoup par avance de m'expliquer comment faire pour arriver à faire marcher ce maudit programme :cry:

Et bonnes fêtes de fin d'année à tous ;)

grofwa · Answer

Salut,

Je ne sais pas si c'est le cas pour les autres, j'aurais bien aimé jeter un coup d'oeil sur ton problème mais le zip file semble corrompu...
Peut-etre le proxy de ma boite qui le pourrit...

Michael.

djédjé-08 · Answer

Merci beaucoup de t'interesser à mon problème :-)

J'ai rebalancé mon fichier ZIP, réessayes si tu veux.
Effectivement il y avait un problème.

Autrement je peux te l'envyer par e-mail si tu veux (il fait 234Ko)

Encore merci de t'interesser à mon problème

grofwa · Answer

Sans vouloir abuser, si tu juste changer le nom, le proxy de ma boite me redonne toujours le meme !!Heureusement qu'on est le 24 et pas grand chose a faire ;-)

grofwa · Answer

Je ne vois pas trop où tu écris dans un fichier dans ton code actuel.Tu peux juste etre un peu plus précis ? Quelle form ?  A quel endroit tu veux faire quoi ?

djédjé-08 · Answer

La procédure d'enregistrement est définie dans la fiche "estim "et dans "estima" :

procedure Enregistre;
{ Enregistrement de l'enregistrement courant }
{ dans le tableau de données Table           }
begin
  Table[NE].N:=Form1.Num.Text;
  Table[NE].D:=Form1.dia13.Text;
  Table[NE].H:=Form1.haut.Text;
  Table[NE].M:=Form1.dmm.Text;
  Table[NE].G:=Form1.surf.Text;
  Table[NE].f:=form1.coef.Text;
  Table[NE].v:=form1.vol.Text;
end;

djédjé-08 · Answer

J'ai mis aussi, le code sources du carnet d'adresse que j'ai eu avec mon livre :
http://jerome.brianne.free.fr/source/sourcelivre.zip

J'ai essayé d'adapter ce code pour l'utiliser dans mon programme.

Encore merci de t'interesser

grofwa · Answer

Dans ta Form2, la fonction enregistre assigne juste les valeurs dans la table mais pas dans le fichier, si je comprends bien...

djédjé-08 · Answer

Possible.
Qu'est ce que je dois donc faire ?

Tu as comparé par rapport à la source que j'ai eu avec mon livre ?

Normalement j'ai copié toute la source, je ne comprend donc pas pourquoi ça ne marche pas.

En plus le fichier adresse.adr est bien créé et des valeurs y sont bien enregistrées, mais si je fais un autre calcul, elles sont remplacées au lieu d'être complétées.

grofwa · Answer

A ta place, je creerais une classe séparée qui contiendrait ton calcul et qu s'occuperait d'enregistrer et de charger les données du fichier.
Du coup, tu n'aurais pas à ecrire deux fois la méthode enregistre qui se trouve dans estim et estima, et tu pourrais l'appeler de partout, toujours de la meme façon.
Sinon, il faut que tu ajoutes la partie qui se trouve dans estim dans la méthode Form1:click qui stocke dans le fichier et gérer le numéro courant d'enregistrement entre les fenêtres...
Si c'est pas clair, dis-le-me-le en me laissant ton adresse, je te répondrai en perso, ce sera plus simple.

M.

djédjé-08 · Answer

Et b'en oui, a vrai dire j'ai pas très bien compris.Peux tu m'expliquer un peu plus en détails.Voici mon adresse e-mail : djedje-08@wanadoo.frMerci d'avance.Joyeux Noël à tous :-)

[delphi] Problème lecture-ecriture ds fichier

10 réponses

Discussions similaires