Discussion :

[Matt2094]

Bonjour à tous,

Voici mon problème : j'ouvre un fichier, mais il me fait un message d'erreur, alors que le fichier éxiste, et qu'il n'a pas d'attribut spéciaux. Le truc le plus bizzare, c'est que le problème est au démarrage de l'application (j'ouvre le dernier fichier ouvert au démarrage) alors que quand je l'ouvre pendant l'utilisation de l'appli. , ça marche, alors que j'utilise éxactement la même procédure !!!

Merci d'avance pour votre réponse.

[aityahia]

esque on peut voir ta procédure pour mieux comprendre le pble

[Matt2094]

oué, je peux pas la mettre tout de suite, mais je la mettrai dès que je pourrais.

Sinon, il me dit qu'il y une erreur E/S de code 103 ...

[Frank]

oué, je peux pas la mettre tout de suite, mais je la mettrai dès que je pourrais.

Sinon, il me dit qu'il y une erreur E/S de code 103 ...

Ca sent à plein nez l'oubli de

Code :

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

AssignFile(F,SaveDialog1.FileName);

A adapter à ton code, bien sur.

[Matt2094]

Non, je l'ai bien mis ...

J'ai recopier le code (à la main) :

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
 
Var
  A: File of MonType;
  I: integer;
Begin
  AssignFile(A, MonFichier)
  {$I-}
  Reset(A);
  {$I+}
  I:=IOResult; //Je suis obligé de le mettre dans une variale tamporaire, sinon, IOResult est éffacé, mais c pas le problème lol
  if I=0 then
  begin
    Read(A, MaVariable);
 
    CloseFile(A);
  end
  else
    Application.MessageBox(PChar('Impossible d'ouvrir le fichier.'+chr(13)+'Code erreur : '+IntToStr(I)), 'Erreur E/S');
end;

Il se peut que j'ai fais des fautes de frapppes ...


Avec ce code, il n'y a pas d'éxcéptions du débogueur, mais il m'affiche le méssage d'erreur que j'ai prévu ...

[Frank]

Rajoutes ceci après le assignfile:

Code :

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

 Rewrite(F); // ne pas oublier rewrite, sinon erreur I/O

[Soulama]

Rewrite(F); // ne pas oublier rewrite, sinon erreur I/O

ca depond de ce que tu veux faire, le rewrite cree un fichier et l'ouvre

[devyan]

Bonjour,

Bonjour à tous,

Voici mon problème : j'ouvre un fichier...

Le truc le plus bizzare, c'est que le problème est au démarrage de l'application (j'ouvre le dernier fichier ouvert au démarrage)

...

Aide Delphi Erreurs d'E/S :

Code :

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

103	Fichier non ouvert	Rapportée par CloseFile, Read Write, Seek, Eof, FilePos, FileSize, Flush, BlockRead ou BlockWrite si le fichier n'est pas ouvert.

Le problème vient probablement d'un verrou sur le fichier. (il est probablement encore ouvert en exclusif)

[Matt2094]

Rajoutes ceci après le assignfile:

Code :

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

 Rewrite(F); // ne pas oublier rewrite, sinon erreur I/O

Mais je veux pas écrire, je veux lire le fichier ...

[Frank]

Rajoutes ceci après le assignfile:

Code :

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

 Rewrite(F); // ne pas oublier rewrite, sinon erreur I/O

Mais je veux pas écrire, je veux lire le fichier ...

[Soulama]

Une Idee:
moi jai aussi lereur parfoi surtout lorsque je sui sur WinNT avec un login sans droits administratives.

sinon essaye de lire le fichier autrement:

Code :

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

1
2
3
4
 
  List:= TStringList.Create;
  List.LoadFromFile(FichierXXX);
  Result:= List.Text ;

[Matt2094]

Le problème, c'est que j'ouvre un fichier typé, et non un fichier texte ...

[Soulama]

je crois que cette erreur ce passe lorsque tu essaye de lire un fichier et tu oublie le closefile, alor ya un handle registré par Windows qui né pas liberé.
Test:
essaye de supprimer le fichier ala main, tu va voir que l'os ne peut pa le faire
si c le cas faut voir ta procedure de lecture ca manque surement le closefile

[devyan]

je crois que cette erreur ce passe lorsque tu essaye de lire un fichier et tu oublie le closefile, alor ya un handle registré par Windows qui né pas liberé.
Test:
essaye de supprimer le fichier ala main, tu va voir que l'os ne peut pa le faire
si c le cas faut voir ta procedure de lecture ca manque surement le closefile

Il n'a le problkème q'au démarrage de la session. Donc ce n'est sans doute pas un oubli de CloseFile().

[Matt2094]

Ca marche !

Après avoir réécris toute les procédures, refait les format de fichier, et changer tout les fichiers, le programme a remarché, enfin... il marche pour l'instant... lol



Mais merci à tous quand même !