我自製一個安裝程式
單純從CD複製到硬碟
但這樣會導致檔案是唯讀
請問要如何複製時將資料匣及整個資料匣內的檔案屬性唯讀取消?

請參考SetFileAttributes API
http://msdn2.microsoft.com/en-us/library/aa365535.aspx

------
~§~迷時師渡，悟了自渡~§~

k9895, 您好
<textarea class="delphi" rows="10" cols="60" name="code"> var sf: TSearchRec; ExtPath: String; If FindFirst(ExtPath '*.*', faAnyFile, sf)=0 then //ExtPath= YourFilePath '\' begin repeat FileSetAttr(ExtPath sf.Name, faArchive); //faReadOnly唯讀、faHidden隱藏 until FindNext(sf)<>0; FindClose(sf); end; </textarea>
若只單純的檔案屬性唯讀取消 FileSetAttr(ExtPath sf.Name, faArchive); 即可 若要整個資料夾內的檔案皆要，則需上述的方式 我也在學習中，若有錯謬請見諒 ===================引 用 k9859 文 章===================
我自製一個安裝程式
單純從CD複製到硬碟
但這樣會導致檔案是唯讀
請問要如何複製時將資料匣及整個資料匣內的檔案屬性唯讀取消?

------
我也在努力學習中，若有錯謬請見諒。