Merci pour la réponse, mais je n'ai pas réussi.
J'ai tenté les trois solutions suivantes :
ShellExec('Attrib -r',PathDest,'','',SW_HIDE,ewNoWait,ErrCode)
ShellExec('Attrib',PathDest,'-r','',SW_HIDE,ewNoWait,ErrCode)
ShellExec('',PathDest,'Attrib -r','',SW_HIDE,ewNoWait,ErrCode)
Où PastDeth est le chemin complet du fichier une fois copié sur le disque et ErrCode un entier.
J'ai testé la commande "Attrib -r [chemin du fichier]" depuis une fenêtre DOS et ça fonctionne bien.
Je ne suis pas certain de bien utiliser la fonction
1 2
| Prototype:
function ShellExec(const Verb, Filename, Params, WorkingDir: String; const ShowCmd: Integer; const Wait: TExecWait; var ErrorCode: Integer): Boolean; |
------
Edition
Bon, en attendant de trouver une solution plus propre, je me contente d'executer un fichier *.bat avec la commande Attrib -r dedans à la fin de l'installation. Ca fonctionne, mais si je pouvais m'en passer...
Partager