[D10.4] Problème FileExists dans C:\Users\nom d'utilisateur\AppData\Local\Microsoft\WindowsApps\

Bonjour,
J'ouvre une nouvelle discussion concernant le fonctionnement de FileExists.
il y en a déjà une http://"https://www.developpez.net/f...-ne-fichiers/" mais je ne suis pas dans le même cas même si le résultats est le même :

Sous Delphi 10.4 Community application développée en VCL 32bits.
Windows 10, extensions de fichiers affichées...

A partir de mon application je lance l'ouverture d'une application externe de traitement d'images jpg ou raw, Affinity pour ne pas le nommer.
Cette application vient de passer de V1 à V2 et maintenant elle n'est plus installée classiquement, on ne sait pas (je ne sais pas) où est l'éxecutable que je lançais en V1 caché dans la SandBox parait-il.
Maintenant on peut accéder à l'application V2 par un fichier lien placé ici :

Citation:

---

C:\Users\nom d'utilisateur\AppData\Local\Microsoft\WindowsApps\AffinityPhoto2.exe

---

En utilisant shellExecute, l'application est bien lancée.
Pour des raisons de convivialité et éviter de tenter une application désinstallée, je fais un FileExists sur ce fichier et là FileExist me dit que ce fichier n'existe pas.
Même chose si l'application est lancée en mode administrateur.

Comment tester l'existence de ce fichier ?
Merci

Bonjour

il semble que le répertoire C:\Users\nom d'utilisateur\AppData\Local\Microsoft\WindowsApps\ ait un fonctionnement particulier
fileexiste passe par un createfile en lecture seul mais c'est verrouillé par windows avec une erreur 1920

Citation:

---

le système ne peut pas accéder au fichier

---

vous pouvez passer par un findfisrt

Code:

---

1 2 3 4 5 6 7 8 9 10

function booFileExiste ( aStrNomFichier : string ) : boolean var searchResult : TSearchRec; begin if FindFirst(aStrNomFichier , faAnyFile, searchResult) = 0 then begin result := true; FindClose(searchResult); end; end;

---

à peaufiner bien évidement

Merci pour cette idée que je n'ai pas eu.
Cela fonctionne parfaitement.