全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1743
推到 Plurk!
推到 Facebook!

Folder Browser ?

答題得分者是:bruce0211
dhliu
一般會員


發表:18
回覆:24
積分:8
註冊:2003-03-05

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-09-25 03:07:08 IP:211.76.xxx.xxx 未訂閱
請問 BCB 裡面有沒有瀏覽資料夾的標準對話框? 我要抓的是網路上其他電腦裡面的資料匣呢, 如果用 OpenDialog 的話就一定要選定了 "檔案" 才能開啟, 但是我只要選擇 "路徑" 就好了 就像 "尋找" -> "瀏覽" 之後 可以選擇網芳上其他電腦裡面的路徑這樣的對話框
RaynorPao
版主


發表:139
回覆:3622
積分:7025
註冊:2002-08-12

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-09-25 08:29:16 IP:203.73.xxx.xxx 未訂閱
引言: 請問 BCB 裡面有沒有瀏覽資料夾的標準對話框? 我要抓的是網路上其他電腦裡面的資料匣呢, 如果用 OpenDialog 的話就一定要選定了 "檔案" 才能開啟, 但是我只要選擇 "路徑" 就好了 就像 "尋找" -> "瀏覽" 之後 可以選擇網芳上其他電腦裡面的路徑這樣的對話框
dhliu 你好: 可以利用 SelectDirectory 達到目的 < class="code"> #include "FileCtrl.hpp" AnsiString Dir; if (SelectDirectory("挑選目錄", "", Dir)) Label1->Caption = Dir; -- Enjoy Researching & Developing -- 發表人 - RaynorPao 於 2003/09/25 08:33:41
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
brook
資深會員


發表:57
回覆:323
積分:371
註冊:2002-07-12

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-09-25 08:49:20 IP:218.160.xxx.xxx 未訂閱
引言: 請問 BCB 裡面有沒有瀏覽資料夾的標準對話框?
TDirectoryListBox
dhliu
一般會員


發表:18
回覆:24
積分:8
註冊:2003-03-05

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-09-25 18:25:52 IP:211.76.xxx.xxx 未訂閱
引言:
您好, 上面這兩個方式我都試了, 但是只能抓到自己本機的檔案夾, 那如果我要抓取的是網芳上其他電腦的檔案夾呢? 比如說, 我要抓的資料在 AAA 電腦的 Folder 資料夾, 傳回的是 \\AAA\C\Folder 這樣的結果
dhliu
一般會員


發表:18
回覆:24
積分:8
註冊:2003-03-05

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-10-02 18:59:46 IP:211.76.xxx.xxx 未訂閱
參考了幾篇文章, 現在我已經可以抓到網路上的其他電腦了, 但是其他電腦中的路徑還是抓不到, 能否告訴我應該怎麼設定? 我用的函式是 WNetAddConnection 相關參數如下: NETRESOURCE *NR = new NETRESOURCE; NR->dwScope = RESOURCE_GLOBALNET; NR->dwType = RESOURCETYPE_DISK; NR->dwDisplayType = RESOURCEDISPLAYTYPE_SHARE; NR->dwUsage = RESOURCEUSAGE_CONTAINER; NR->lpRemoteName = "C:\"; NR->lpLocalName = "C:\" NR->lpProvider = NULL; WNetAddConnection(NR->lpRemoteName,"ADMINISTRATOR",NR->lpLocalName) 這個問題已經讓我頭大了好幾天了
bruce0211
版主


發表:157
回覆:668
積分:279
註冊:2002-06-13

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-10-03 08:50:40 IP:211.21.xxx.xxx 未訂閱
另一個方法試試
 
#include  //要放於 vcl.h 之前
#define NO_WIN32_LEAN_AND_MEAN    #include 
#include 
#include 
#include 
......
......    //---------------------------------------------------------------------------    void __fastcall TForm1::Button1Click(TObject *Sender)
{
  String WorkDir;
  // Use Windows 95 Directory box to get dir
    BROWSEINFO bi;
          char WDir[MAX_PATH];
          char FolderName[MAX_PATH];
          LPITEMIDLIST ItemID;              memset(&bi, 0, sizeof(BROWSEINFO));
          memset(WDir, 0, MAX_PATH);
          bi.hwndOwner = Handle;
          bi.pszDisplayName = FolderName;
          bi.lpszTitle = "Select Working Directory!";
          ItemID = SHBrowseForFolder(&bi);
          SHGetPathFromIDList(ItemID, WDir);
          //GlobalFreePtr(ItemID);
    if (WorkDir == "") return;
    WorkDir = String(WDir);    }    
好像還有一個更簡潔的方法, 我用過,但忘了找不到了....
dhliu
一般會員


發表:18
回覆:24
積分:8
註冊:2003-03-05

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-10-03 10:28:36 IP:211.76.xxx.xxx 未訂閱
哇!!!太感謝大大了, 我就是一直在找這樣的功能, 已經找了好幾天了... 請接受小弟一拜
系統時間:2024-05-18 17:54:00
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!