Discussion :

[BDE78]

Bonjour,

J'utilise la fonction IsFileInUse, récupérée sur le 'net', qui permet de savoir si un fichier est en cours d'utilisation par une autre application :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
function IsFileInUse(fName : string) : boolean;
var HFileRes : HFILE;
begin
  Result := false;
  if not FileExists(fName) then
    exit;
  HFileRes := CreateFile(pchar(fName), GENERIC_READ or GENERIC_WRITE,0, nil,
                         OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL, 0);
  Result := (HFileRes = INVALID_HANDLE_VALUE);
  if not Result then
    CloseHandle(HFileRes);
end;

En compilant en Win32, elle donne les résultats attendus.
Par contre en Win64, un fichier ouvert et en cours d'utilisation par une autre appli n'est pas détecté !

J'utilise Delphi XE7 sous Windows 7.

Comment faire pour que le résultat soit le même en Win64 ?

Merci d'avance pour vos réponse.
BDE78

[XeGregory]

Bonjour,

Remplace HFILE par THandle, HFILE est seulement pour le 32 bits, il me semble .

[BDE78]

Bonjour,

Merci pour la réponse.

Effectivement, en remplaçant la déclaration de type de 'HFILE' à 'THandle' ça fonctionne mieux, que ce soit en Win64 ou Win32.

Par contre, le comportement de la fonction n'est pas totalement identique :
J'ai testé avec 2 types de fichiers : JPEG et PDF, ouverts par 2 applis, respectivement la visionneuse JPEG de Windows7 et AcrobatPro v9.0.
Avec la 1ère version de déclaration (HFILE), les 2 fichiers sont détectés "ouverts".
Avec la 2ème (THandle), pour le PDF, le fichier est bien détecté "ouvert".
Par contre, pour le JPEG, il n'est pas détecté "ouvert", mais mon appli peut le ré-écrire (!), et la visionneuse JPEG de Windows, toujours ouverte avec le JPEG, le réaffiche avec les modifs !

Je marque le sujet "résolu" car mon traitement n'est plus "bloqué" par l'ouverture du fichier.

Encore merci pour ton aide.

BDE78

[SergioMaster]

Bonjour,

Il n'y a pas la possibilité d'un mode d'ouverture avec SHARE_EXCLUSIVE ou qqchose d'approchant ?
Cependant il est toujours possible que certains programmes travaillent avec une copie mémoire du fichier et non le fichier lui-même

[XeGregory]

https://docs.microsoft.com/en-us/win...pi-createfilea