IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Langage Delphi Discussion :

Fichiers : ouvrir en "append"


Sujet :

Langage Delphi

  1. #1
    Membre régulier
    Profil pro
    Inscrit en
    Avril 2003
    Messages
    216
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Avril 2003
    Messages : 216
    Points : 74
    Points
    74
    Par défaut Fichiers : ouvrir en "append"
    Bonjour,

    Pour écrire dans un fichier je fait comme ceci:
    assign(F, NomFich);
    reset(F);
    //Remplissage de tab...
    write(F, tab);
    close(F);

    Le problème, c'est que quand je vais relancer mon programme, il va effacer tout le contenu de mon fichier et puis faire le write. Comment faire pour qu'il n'efface pas le contenu du fichier et qu'il ajoute "tab" à la fin du fichier ?

    Merci...

  2. #2
    Membre expert
    Avatar de aityahia
    Homme Profil pro
    CIEPTAL CARS SPA
    Inscrit en
    Mars 2006
    Messages
    1 938
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 48
    Localisation : Algérie

    Informations professionnelles :
    Activité : CIEPTAL CARS SPA
    Secteur : Transports

    Informations forums :
    Inscription : Mars 2006
    Messages : 1 938
    Points : 3 329
    Points
    3 329
    Par défaut
    c'est pas normal avec reset sa n'écrase pas le fichier peu être qu'il faut ce positionner en fin de fichier

  3. #3
    Membre actif
    Homme Profil pro
    Freelance
    Inscrit en
    Décembre 2003
    Messages
    423
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 37
    Localisation : France

    Informations professionnelles :
    Activité : Freelance

    Informations forums :
    Inscription : Décembre 2003
    Messages : 423
    Points : 259
    Points
    259
    Par défaut
    Je ne comprends pas trop là ... Normalement Reset c'est pour une Lecture Uniquement
    Essaie comme ça, ça devrait marcher :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     
    assign(F, NomFich);
    Append(F);
    //Remplissage de tab...
    write(F, tab);
    close(F);
    Petit rappel au passage :
    Reset = Lecture
    Rewrite = Création / 2criture (efface tout)
    Append = Ajout

    Petite remarque aussi, attention après ton Assign entoure ton Append par une balise d'interception d'erreur {$-} / {$+} (sauf si tu as fait des tests préalables)

    Voila
    "La théorie, c’est quand on sait tout et que rien ne fonctionne. La pratique, c’est quand tout fonctionne et que personne ne sait pourquoi. Ici, nous avons réuni théorie et pratique : rien ne fonctionne ... et personne ne sait pourquoi !" et malheureusement c'est souvent le cas en Développement...

Discussions similaires

  1. Réponses: 3
    Dernier message: 20/01/2007, 20h36

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo