無法打開資源回收筒 |
|
尚未結案
|
|
Dianasour
一般會員   發表：9 回覆：8 積分：3 註冊：2007-12-25 發送簡訊給我 |
參考過了之前的帖子, 依樣畫葫蘆的方式卻無法打開 CSIDL_BITBUCKET 是甚麼問題呢??
[code cpp] //--------------------------------------------------------------------------- #define NO_WIN32_LEAN_AND_MEAN #include "shlobj.h" #include #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- void OpenSpecialFolder(int csidl) { LPITEMIDLIST pidl; LPMALLOC pShellMalloc; char szDir[MAX_PATH]; if(SUCCEEDED(SHGetMalloc(&pShellMalloc))) { if( SUCCEEDED(SHGetSpecialFolderLocation(NULL, csidl, &pidl)) ) { if(SHGetPathFromIDList(pidl, szDir)) { ShellExecute(Application->Handle, "open", "explorer", szDir, NULL, SW_SHOW); } pShellMalloc->Free(pidl); } pShellMalloc->Release(); } } //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { OpenSpecialFolder(CSIDL_PERSONAL); OpenSpecialFolder(CSIDL_BITBUCKET); } //--------------------------------------------------------------------------- [/code] |
|
2007
中階會員  發表：54 回覆：90 積分：98 註冊：2008-08-12 發送簡訊給我 |
這樣 可以 嗎?? ShellExecute(NULL, "Open", "::{645FF040-5081-101B-9F08-00AA002F954E}", NULL, NULL, SW_SHOWNORMAL); 參考： http://delphi.ktop.com.tw/board.php?cid=168&fid=914&tid=29242 ===================引 用 Dianasour 文 章=================== 參考過了之前的帖子, 依樣畫葫蘆的方式卻無法打開 CSIDL_BITBUCKET 是甚麼問題呢?? [code cpp] //--------------------------------------------------------------------------- #define NO_WIN32_LEAN_AND_MEAN #include "shlobj.h" #include #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- void OpenSpecialFolder(int csidl) { LPITEMIDLIST pidl; LPMALLOC pShellMalloc; char szDir[MAX_PATH]; if(SUCCEEDED(SHGetMalloc(&pShellMalloc))) { if( SUCCEEDED(SHGetSpecialFolderLocation(NULL, csidl, &pidl)) ) { if(SHGetPathFromIDList(pidl, szDir)) { ShellExecute(Application->Handle, "open", "explorer", szDir, NULL, SW_SHOW); } pShellMalloc->Free(pidl); } pShellMalloc->Release(); } } //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { OpenSpecialFolder(CSIDL_PERSONAL); OpenSpecialFolder(CSIDL_BITBUCKET); } //--------------------------------------------------------------------------- [/code] |
|
Dianasour
一般會員 發表：9 回覆：8 積分：3 註冊：2007-12-25 發送簡訊給我 |
謝謝 2007 的回覆, ::{645FF040-5081-101B-9F08-00AA002F954E} 確實可以,
但為何 SHGetSpecialFolderLocation 這個 WINAPI 卻無法讀取到 CSIDL_BITBUCKET 的路徑呢? 還有我要從哪查到 ::{645FF040-5081-101B-9F08-00AA002F954E} 是對映資源回收筒的路徑?? ===================引 用 2007 文 章=================== 這樣 可以 嗎?? ShellExecute(NULL, "Open", "::{645FF040-5081-101B-9F08-00AA002F954E}", NULL, NULL, SW_SHOWNORMAL); 參考： http://delphi.ktop.com.tw/board.php?cid=168&fid=914&tid=29242 ===================引 用 Dianasour 文 章=================== 參考過了之前的帖子, 依樣畫葫蘆的方式卻無法打開 CSIDL_BITBUCKET 是甚麼問題呢?? [code cpp] //--------------------------------------------------------------------------- #define NO_WIN32_LEAN_AND_MEAN #include "shlobj.h" #include #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- void OpenSpecialFolder(int csidl) { LPITEMIDLIST pidl; LPMALLOC pShellMalloc; char szDir[MAX_PATH]; if(SUCCEEDED(SHGetMalloc(&pShellMalloc))) { if( SUCCEEDED(SHGetSpecialFolderLocation(NULL, csidl, &pidl)) ) { if(SHGetPathFromIDList(pidl, szDir)) { ShellExecute(Application->Handle, "open", "explorer", szDir, NULL, SW_SHOW); } pShellMalloc->Free(pidl); } pShellMalloc->Release(); } } //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { OpenSpecialFolder(CSIDL_PERSONAL); OpenSpecialFolder(CSIDL_BITBUCKET); } //--------------------------------------------------------------------------- [/code] |
發表時間：2008-11-05 07:34:58
IP:218.111.xxx.xxx 訂閱
系統時間：2024-04-26 1:45:10
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |