Discussion :

[dourpil]

Bonjour à tous, j'ai un projet à faire en Pascal et j'aurai besoin de manipuler des fichiers.

J'ai eu un an de cours de Pascal et n'ai pas vu la gestion de fichier, j'ai donc lu les tutoriels disponibles ici mais je n'arrive toujours pas à faire de manipulation basique de fichier.

Tout d'abord une question générale: est-il possible de travailler avec des chaines de caractères ET des nombres dans un seul fichier?

Si oui, comment?


Sinon, j'ai essayé de faire un simple programme d'écriture et de lecture, mais j'ai toujours une erreur 105: file not open for output.

voilà mon code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
27
28
29
30
31
32
33
34
35
36
37
program test;
 
uses crt;
 
 
var
  fichier : text;
  b : string;
 
 
procedure ecriture;
 
begin
 
  reset (fichier);
  writeln('Entrez une phrase');
  readln(b);
  writeln(fichier,b)
end;
 
procedure lecture;
 
begin
 
  reset (fichier);
  readln (fichier,b);
  writeln (b);
  readkey
end;
 
 
begin
assign (fichier,b);
filemode:=2;
 ecriture;
 lecture;
end.

_


Sinon, j'ai essayé un autre code trouvé sur un site, qui est celui-ci:

http://pages.univ-nc.nc/~racca/exempletext.html

Quand je l'exécute, il me dit "file not found" à la ligne "reset(f_in);"

Dois-je créer moi-même les fichiers f_in et f_out ? Si oui, où les créer?

_


Désolé de poser des questions aussi basiques mais j'ai besoin de résoudre ces problèmes pour avancer.


Merci d'avance

[Alcatîz]

Bonjour,

Première chose : on ne peut écrire dans un fichier texte ouvert avec Reset. Pour ce faire, il faut utiliser Rewrite ou Append.

Un exemple : http://pascal.developpez.com/cours/p...page_14#LXIV-C

Ensuite, dans l'instruction

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

assign (fichier,b);

tu dois assigner à la chaîne b le nom du fichier.

[dourpil]

Merci, j'ai maintenant réussi à faire fonctionner un programme tout bête de lecture écriture: voilà le code pour info

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
27
(* Programme de test de lecture et d ecriture de fichier*)
 
 
program test;
 
uses crt;
 
 
var
  fichier : text;
  b : string;
 
 
 
begin
  assign (fichier,'C:\tp7\source\testmoi.txt');
  filemode:=2;
  rewrite(fichier);
  writeln('Entrez une phrase');
  readln(b);
  writeln(fichier,b);
  close(fichier);
  reset(fichier);
  readln (fichier,b);
  writeln (b);
  readkey
end.

Cependant, la commande rewrite réinitialise le fichier texte. J'aimerais qu'il soit possible de réécrire à la suite du fichier sans modifier ni effacer le contenu qui y était.

Comment pourrais-je faire ça?



Et sinon, à propos de ma 1ere question (possibilité d'avoir deux variables associées à un fichier text: l'une string et l'autre real (ou integer)?

[dourpil]

Problème résolu en utilisant append à la place de rewrite


Et pour répondre à ma question (), oui on peut utiliser des reels et des chaines de caractère dans un fichier text, sans aucun problème. Je sais pas quel était le bête type qui n'y arrivait pas :]