SHELL編程：利用CSIDL開啟特殊檔案夾

CSIDL描述及使用說明：
    CSIDL 表示的是windows shell中一個特殊檔案夾的標識值。這裡說的特殊檔案夾指的是由windows shell所定義的檔案夾,例如："我的文件"，"資源回收筒"，"Inernet Cache檔案夾"就是一些由SHELL指定的特殊檔案夾.這些特殊檔案夾可以是一個磁碟上的實體路徑，也可以是一個虛擬資料夾(Virtual Folder)!
     註：Virtual Folder
     虛擬資料夾是一個由windows shell定義過的檔案夾，但這個檔案夾並沒有與你的電腦上的任何物理 路徑相對應.例如：“我的電腦 ”就是一個包含了所有磁碟機的虛擬資料夾，還有如“控制台”也是一個虛擬資料夾，等等。虛擬資料夾很少應用於非shell函數。
 在windows2000/NT中，許多csidl所涉及的檔案夾都是針對各個使用者的。但類似於CSIDL_COMMON_* 可以供所有使用者使用。

 在許多應用中，一個CSIDL可以與下面的標識之一進行組合使用：

  CSIDL_FLAG_CREATE($8000)
    windows 2000:如果這個CSIDL所引用的檔案夾不存在，則建立這個檔案夾!.
   CSIDL_FLAG_DONT_VERIFY($4000)
    WINDOWS 2000: 無論這個CSIDL所引用的檔案夾是否存在都使用它!

  CSIDL_ADMINTOOLS($30)
    表示目前使用者的“管理工具”系統檔案夾
  CSIDL_ALTSTARTUP($h1D)
    不詳
  CSIDL_APPDATA($1A)
    表示目前使用者的特定的應用程式資料隱藏檔夾，例如：C:/Documents and Settings/username/Application Data
  CSIDL_BITBUCKET($A)
    表示資源回收筒
  CSIDL_COMMON_ADMINTOOLS($2F)
    表示所有使用者的“管理工具”系統檔案夾
  CSIDL_COMMON_ALTSTARTUP($1D)
    表示所有使用者的  (只支援WINDOWS NT 系統)
  CSIDL_COMMON_APPDATA($23)
    表示所有使用者的特定的應用程式資料隱藏檔夾,例如:C:/Documents and Settings/All Users/Application Data
  CSIDL_COMMON_DESKTOPDIRECTORY($19)
    表示所有使用者的“案頭”檔案夾，例如：C:/Documents and Settings/All Users/Desktop。
  CSIDL_COMMON_DOCUMENTS($2E)
    表示所有使用者的“我的文件”檔案夾，例如:C:/Documents and Settings/All Users/Documents
  CSIDL_COMMON_FAVORITES($1F)
    表示所有使用者的“我的收藏夾”檔案夾。
  CSIDL_COMMON_PROGRAMS($17)
    表示所有使用者的“程式”檔案夾，例如：C:/Documents and Settings/All Users/Start Menu/Programs
  CSIDL_COMMON_STARTMENU($16)
    表示所有使用者的“開始菜單”檔案夾，例如：C:/Documents and Settings/All Users/Start Menu
  CSIDL_COMMON_STARTUP($18)
    表示所有使用者的“啟動”檔案夾，例如：C:/Documents and Settings/All Users/Start Menu/Programs/Startup
  CSIDL_COMMON_TEMPLATES($2D)
    表示所有使用者的“模組”檔案夾，例如：C:/Documents and Settings/All Users/Templates
  CSIDL_CONTROLS($3)
    表示“控制台”檔案夾
  CSIDL_COOKIES($21)
    表示目前使用者Internet Explorer的cookie 檔案夾，例如：C:/Documents and Settings/username/Cookies
  CSIDL_DESKTOP($0)
    表示“案頭”虛擬資料夾，包含了電腦中的所有內容
  CSIDL_DESKTOPDIRECTORY($10)
    表示目前使用者的“案頭”檔案夾，例如：C:/Documents and Settings/username/Desktop
  CSIDL_DRIVES($11)
    表示“我的電腦”虛擬資料夾，包含了電腦中所有的磁碟機
  CSIDL_FAVORITES($6)
    表示目前使用者的“收藏夾”檔案夾，例如：C:/Documents and Settings/username/Favorites
  CSIDL_FONTS($14)
    表示“系統字型”檔案夾，例如：C:/WINNT/Fonts
  CSIDL_HISTORY($22)
    表示Inernet Explorer的“記錄”檔案夾
  CSIDL_INTERNET($1)
    表示Internet的這個虛擬資料夾
  CSIDL_INTERNET_CACHE($20)
    表示目前使用者的Internet Explorer的"Cache"檔案夾，例如：C:/Documents and Settings/username/Temporary Internet Files
  CSIDL_LOCAL_APPDATA($1C)
    表示目前使用者的應用程式資料檔案夾，例如：C:/Documents and Settings/username/Local Settings/Application Data
  CSIDL_MYMUSIC
    表示目前使用者儲存音樂檔案的檔案夾，例如：C:/Documents and Settings/User/My Documents/My Music
  CSIDL_MYPICTURES($27)
    表示目前使用者儲存影像檔的檔案夾，例如：C:/Documents and Settings/username/My Documents/My Pictures
  CSIDL_NETHOOD($13)
    表示目前使用者存在的網路連接的檔案夾，例如：C:/Documents and Settings/username/NetHood
  CSIDL_NETWORK($12)
    表示“網路位置”這個虛擬資料夾
  CSIDL_PERSONAL($5)
    表示目前使用者的“我的文件”檔案夾，例如：C:/Documents and Settings/username/My Documents
  CSIDL_PRINTERS($4)
    指向“印表機”這個虛擬資料夾
  CSIDL_PRINTHOOD($1B)
    表示目前使用者存在的網路印表機的虛擬資料夾，例如：C:/Documents and Settings/username/PrintHood
  CSIDL_PROFILE($28)
    表示當前用使用者設定檔的檔案夾
  CSIDL_PROGRAM_FILES($26)
    表示程式檔案的檔案夾，例如：C:/Program Files
  CSIDL_PROGRAM_FILES_COMMON($2B)
    表示系統程式共用組件檔案夾，例如：C:/Program Files/Common
  CSIDL_PROGRAMS($2)
    表示目前使用者的“程式”菜單檔案夾，例如：C:/Documents and Settings/username/Start Menu/Programs
  CSIDL_RECENT($8)
    表示目前使用者的“文檔”菜單檔案夾，例如：C:/Documents and Settings/username/Start Menu/Programs
  CSIDL_SENDTO($9)
    表示目前使用者的“發送到”檔案夾，例如：C:/Documents and Settings/username/SendTo
  CSIDL_STARTMENU($B)
    表示目前使用者的“開始”菜單檔案夾，例如：C:/Documents and Settings/username/Start Menu
  CSIDL_STARTUP($7)
    表示目前使用者的“啟動”菜單檔案夾，例如：C:/Documents and Settings/username/Start Menu/Programs/Startup
  CSIDL_SYSTEM($25)
    表示WINDOWS系統的系統檔案夾，例如：C:/WINNT/SYSTEM32
  CSIDL_TEMPLATES($15)
    表示的是系統中儲存文檔模組的檔案夾
  CSIDL_WINDOWS($24)
    表示的是系統中Windows目錄的檔案珍，例如：C:/WINNT

