請問如何把檔案的唯讀取消? |
答題得分者是:adonis
|
k9859
一般會員 發表:13 回覆:3 積分:3 註冊:2004-10-17 發送簡訊給我 |
|
harpist
資深會員 發表:3 回覆:251 積分:430 註冊:2002-10-03 發送簡訊給我 |
請參考SetFileAttributes API
http://msdn2.microsoft.com/en-us/library/aa365535.aspx
------
~§~迷時師渡,悟了自渡~§~ |
adonis
高階會員 發表:140 回覆:258 積分:159 註冊:2002-04-15 發送簡訊給我 |
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複製到硬碟 但這樣會導致檔案是唯讀 請問要如何複製時將資料匣及整個資料匣內的檔案屬性唯讀取消?
------
我也在努力學習中,若有錯謬請見諒。 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |