开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 系统编程 > 查看源码
pidl.c
资源名称：shell.rar　[点击查看]
上传用户：xhy777
上传日期：2007-02-14
资源大小：24088k
文件大小：2k
源码类别：

系统编程

开发平台：

Visual C++

pidl.c：源码内容
  1. /*
  2.  * pidl - PIDLs and diddles
  3.  *
  4.  */
  6. #include "tweakui.h"
  8. #pragma BEGIN_CONST_DATA
  10. #pragma END_CONST_DATA
  12. /*****************************************************************************
  13.  *
  14.  *  pidlFromPath
  15.  *
  16.  * Create a pidl from an psf and a relative path.
  17.  *
  18.  *****************************************************************************/
  20. PIDL PASCAL
  21. pidlFromPath(LPSHELLFOLDER psf, LPCTSTR lqn)
  22. {
  23.     PIDL pidl;
  24.     UnicodeFromPtsz(wsz, lqn);
  25.     if (SUCCEEDED(psf->lpVtbl->ParseDisplayName(psf, 0, 0, wsz, 0, &pidl, 0))) {
  26. return pidl;
  27.     } else {
  28. return 0;
  29.     }
  30. }
  32. /*****************************************************************************
  33.  *
  34.  *  SetNameOfPidl
  35.  *
  36.  * Change a pidl's name.
  37.  *
  38.  *****************************************************************************/
  40. HRESULT PASCAL
  41. SetNameOfPidl(PSF psf, PIDL pidl, LPCTSTR ptszName)
  42. {
  43.     UnicodeFromPtsz(wsz, ptszName);
  44.     return psf->lpVtbl->SetNameOf(psf, 0, pidl, wsz, 0, 0);
  45. }
  47. /*****************************************************************************
  48.  *
  49.  *  ComparePidls
  50.  *
  51.  * Compare two pidls.
  52.  *
  53.  *****************************************************************************/
  55. HRESULT PASCAL
  56. ComparePidls(PIDL pidl1, PIDL pidl2)
  57. {
  58.     return psfDesktop->lpVtbl->CompareIDs(psfDesktop, 0, pidl1, pidl2);
  59. }
  61. /*****************************************************************************
  62.  *
  63.  *  GetSystemImageList
  64.  *
  65.  * Get the large or small image list handle.
  66.  *
  67.  * The dword argument is 0 for the large image list, or
  68.  * SHGFI_SMALLICON for the small image list.
  69.  *
  70.  *****************************************************************************/
  72. HIML PASCAL
  73. GetSystemImageList(DWORD dw)
  74. {
  75.     SHFILEINFO sfi;
  76.     return (HIML)SHGetFileInfo(g_tszPathShell32, FILE_ATTRIBUTE_DIRECTORY,
  77.        &sfi, sizeof(sfi), SHGFI_USEFILEATTRIBUTES |
  78.        SHGFI_SYSICONINDEX | dw);
  79. }