CSIDL可以在以下API函數中進行操作使用，至於函數的說明，我們可以參照MSDN中的API說明：
SHGetFolderLocation, SHGetFolderPath, SHGetSpecialFolderLocation, SHGetSpecialFolderPath

我們看下面一個例子：
//開啟一些特殊的檔案夾，需要加上ActiveX,shellapi,shlObj單元
Uses ActiveX, ShellApi, ShlObj;
Function OpenSpecialFolder(Flag:Integer;Handle: HWND = 0):Boolean;
//這裡的Flag就是我們需要開啟的檔案夾的CSIDL值
  Procedure FreePidl(pidl: PItemIDList);//釋放掉PItemIDList執行個體
  var
    allocator: IMalloc;
  begin
    if Succeeded(shlobj.SHGetMalloc(allocator)) then
    begin
      allocator.Free(pidl);
    {$IFDEF VER90}
      allocator.Release;
    {$ENDIF}
    end;
  end;
var
  exInfo: TShellExecuteInfo;
begin
  FillChar(exInfo, SizeOf(exInfo), 0);//給exInfo設定初始值
  with exInfo do
  begin
    cbSize:=  Sizeof(exInfo);
    fMask:= SEE_MASK_FLAG_DDEWAIT or SEE_MASK_IDLIST;
    Wnd:= handle;
    nShow:= SW_SHOWNORMAL;
    lpVerb:=  'open';
    SHGetSpecialFolderLocation(Handle, Flag, PItemIDLIst(lpIDList));//定位到由CSIDL值指定的檔案夾
  end;
  ShellExecuteEx(@exInfo);//開啟檔案夾
  FreePidl(exInfo.lpIDList);
end;

//調用上面寫的這個函數：
procedure TForm1.Button5Click(Sender: TObject);
begin
  OpenSpecialFolder($0);//或是OPenSpecialFolder(CSIDL_DESKTOP),開啟“案頭”視窗
end;
  至於CSIDL與其它函數的配置使用方法，大家可自己參照MSDN!