Discussion :

[f6dqm1]

Bonjour.
Désolé si je ne suis pas sur le bon forum mais je n'ai rien trouvé qui puisse accueillir mon problème.
Depuis quelques temps mes applications D7 et D10 n'ont plus accès au répertoire User/Documents et je ne trouve pas ce qui s'est passé dans ma configuration.
Et pourtant je suis certain que cela a toujours fonctionné auparavant.
Le répertoire Documents est en Contrôle Total pour Système, User et Administrateur (vérifié 10 fois si ce n'est plus !).
Mes applis sont lancés en mode Administrateur.
Mes compilateurs D7 et D10 s'ouvrent aussi en mode Administrateur.
Aucun problème d'accès avec les applis Microsoft ou autres (Winzip, Adobe, VLC, IrfanView etc).
Si quelqu'un a une idée ...
F6DQM

[Paul TOTH]

j'ai rencontré ce problème pour les applications 32bits, dont Delphi

et si mon souvenir est bon le problème était lié à une synchronisation OneDrive

[f6dqm1]

Bonjour. Je n'utilise pas OneDrive et il n'est pas installé dans mon PC.
Le code qui me refuse l'accès à ce répertoire bien particulier est :

Code :

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

1
2
3
4
  assignfile(wf,fn);
  rewrite(wf);
  write(wf,wh);
  closefile(wf);

La fonction rewrite me renvoie une exception EInOutError : accès au fichier refusé.
Tous les autres répertoires sont acceptés (même Windows) mais Documents NON !
Pare-feu désactivé ne change rien.
Appli installée sous C: ne change rien.
Appli installée dans Documents s'ouvre bien mais toujours pas d'accès à Documents avec ma fonction rewrite !
Par contre les fonctions LoadFromFile, SaveToFile, DeleteFile fonctionnent bien pour ce répertoire Documents.
Bizarre tout ça. Je m'arrache les cheveux !

[Paul TOTH]

alors dans mon cas, c'est un client qui avait mis les sources de ces projets Delphi dans Mes Documents, et alors qu'on pouvait tranquillement ouvrir les documents sous Notepad, Delphi avait une erreur d'accès sur ceux-ci.

et j'ai vérifié, c'était bien la source du problème comme expliqué dans cet article
https://www.codedotshow.com/blog/whe...hi-components/

[ShaiLeTroll]

TFileStream peut-être à la place, j'ai tendance à remplacer tous les anciens code à base de routines par TFileStream, TEncoding ...

RecSize à 1 change-t-il quelque chose ?

Et un DeleteFile enchaine au Rewrite, cela fonctionne vraiment ?

[f6dqm1]

Merci pour les réponses. Je viens de trouver. C'était AVAST qui me bloquait les accès au répertoire User/Documents pour toutes mes applications D7 et D10. Et comme AVAST était en mode "silencieux", je n'étais pas averti !
Vraiment on passe parfois des heures sur des c........ !!!