Discussion :

[gallou]

Bonjour je suis etudiante en fac de science et j'ai un projet a faire or je ne suis vraiment pas doue avec le turbo pascal donc une erruer c'est glisse dans mon programme et j'aimerai savoir la regler erreur numero 103
je devais saisir des offre de vacances ds un fichier voila merci d'avance

[MARTINET]

Vous avez sans doute déclaré dans vos variables Byte ou Longint mais la vairable devrait être en format "integer" (entier entre - 32767 et + 32768 environ) ou en format "real".
Si vous avez toujours le probléme, zipper votre programme et envoyez le moi. oolnet@free.fr

Cordialement Olivier :-)

[charly]

bon euh , vous seriez prié de lire les regles aux passages la prochaine fois , et d etre un peu plus explicites merci !

[John_win]

bon euh , vous seriez prié de lire les regles aux passages la prochaine fois , et d etre un peu plus explicites merci !

[Giovanny Temgoua]

Finalement, Gallou a-t-elle oui ou non trouvée une solution à son problème?

[Eric Sigoillot]

C'est pas pour être méchant mais... la réponse n°1 est complètement HS !!!

Une runtime 103 signifie qu'on tente d'accéder à un fichier qui n'est pas ouvert.

Vérifie que le fichier auquel tu souhaite accéder existe bien, et que tu l'ouvres bien avec Reset (pour une lecture), Append (pour le compléter en écriture), ou bien avec Rewrite (pour le créer).

Si jamais le fichier est en "lecture seule", alors cela peut poser problème. Il sera impossible de l'ouvrir avec Append quoiqu'il arrive. Le hic est que cela semble aussi impossble avec Reset. En fait, ça provient du fait que Reset, dans son implémentation actuelle, permet d'ouvrir un fichier aussi bien en lecture qu'en écriture. Or, l'écriture est ici non permise. Il faut donc restreindre Reset à l'ouverture en lecture simplement. Pour ce faire, il faut affecter la valeur 0 à la variable FileMode avant d'appeler Reset, comme ceci :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
var
  f: Text;
 
begin
Assign(f, 'FICHIER.TXT');
(***)
FileMode := 0; { Passe en lecture seule }
(***)
Reset(f);
...
Close(f);

A+

[M.Dlb]

Y'a eu confusion entre erreur d'exécution et erreur de compilation on dirait...
Gallou soit plus explicite la prochaine sinon... wallou la réponse !

a+