J'ai viole un partage ! ..... :)

J'ai viole un partage ! ..... :) - Delphi/Pascal - Programmation

Marsh Posté le 02-12-2002 à 10:07:38    

Salut a tous,
 
J'ai un probleme avec un TextFile sur lequel j'ai passe ma soiree d'hier. Ca doit po etre grand chose, mais j'y arrive pas.
 
Je me suis defini une classe TFicLog afin de pouvoir faire des fichiers de log d'execution (jusque la, tout va bien).
 
S'il y a des defauts dans le code, ca vient peut-etre de ma memoire, car je le recopie de tete.
 

Citation :

TFicLog: class
  FicLog: TextFile;
  procedure Open(fichier: string);
  ...
  end;
 
implementation
 
procedure TFicLog.Open(fichier: string);
begin
  AssignFile(Self.FicLog,fichier);
  Rewrite(Self.FicLog);
end;


 
Et la, a l'execution, il me sort une erreur de classe EAccess.... avec une violation de partage (ecriture a l'adresse FFFFFFFF).
 
Ca peut venir d'ou ?
 
Merci d'avance pour l'aide.


---------------
Cobol le jour, PHP la nuit ... Je préfère franchement mes nuits ...
Reply

Marsh Posté le 02-12-2002 à 10:07:38   

Reply

Marsh Posté le 02-12-2002 à 10:12:25    

si ça parle de partage c'est peut-être que le fichier est ouvert par autre chose
mais l'A.V. à l'adresse FFFFFFFF ça ressemble plus à un pointeur (objet) non initialisé


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 02-12-2002 à 10:22:34    

antp a écrit a écrit :

si ça parle de partage c'est peut-être que le fichier est ouvert par autre chose
mais l'A.V. à l'adresse FFFFFFFF ça ressemble plus à un pointeur (objet) non initialisé




 
le fichier de log n'existe pas encore, et c'est au niveau de l'assign que ca me met le message ....


---------------
Cobol le jour, PHP la nuit ... Je préfère franchement mes nuits ...
Reply

Marsh Posté le 02-12-2002 à 10:38:15    

et ton objet de type TFicLog tu le crées comment ?


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 02-12-2002 à 10:43:57    

antp a écrit a écrit :

et ton objet de type TFicLog tu le crées comment ?




 
En fait, mon objet TFicLog est dans une unite ULog.
Dans une autre unite, j'ai mis ULog dasn les Uses, et j'ai fait une declaration dans les var du genre :
 

Code :
  1. var
  2.   ServeurLog: TFicLog;


 
Et apres, j'utilise tout simplement la methode ServeurLog.Open


---------------
Cobol le jour, PHP la nuit ... Je préfère franchement mes nuits ...
Reply

Marsh Posté le 02-12-2002 à 10:54:15    

heu oui mais là ton objet n'est pas créé
tu as juste un pointeur vers cet objet
il faut le créer à un moment (par ex au démarrage du programme) :
 ServeurLog := TFicLog.Create;
et le supprimer quand tu n'en as plus besoin (par ex en quittant le programme) :
 ServeurLog.Free;


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 02-12-2002 à 11:07:54    

antp a écrit a écrit :

heu oui mais là ton objet n'est pas créé
tu as juste un pointeur vers cet objet
il faut le créer à un moment (par ex au démarrage du programme) :
 ServeurLog := TFicLog.Create;
et le supprimer quand tu n'en as plus besoin (par ex en quittant le programme) :
 ServeurLog.Free;
 




 
Evidemment  :D  
Maintenant que tu me le dis, mon erreur me parait toute bete  :D  
Bon, je vais tester ca ce soir, et si le probleme persiste, je remettrai un post.
 
Merci beaucoup  :bounce:


---------------
Cobol le jour, PHP la nuit ... Je préfère franchement mes nuits ...
Reply

Marsh Posté le 03-12-2002 à 18:14:56    

rdmarmotte a écrit a écrit :

 
 
Evidemment  :D  
Maintenant que tu me le dis, mon erreur me parait toute bete  :D  
Bon, je vais tester ca ce soir, et si le probleme persiste, je remettrai un post.
 
Merci beaucoup  :bounce:  




 
CA MARCHE !!!!!!!! :bounce:  :bounce:  :bounce:


---------------
Cobol le jour, PHP la nuit ... Je préfère franchement mes nuits ...
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed