SetCurrentDir的寫法? |
尚未結案
|
onizuka5201314
一般會員 ![]() ![]() 發表:15 回覆:7 積分:4 註冊:2005-03-17 發送簡訊給我 |
|
RedSnow
版主 ![]() ![]() ![]() ![]() ![]() ![]() 發表:79 回覆:1322 積分:845 註冊:2003-12-15 發送簡訊給我 |
onizuka5201314 您好: 1. 設定使用目錄是可以使用 SetCurrentDir(),使用方式就是直接以目錄字串當作參數來呼叫即可,例如:
SetCurrentDir("C:\\test");
或是:
AnsiString path = "C:\\test";
SetCurrentDir(path); 2. 執行程式本身所在目錄可使用 ExtractFilePath(ParamStr(0)) 來取得,例如:
AnsiString path = ExtractFilePath(ParamStr(0)); 3. 現行使用目錄可以用 GetCurrentDir() 來取得,例如:
AnsiString path = GetCurrentDir(); 4. 下列數篇相關討論可以參考一下:
如何取得目前作業的目錄位置?
http://delphi.ktop.com.tw/topic.php?topic_id=38778 請問如何取得正在執行的程式位置
http://delphi.ktop.com.tw/topic.php?topic_id=35185 請問檔案路徑的問題??
http://delphi.ktop.com.tw/topic.php?topic_id=30081
發表人 - RedSnow 於 2005/05/29 21:40:07
|
cashyy
高階會員 ![]() ![]() ![]() ![]() 發表:117 回覆:322 積分:212 註冊:2004-04-30 發送簡訊給我 |
您好!
一小段程式範例給您!
void __fastcall TForm1::Button1Click(TObject *Sender) { //清除Memo1所有文字 Memo1->Clear(); char c[MAX_PATH]; //取得目前程式目錄 if(::GetCurrentDirectory(MAX_PATH,c)) { Memo1->Lines->Add("取得目前程式目錄:"); Memo1->Lines->Add(AnsiString(c)); Memo1->Lines->Add("================"); //重新設定現在目錄 if(::SetCurrentDirectory("C:\\Temp\\")) { if(::GetCurrentDirectory(MAX_PATH,c)) { //將改變的現在目錄,反應在DirectoryListBox1元件上 DirectoryListBox1->Directory = AnsiString(c); Memo1->Lines->Add("改設定指定目錄在:"); Memo1->Lines->Add(AnsiString(c)); } } else Memo1->Lines->Add("改設定指定目錄失敗!"); } else Memo1->Lines->Add("取得目前目錄失敗!"); } |
onizuka5201314
一般會員 ![]() ![]() 發表:15 回覆:7 積分:4 註冊:2005-03-17 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |