Comment définir et modifier les permissions d'une application

Bonjour,

je cherche de la documentation sur la manière de définir et modifier les permissions d'une application, en particulier pour utiliser CopyFile et DeleteFile.

Je n'ai trouvé qu'une indication proposant de modifier les options du projet, qui ne proposent apparemment que 3 niveaux de droits mais sans possibilité de modulation par répertoire.
Je n'arrive pas à trouver de précisions sur la notion d'invocateur et je ne saisis pas bien la différence entre droits le plus grands possibles et administrateur.

J'ajoute que je ne souhaite pas donner de permission trop large, mais plutôt de limiter les droits d'écriture et d'effacement à un répertoire et bien entendu ses sous-répertoires.

J'utilise Ubuntu mais je souhaite également que l'appli puisse être utilisée sous Windows.

pourquoi ne pas utiliser fileutil pour copier ou supprimer un fichier

@sematimo
c'est ce que j'essaye de faire avec CopyFile et DeleteFile.qui sont tous deux dans fileutil sauf erreur de ma part, et fileutil est dans ma clause uses; mais rien ne se passe et j'ai pensé qu'il devait y avoir un problème de permission d'où mes questions.

Y a-t-il un moyen de détecter pourquoi CopyFile ne fonctionne pas?

Bonjour !

Citation:

---

Envoyé par amitoum

Y a-t-il un moyen de détecter pourquoi CopyFile ne fonctionne pas?

---

Je viens de faire l'essai suivant (sous Linux).

J'ai créé un fichier dont j'ai changé les attributs, de sorte que personne n'ait le droit de le supprimer.

Code:

---

1 2 3 4 5 6 7 8

[roland@localhost permissions]$ touch fichier.txt [roland@localhost permissions]$ lsattr fichier.txt --------------e----- fichier.txt [roland@localhost permissions]$ sudo chattr +i fichier.txt [roland@localhost permissions]$ lsattr fichier.txt ----i---------e----- fichier.txt [roland@localhost permissions]$ rm fichier.txt rm: impossible de supprimer 'fichier.txt': Opération non permise

---

Ensuite j'ai mis dans mon projet Lazarus le code suivant :

Code:

---

1 2 3 4 5 6 7

procedure TForm1.Button1Click(Sender: TObject); begin if DeleteFile('fichier.txt') then Memo1.Append('Fichier supprimé') else Memo1.Append(SysErrorMessage(GetLastOSError)); end;

---

Et donc, quand j'appuie sur le bouton, le fichier n'est pas supprimé, et je vois dans mon TMemo le message suivant :

Citation:

---

Operation not permitted

---

Cela vous aide-t-il ?

Chez moi fileutil fonctionne.

Code:

---

1 2 3 4 5 6

//pour copier fileutil.CopyFile(source,destination,true,false);   //pour supprimer fileutil.DeleteDirectory(cheminDossier, False); //false supprime dossier, true suupprime le contenu

---

@Roland Chastain
merci beaucoup, je vais m'en servir.

Dans l'intervalle, j'ai envisagé d'utiliser la fonction RenameFile qui me paraissait pouvoir remplacer avantageusement CopyFile+DeleteFile, mais je me suis aperçu que cette fonction écrasait sans prévenir un éventuel fichier préexistant portant le nom du fichier de destination. Autrement dit, il faut vérifier l'absence de fichier qui serait écrasé avant de l'utiliser. Dommage.

Dommage également que cette fonction (peut-être plus ancienne et qui fait partie d'une autre unité) ne bénéficie pas des mêmes options que CopyFile; il pourrait être intéressant de l'harmoniser.

Sous windows, tu peux utiliser filesetattr.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24

//faReadOnly : 1 : Read-only files //faHidden : 2 : Hidden files //faSysFile : 4 : System files //faVolumeID : 8 : Volume ID files //faDirectory : 16 : Directory files //faArchive : 32 : Archive files //faSymLink : 64 : Symbolic link   var fileName : string; attrs : Integer;   begin filename:=path+'test.txt'; filesetattr(filename,0); //1 met le fichier en lécture seule, 0 met en lécture/écriture   attrs := FileGetAttr(fileName);//récupère l'attribut   // test if attrs and faReadOnly > 0 then ShowMessage('Fichier en lécture seule '+inttostr(attrs)) else ShowMessage('Fichier en lécture/écriture '+inttostr(attrs)); end;

---