線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:6362
推到 Plurk!
推到 Facebook!

判斷目錄是否存在,不存在然後MKdir一個新目錄

 
MidasFan
一般會員


發表:41
回覆:22
積分:12
註冊:2004-06-03

發送簡訊給我
#1 引用回覆 回覆 發表時間:2007-01-17 13:46:11 IP:210.65.xxx.xxx 訂閱
各位新進!有一問題請教!
判斷目錄是否存在,不存在然後MKdir一個新目錄
我想知道如何去做到判斷是否目錄存在
謝謝各位

poemkevin
初階會員


發表:26
回覆:77
積分:30
註冊:2002-10-19

發送簡訊給我
#2 引用回覆 回覆 發表時間:2007-01-17 13:56:13 IP:219.84.xxx.xxx 未訂閱
uses sysUtils.pas or filectrl.pas
目錄begin
mkdir( '' );
raise exception.create('!!');
end;
jackalchen
一般會員


發表:0
回覆:1
積分:0
註冊:2003-12-03

發送簡訊給我
#3 引用回覆 回覆 發表時間:2007-09-26 16:48:02 IP:211.75.xxx.xxx 訂閱
可簡化到一行即可

函數名稱:ForceDirectories
函數功能:檢查有無該目錄如沒有則建立目錄

Ex.
uses FileCtrl;
ForceDirectories('C:\XXX');
編輯記錄
jackalchen 重新編輯於 2007-09-26 16:54:03, 註解 無‧
sryang
尊榮會員


發表:39
回覆:762
積分:920
註冊:2002-06-27

發送簡訊給我
#4 引用回覆 回覆 發表時間:2007-09-27 21:22:47 IP:124.10.xxx.xxx 訂閱
補充一點
ForceDirectories 可以一次建立多層目錄
ForceDirectories('c:\xxx\yyy\zzz');
就建立 c:\xxx、c:\xxx\yyy、c:\xxx\yyy\zzz 三個目錄

===================引 用 jackalchen 文 章===================
可簡化到一行即可

函數名稱:ForceDirectories
函數功能:檢查有無該目錄如沒有則建立目錄

Ex.
uses FileCtrl;
ForceDirectories('C:\XXX');
------
歡迎參訪 "腦殘賤貓的備忘錄" http://maolaoda.blogspot.com/
系統時間:2024-05-20 11:38:55
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!