如何傳回目錄名稱?? |
|
jck1
一般會員 發表:53 回覆:67 積分:24 註冊:2002-05-23 發送簡訊給我 |
|
andersonhsieh
版主 發表:33 回覆:531 積分:439 註冊:2002-06-10 發送簡訊給我 |
|
jck1
一般會員 發表:53 回覆:67 積分:24 註冊:2002-05-23 發送簡訊給我 |
|
andersonhsieh
版主 發表:33 回覆:531 積分:439 註冊:2002-06-10 發送簡訊給我 |
引言:TOpenDialog沒有辦法做到,要用其它的vcl,如rx的TDirectoryEdit @@~~飛翔在天際的精靈~~@@引言:耶............ 可是我不想讓他選到檔案 我是想讓他選到目錄就好了引言: 請問OpenDialog有辦法傳回目錄名稱嗎? 試了一下好像只有辦法傳回檔名 不知有無其他方法?? 謝謝!!ExtractFilePath(OpenDialog1.FileName) @@~~飛翔在天際的精靈~~@@
------
@@~~飛翔在天際的精靈~~@@ |
領航天使
站長 發表:12216 回覆:4186 積分:4084 註冊:2001-07-25 發送簡訊給我 |
|
jck1
一般會員 發表:53 回覆:67 積分:24 註冊:2002-05-23 發送簡訊給我 |
引言:謝謝站長 完全可以了 請問SHGetMalloc 有說明[Now Supported on Windows NT] 是指本來在NT不能用,現在能用了?? 還是指這個函數只有NT能用,98不能用?? 又andersonhsieh兄指的元件如rx的TDirectoryEdit rx是什麼意思啊??引言: 請問OpenDialog有辦法傳回目錄名稱嗎? 試了一下好像只有辦法傳回檔名 不知有無其他方法??本站不是有範例程式:http://delphi.ktop.com.tw/topic.php?TOPIC_ID=18175 ~~~Delphi K.Top討論區站長~~~ |
andersonhsieh
版主 發表:33 回覆:531 積分:439 註冊:2002-06-10 發送簡訊給我 |
引言:RX是指一套免費的元件組,可上 http://www.rxlib.com 去抓 @@~~飛翔在天際的精靈~~@@引言:謝謝站長 完全可以了 請問SHGetMalloc 有說明[Now Supported on Windows NT] 是指本來在NT不能用,現在能用了?? 還是指這個函數只有NT能用,98不能用?? 又andersonhsieh兄指的元件如rx的TDirectoryEdit rx是什麼意思啊??引言: 請問OpenDialog有辦法傳回目錄名稱嗎? 試了一下好像只有辦法傳回檔名 不知有無其他方法??本站不是有範例程式:http://delphi.ktop.com.tw/topic.php?TOPIC_ID=18175 ~~~Delphi K.Top討論區站長~~~
------
@@~~飛翔在天際的精靈~~@@ |
ccchen
版主 發表:61 回覆:940 積分:1394 註冊:2002-04-15 發送簡訊給我 |
|
jck1
一般會員 發表:53 回覆:67 積分:24 註冊:2002-05-23 發送簡訊給我 |
引言:引言: 請問OpenDialog有辦法傳回目錄名稱嗎? 試了一下好像只有辦法傳回檔名 不知有無其他方法?? 謝謝!!可以用 selectDirectory (須uses FileCtrl)var dir:string; begin Dir := 'C:\'; if SelectDirectory(Dir, [sdAllowCreate, sdPerformCreate, sdPrompt],0) then showmessage(dir);呀呼 謝謝ccchen兄 這個方法很簡潔 但他找不到網路芳鄰 是美中不足的地方 |
paul
初階會員 發表:8 回覆:82 積分:28 註冊:2002-04-14 發送簡訊給我 |
|
jck1
一般會員 發表:53 回覆:67 積分:24 註冊:2002-05-23 發送簡訊給我 |
引言: 用 DirectoryListBox1 元件(在 Win3.1模組內) procedure TForm1.DirectoryListBox1Change(Sender: TObject); begin Edit1.Text:=DirectoryListBox1.Directory; Edit1.Update; end; 這樣不是可取得目錄嗎? 還是我會錯意了?啊 paul兄的方法也不錯 不過好像也看不到網芳 而且也比較佔空間 :) 大家都說perl是一種There's More Than One Way To Do It 的語言 看來Delphi也是如此啊 :) |
ccchen
版主 發表:61 回覆:940 積分:1394 註冊:2002-04-15 發送簡訊給我 |
引言:用另一overload即可 if SelectDirectory('挑選目錄','',dir) then引言:引言: 請問OpenDialog有辦法傳回目錄名稱嗎? 試了一下好像只有辦法傳回檔名 不知有無其他方法?? 謝謝!!可以用 selectDirectory (須uses FileCtrl)var dir:string; begin Dir := 'C:\'; if SelectDirectory(Dir, [sdAllowCreate, sdPerformCreate, sdPrompt],0) then showmessage(dir);呀呼 謝謝ccchen兄 這個方法很簡潔 但他找不到網路芳鄰 是美中不足的地方 |
paul
初階會員 發表:8 回覆:82 積分:28 註冊:2002-04-14 發送簡訊給我 |
|
taoan
一般會員 發表:2 回覆:2 積分:0 註冊:2002-07-01 發送簡訊給我 |
|
領航天使
站長 發表:12216 回覆:4186 積分:4084 註冊:2001-07-25 發送簡訊給我 |
|
smu
一般會員 發表:6 回覆:10 積分:3 註冊:2002-12-04 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |