FmShareExclusive [Résolu]

Messages postés
64
Date d'inscription
samedi 26 août 2017
Dernière intervention
7 août 2018
- - Dernière réponse : cs_sagitarius
Messages postés
64
Date d'inscription
samedi 26 août 2017
Dernière intervention
7 août 2018
- 24 juil. 2018 à 05:40
bonjour à tous;

voici une condition,
If (FileOpen(Chemin+Classeur , fmShareExclusive) >= 0)then

comment ouvrir mon fichier avec cette condition ??
je l'utilise pour savoir si mon fichier est ouvert, ça marche très bien, mais le problème que je rencontre, c'est que je peux plus ouvrir mon fichier, car:

"fmShareExclusive : En aucun cas une autre application ne peut ouvrir le fichier." , lol !!!

Comment sortir de cette condition, que je veux impérativement la garder,
et ouvrir mon fichier ??;
Mon fichier est un fichier excel , le lien se crée bien, mais l'ouverture de celui-ci est donc impossible et je n'arrive pas à m'en sortir.
Auriez-vous une réponse ou solution ???

voici mon code:

  
If (FileOpen(Chemin+Classeur , fmShareExclusive) >= 0)then
    begin
     showmessage('fichier fermé');
    end
    else
    begin
      ShowMessage('fichier ouvert');


Merci d'avance et bon codding à tous ...
Afficher la suite 
A voir également:

Votre réponse

2 réponses

Messages postés
161
Date d'inscription
samedi 15 novembre 2003
Dernière intervention
10 décembre 2018
0
Merci
salut
en ajoutant peut être
   
fmShareExclusive or fmOpenReadWrite
ou fmShareExclusive or fmOpenRead
Commenter la réponse de papyvore
Messages postés
64
Date d'inscription
samedi 26 août 2017
Dernière intervention
7 août 2018
0
Merci
Bonjour Papyvore;
Merci pour votre réponse,
J'ai trouvé
Handle := FileOpen(Fichier, fmShareExclusive);
if (Handle = -1) then (fichier ouvert!!)
FileClose(Handle);
et ma procédure de création de mon fichier Excel j'ai dû la mettre avant la procédure OnShow de ma form
Cmerci et bon coddind
Commenter la réponse de cs_sagitarius

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.