Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1487 connectés 

  FORUM HardWare.fr
  Programmation
  Delphi/Pascal

  Aide pour fichiers PASCAL

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Aide pour fichiers PASCAL

n°1568995
j6j6
Posté le 02-06-2007 à 14:34:32  profilanswer
 

Salut, :hello:  
 
J'ai un probleme avec un programme en pascal, plus particulierement une procedure.
On me demande d'ecrire une procedure qui ouvre un fichier  (file of [record]) ou qui le creer s'il n'existe pas.
Je n'ai pas reussi a trouver une solution faute de pouvoir trouver des explications assez precises des fonction assign, rewrite,reset.
Voila, je sollicite donc votre aide, je ne doute pas que la solution est tres simple mais la je trouve pas !
 

mood
Publicité
Posté le 02-06-2007 à 14:34:32  profilanswer
 

n°1569128
TONY STRAY
Posté le 02-06-2007 à 21:18:20  profilanswer
 

un site peut t'aider , mais je ne sais est-ce qu'il est bien pour toi ou non :
http://en.wikipedia.org/wiki/Hierarchical_File_System

n°1569369
Flagad'awa​re
c pô moi, j'ai pas touché!
Posté le 03-06-2007 à 21:15:35  profilanswer
 

salut il faut que tu voie du coté des fichiers typés
 
t'as un petit exemple de code là:
 
http://perso.orange.fr/bardou/michel/erreurs.html
 
 

type
  TPersonne = record
    Nom: string[20];
    Prenom: string[20];
    Age: integer;
  end;
 
procedure SauverUnePersonne(NomDuFichier: string; var PersonneASauver: TPersonne);
var Fichier: file of TPersonne;
begin
  AssignFile(Fichier, NomDuFichier);
  Rewrite(Fichier);
  Writeln(Fichier, PersonneASauver);
  CloseFile(Fichier);
end;


 
 
pour créer ou ouvrir (si il existe) tu peut utiliser FileExists:
 

AssignFile(Fichier, NomDuFichier);
if FileExists (nomdufichier) then
 reset(fichier) //ouverture en lecture
 else rewrite(fichier); //ouverture (et création) en écriture


 
c'est assez schématique tout ça mais ça te fait déja quelques exemples :)


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  Delphi/Pascal

  Aide pour fichiers PASCAL

 

Sujets relatifs
Aide pour comprendre cet Algorigrammeaide pour cration d'un macro svp!!!!!
aide pour recu sur cellaide add_filter jewl svp
Besoin d'aide afin d'orienter mon développementDemande d'aide pour utilisation gawk
aide remetre a zero une celluleconcatener deux fichiers
[WORD, ACCESS]Lié des requêtes SQL à l'aide d'une macro sous word[dreamweaver] pb. d'encodage de mes fichiers
Plus de sujets relatifs à : Aide pour fichiers PASCAL


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR