
Envoyé par
francois.delpierre
Bonjour,
j'ai un petit problème pour ouvrir un fichier, voici ma démarche :
F : file of mon_enreg {mon_enreg est un type enreg}
enreg1 , enreg1 : mon_enreg
Assignfile(F, nom_fichier1);
rewrite(F);
write(F,Enreg1);
Closefile(f);
Assignfile(F, nom_fichier2);
rewrite(F);
write(F,Enreg2);
Closefile(f);
l'application plante lorsque la ligne "write(F,Enreg2);" s'effectue !
Je souhaite qu ma variable F indique un autre fichier que le premier, puis inscrire dans cet autre fichier des données.
Merci de m'aider!
Partager