ShortCutDlg.cpp
上传用户:qzzxgm
上传日期:2009-12-14
资源大小:1882k
文件大小:13k
源码类别:

书籍源码

开发平台:

Visual C++

  1. // ShortCutDlg.cpp : implementation file
  2. //
  3. #include "stdafx.h"
  4. #include "ShortCut.h"
  5. #include "ShortCutDlg.h"
  6. #include "NameDlg.h"
  7. #ifdef _DEBUG
  8. #define new DEBUG_NEW
  9. #undef THIS_FILE
  10. static char THIS_FILE[] = __FILE__;
  11. #endif
  12. /////////////////////////////////////////////////////////////////////////////
  13. // CAboutDlg dialog used for App About
  14. class CAboutDlg : public CDialog
  15. {
  16. public:
  17. CAboutDlg();
  18. // Dialog Data
  19. //{{AFX_DATA(CAboutDlg)
  20. enum { IDD = IDD_ABOUTBOX };
  21. //}}AFX_DATA
  22. // ClassWizard generated virtual function overrides
  23. //{{AFX_VIRTUAL(CAboutDlg)
  24. protected:
  25. virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV support
  26. //}}AFX_VIRTUAL
  27. // Implementation
  28. protected:
  29. //{{AFX_MSG(CAboutDlg)
  30. //}}AFX_MSG
  31. DECLARE_MESSAGE_MAP()
  32. };
  33. CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
  34. {
  35. //{{AFX_DATA_INIT(CAboutDlg)
  36. //}}AFX_DATA_INIT
  37. }
  38. void CAboutDlg::DoDataExchange(CDataExchange* pDX)
  39. {
  40. CDialog::DoDataExchange(pDX);
  41. //{{AFX_DATA_MAP(CAboutDlg)
  42. //}}AFX_DATA_MAP
  43. }
  44. BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
  45. //{{AFX_MSG_MAP(CAboutDlg)
  46. // No message handlers
  47. //}}AFX_MSG_MAP
  48. END_MESSAGE_MAP()
  49. /////////////////////////////////////////////////////////////////////////////
  50. // CShortCutDlg dialog
  51. CShortCutDlg::CShortCutDlg(CWnd* pParent /*=NULL*/)
  52. : CDialog(CShortCutDlg::IDD, pParent)
  53. {
  54. //{{AFX_DATA_INIT(CShortCutDlg)
  55. m_nLocation = 0;
  56. //}}AFX_DATA_INIT
  57. // Note that LoadIcon does not require a subsequent DestroyIcon in Win32
  58. m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
  59. }
  60. void CShortCutDlg::DoDataExchange(CDataExchange* pDX)
  61. {
  62. CDialog::DoDataExchange(pDX);
  63. //{{AFX_DATA_MAP(CShortCutDlg)
  64. DDX_Radio(pDX, IDC_RADIO1, m_nLocation);
  65. //}}AFX_DATA_MAP
  66. }
  67. BEGIN_MESSAGE_MAP(CShortCutDlg, CDialog)
  68. //{{AFX_MSG_MAP(CShortCutDlg)
  69. ON_WM_SYSCOMMAND()
  70. ON_WM_PAINT()
  71. ON_WM_QUERYDRAGICON()
  72. ON_BN_CLICKED(IDC_CREATEGROUP, OnCreateGroup)
  73. ON_BN_CLICKED(IDC_CREATEITEM, OnCreateItem)
  74. ON_BN_CLICKED(IDC_DELETEGROUP, OnDeleteGroup)
  75. ON_BN_CLICKED(IDC_DELETEITEM, OnDeleteItem)
  76. ON_WM_DESTROY()
  77. //}}AFX_MSG_MAP
  78. END_MESSAGE_MAP()
  79. /////////////////////////////////////////////////////////////////////////////
  80. // CShortCutDlg message handlers
  81. BOOL CShortCutDlg::OnInitDialog()
  82. {
  83. CDialog::OnInitDialog();
  84. // Add "About..." menu item to system menu.
  85. // IDM_ABOUTBOX must be in the system command range.
  86. ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
  87. ASSERT(IDM_ABOUTBOX < 0xF000);
  88. CMenu* pSysMenu = GetSystemMenu(FALSE);
  89. if (pSysMenu != NULL)
  90. {
  91. CString strAboutMenu;
  92. strAboutMenu.LoadString(IDS_ABOUTBOX);
  93. if (!strAboutMenu.IsEmpty())
  94. {
  95. pSysMenu->AppendMenu(MF_SEPARATOR);
  96. pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
  97. }
  98. }
  99. // Set the icon for this dialog.  The framework does this automatically
  100. //  when the application's main window is not a dialog
  101. SetIcon(m_hIcon, TRUE); // Set big icon
  102. SetIcon(m_hIcon, FALSE); // Set small icon
  103. // TODO: Add extra initialization here
  104. CoInitialize (NULL);
  105.     
  106. return TRUE;  // return TRUE  unless you set the focus to a control
  107. }
  108. void CShortCutDlg::OnSysCommand(UINT nID, LPARAM lParam)
  109. {
  110. if ((nID & 0xFFF0) == IDM_ABOUTBOX)
  111. {
  112. CAboutDlg dlgAbout;
  113. dlgAbout.DoModal();
  114. }
  115. else
  116. {
  117. CDialog::OnSysCommand(nID, lParam);
  118. }
  119. }
  120. // If you add a minimize button to your dialog, you will need the code below
  121. //  to draw the icon.  For MFC applications using the document/view model,
  122. //  this is automatically done for you by the framework.
  123. void CShortCutDlg::OnPaint() 
  124. {
  125. if (IsIconic())
  126. {
  127. CPaintDC dc(this); // device context for painting
  128. SendMessage(WM_ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0);
  129. // Center icon in client rectangle
  130. int cxIcon = GetSystemMetrics(SM_CXICON);
  131. int cyIcon = GetSystemMetrics(SM_CYICON);
  132. CRect rect;
  133. GetClientRect(&rect);
  134. int x = (rect.Width() - cxIcon + 1) / 2;
  135. int y = (rect.Height() - cyIcon + 1) / 2;
  136. // Draw the icon
  137. dc.DrawIcon(x, y, m_hIcon);
  138. }
  139. else
  140. {
  141. CDialog::OnPaint();
  142. }
  143. }
  144. // The system calls this to obtain the cursor to display while the user drags
  145. //  the minimized window.
  146. HCURSOR CShortCutDlg::OnQueryDragIcon()
  147. {
  148. return (HCURSOR) m_hIcon;
  149. }
  150. //浏览文件夹
  151. BOOL CShortCutDlg::BrowseForFolder(
  152.     LPITEMIDLIST pidlRoot,//浏览开始处的PIDL
  153.     LPITEMIDLIST *ppidlDestination,
  154.                 //浏览结束时所选择的PIDL
  155.     LPCSTR lpszTitle)//浏览对话框中的提示文字
  156. {    
  157. BROWSEINFO BrInfo ;
  158.     ZeroMemory( &BrInfo, sizeof(BrInfo)) ;
  159.     BrInfo.hwndOwner = HWND_DESKTOP ;
  160.     BrInfo.pidlRoot = pidlRoot ;
  161.     BrInfo.lpszTitle = lpszTitle ;
  162.     //浏览文件夹
  163.     *ppidlDestination= SHBrowseForFolder(&BrInfo);
  164.     //用户选择了取消按钮
  165.     if(NULL == *ppidlDestination)
  166.         return FALSE ;
  167.     return TRUE ;
  168. }
  169. //取得快捷方式的目标应用程序名
  170. BOOL CShortCutDlg::SelectMenuItem( LPSTR szFileName)
  171. {
  172.     OPENFILENAME ofn ;
  173.     static CHAR szFilter[] = "Programs*.exe" ;
  174.     ZeroMemory(&ofn, sizeof( OPENFILENAME)) ;
  175.     ofn.lStructSize = sizeof( OPENFILENAME) ;
  176.     ofn.hwndOwner = HWND_DESKTOP;
  177.     ofn.lpstrFilter = szFilter ;
  178.     ofn.nFilterIndex = 0 ;
  179.     ofn.nMaxFile = MAX_PATH ;
  180.     ofn.lpstrTitle = "请选择目标应用程序:" ;
  181.     ofn.lpstrFile = szFileName ;
  182.     ofn.Flags = OFN_FILEMUSTEXIST | 
  183.             OFN_PATHMUSTEXIST | OFN_EXPLORER ;
  184.     //文件浏览
  185.     if(!GetOpenFileName( &ofn))//选择了取消按钮
  186.         return FALSE ;
  187.     return TRUE ;
  188. }
  189. //取得要创建的快捷方式的名字
  190. BOOL CShortCutDlg::GetShortcutCrt(LPSTR szPath)
  191. {
  192.     LPITEMIDLIST pidlBeginAt, pidlDestination ;
  193.     
  194.     // 取得开始菜单或桌面的PIDL
  195.     SHGetSpecialFolderLocation( HWND_DESKTOP, 
  196.                 nBeginAt, &pidlBeginAt) ;
  197.     // 取得要创建的快捷方式所在的位置
  198.     if( !BrowseForFolder(pidlBeginAt,                         &pidlDestination, 
  199.                 "请选择快捷方式所在的位置:"))
  200.         return FALSE ;
  201.     // 把PIDL转换为路径名
  202.     SHGetPathFromIDList( pidlDestination, szPath) ;
  203.     // 取得快捷方式名称
  204.     CNameDlg name_dlg;
  205. if(name_dlg.DoModal() == IDCANCEL)    
  206.         return FALSE ;
  207.     //把快捷方式名和扩展名.LNK添加到路径名后
  208.     //形成完整的快捷方式数据文件名
  209.     wsprintf(szPath+lstrlen(szPath),"\%s.lnk", 
  210.                 name_dlg.m_strName) ;
  211.     return TRUE ;
  212. }
  213. //创建快捷方式
  214. BOOL CShortCutDlg::CreateLink ( 
  215.     LPSTR szPath,//快捷方式的目标应用程序名
  216.     LPSTR szLink)//快捷方式的数据文件名(*.lnk)
  217. {
  218. HRESULT hres ;
  219. IShellLink * psl ;
  220. IPersistFile* ppf ;
  221. WORD wsz[ MAX_PATH] ;
  222.     //创建一个IShellLink实例
  223.     hres = CoCreateInstance( CLSID_ShellLink, NULL,
  224.         CLSCTX_INPROC_SERVER, IID_IShellLink,
  225.         (void **)&psl) ;
  226. if( FAILED( hres))
  227.         return FALSE ;
  228.     //设置目标应用程序
  229.     psl -> SetPath( szPath) ;
  230.     //设置快捷键(此处设为Shift+Ctrl+'R')
  231.     psl -> SetHotkey( MAKEWORD( 'R',
  232. HOTKEYF_SHIFT |HOTKEYF_CONTROL)) ;
  233.     //从IShellLink获取其IPersistFile接口
  234.     //用于保存快捷方式的数据文件 (*.lnk)
  235.     hres = psl -> QueryInterface( IID_IPersistFile,
  236. (void**)&ppf) ;
  237. if( FAILED( hres))
  238.         return FALSE ;
  239. // 确保数据文件名为ANSI格式
  240. MultiByteToWideChar( CP_ACP, 0, szLink, -1, 
  241. wsz, MAX_PATH) ;
  242.     //调用IPersistFile::Save
  243.     //保存快捷方式的数据文件 (*.lnk)
  244. hres = ppf -> Save( wsz, STGM_READWRITE) ;
  245.     //释放IPersistFile和IShellLink接口
  246. ppf -> Release( ) ;
  247. psl -> Release( ) ;
  248. return TRUE;
  249. }
  250. BOOL CShortCutDlg::DeleteFolder( LPSTR pszFolder)
  251. {
  252.     SHFILEOPSTRUCT fos ;
  253.     
  254.     ZeroMemory( &fos, sizeof( fos)) ;
  255.     fos.hwnd = HWND_DESKTOP;
  256.     fos.wFunc = FO_DELETE ;
  257.     fos.fFlags = FOF_SILENT | FOF_ALLOWUNDO ;
  258.     fos.pFrom = pszFolder ;
  259.     // 删除文件夹及其内容
  260.     if( 0 != SHFileOperation( &fos))
  261.         return FALSE ;
  262.     return TRUE;
  263. }
  264. //取得要删除的快捷方式
  265. BOOL CShortCutDlg::GetShortcutDel (
  266.         LPSTR lpszInitDir,//选择文件的开始目录
  267.         LPSTR lpszShortcut)//快捷方式名
  268. {
  269.     OPENFILENAME ofn ;
  270.     char szFilter[] = "Shortcuts*.lnk" ;
  271.     ZeroMemory(&ofn,sizeof( OPENFILENAME));
  272.     ofn.lStructSize = sizeof( OPENFILENAME) ;
  273.     ofn.hwndOwner = HWND_DESKTOP ;
  274.     ofn.lpstrFilter = szFilter ;
  275.     ofn.nFilterIndex = 0 ;
  276.     ofn.nMaxFile = MAX_PATH ;
  277.     ofn.lpstrTitle = "请选择要删除的快捷方式:" ;
  278.     ofn.lpstrFile = lpszShortcut;
  279.     ofn.lpstrInitialDir = lpszInitDir ;
  280.     ofn.Flags = OFN_FILEMUSTEXIST | 
  281.         OFN_PATHMUSTEXIST | OFN_EXPLORER |
  282.         OFN_NODEREFERENCELINKS ;
  283.     //文件浏览
  284.     if(! GetOpenFileName( &ofn))//选择了取消按钮
  285.         return FALSE ;
  286.     return TRUE ;
  287. }
  288. //删除快捷方式的数据文件 (*.lnk)
  289. BOOL CShortCutDlg::DeleteLink( LPSTR lpszShortcut)
  290. {
  291.     SHFILEOPSTRUCT fos ;
  292.     ZeroMemory( &fos, sizeof(fos)) ;
  293.     fos.hwnd = HWND_DESKTOP ;
  294.     fos.wFunc = FO_DELETE ;
  295.     fos.pFrom = lpszShortcut;
  296.     fos.pTo = NULL ;
  297.     fos.fFlags = FOF_SILENT | FOF_ALLOWUNDO ;
  298.     //删除快捷方式(*.lnk)
  299.     if( 0 != SHFileOperation( &fos))
  300.         return FALSE ;
  301.     return TRUE ;
  302. }
  303. // 通知shell有关变化
  304. void CShortCutDlg::NotifyShell(LONG wEventId,//事件标志
  305.             LPSTR szPath)//路径
  306. {    
  307.     SHChangeNotify( wEventId,
  308.                     SHCNF_FLUSH | SHCNF_PATH,
  309.                     szPath,0);
  310.     //取得szPath的父目录
  311.     char* p;
  312.     for( p=szPath+lstrlen(szPath)-1;
  313.             *p != '\'; 
  314.             p--);
  315.     *p='';
  316.     SHChangeNotify(SHCNE_UPDATEDIR
  317.             |SHCNE_INTERRUPT, 
  318.             SHCNF_FLUSH | SHCNF_PATH,szPath,0);
  319. }
  320. void CShortCutDlg::OnCreateGroup() 
  321. {
  322. UpdateData(TRUE);
  323. if(m_nLocation==0)
  324. {
  325. //设置起始文件夹为桌面
  326. nBeginAt=CSIDL_DESKTOPDIRECTORY ;    
  327. }
  328. else
  329. {
  330. //设置起始文件夹为“开始”菜单
  331. nBeginAt=CSIDL_STARTMENU;
  332. }
  333. LPITEMIDLIST pidlBeginAt, pidlDestination ;
  334.     char szPath[ MAX_PATH] ;
  335.     // 取得开始菜单或桌面的PIDL
  336.     SHGetSpecialFolderLocation( HWND_DESKTOP, 
  337.             nBeginAt, &pidlBeginAt) ;
  338.     // 取得新建文件夹的父文件夹
  339.     if( !BrowseForFolder(pidlBeginAt , 
  340.             &pidlDestination,
  341.             "请选择新建文件夹/菜单组的位置:"))
  342.         return ;
  343.     // 把PIDL转换为路径名
  344.     SHGetPathFromIDList( pidlDestination, szPath) ;
  345.     //取得新建文件夹的名字
  346.     CNameDlg name_dlg;
  347.     if(name_dlg.DoModal() == IDCANCEL)
  348.         return;
  349.     //形成完整的新建文件夹名
  350.     wsprintf(szPath+lstrlen(szPath),"\%s",
  351.                 name_dlg.m_strName);
  352.     //创建文件夹(子目录)
  353.     if( !CreateDirectory( szPath, NULL))
  354.     {
  355.         MessageBox( "创建文件夹失败!") ;
  356.         return ;
  357.     }
  358.     // 通知shell有关变化
  359.     NotifyShell( SHCNE_MKDIR|SHCNE_INTERRUPT,
  360.                 szPath);
  361. }
  362. void CShortCutDlg::OnCreateItem() 
  363. {
  364. UpdateData(TRUE);
  365. if(m_nLocation==0)
  366. {
  367. //设置起始文件夹为桌面
  368. nBeginAt=CSIDL_DESKTOPDIRECTORY ;    
  369. }
  370. else
  371. {
  372. //设置起始文件夹为“开始”菜单
  373. nBeginAt=CSIDL_STARTMENU;
  374. }
  375. char szPath[MAX_PATH]="";
  376.                 //快捷方式的目标应用程序名
  377.     char szLink[MAX_PATH]="";
  378.                 //快捷方式的数据文件名
  379.     // 取得快捷方式的目标应用程序名
  380.     if( !SelectMenuItem( szPath))
  381.         return ;
  382.     // 取得新建快捷方式所在的文件夹
  383.     //并形成其数据文件名
  384.     if( !GetShortcutCrt( szLink))
  385.         return ;
  386.     // 创建快捷方式
  387.     if(!CreateLink( szPath, szLink) )
  388.         return;
  389.     // 通知shell有关变化
  390.     NotifyShell( SHCNE_CREATE|SHCNE_INTERRUPT, 
  391.                 szLink) ;
  392. }
  393. void CShortCutDlg::OnDeleteGroup() 
  394. {
  395. UpdateData(TRUE);
  396. if(m_nLocation==0)
  397. {
  398. //设置起始文件夹为桌面
  399. nBeginAt=CSIDL_DESKTOPDIRECTORY ;    
  400. }
  401. else
  402. {
  403. //设置起始文件夹为“开始”菜单
  404. nBeginAt=CSIDL_STARTMENU;
  405. }
  406. LPITEMIDLIST pidlBeginAt, pidlFolder ;
  407.     char szPath[MAX_PATH]="";
  408.     // 取得开始菜单或桌面的PIDL
  409.     SHGetSpecialFolderLocation( HWND_DESKTOP, 
  410.                 nBeginAt, &pidlBeginAt) ;
  411.     // 取得要删除的文件夹
  412.     if( !BrowseForFolder( pidlBeginAt, &pidlFolder, 
  413.             "请选择要删除的文件夹/菜单组:"))
  414.         return ;
  415.     // 把PIDL转化为路径名
  416.     SHGetPathFromIDList( pidlFolder, szPath) ;
  417.     // 删除文件夹
  418.     if(!DeleteFolder( szPath))
  419.         return ;
  420.     // 通知shell有关变化
  421.     NotifyShell( SHCNE_RMDIR|SHCNE_INTERRUPT, 
  422.                     szPath) ;
  423. }
  424. void CShortCutDlg::OnDeleteItem() 
  425. {
  426. UpdateData(TRUE);
  427. if(m_nLocation==0)
  428. {
  429. //设置起始文件夹为桌面
  430. nBeginAt=CSIDL_DESKTOPDIRECTORY ;    
  431. }
  432. else
  433. {
  434. //设置起始文件夹为“开始”菜单
  435. nBeginAt=CSIDL_STARTMENU;
  436. }
  437. LPITEMIDLIST pidlBeginAt ;
  438.     char szShortcut[ MAX_PATH]="",
  439.         szPath[ MAX_PATH]="";
  440.     // 取得开始菜单或桌面的PIDL
  441.     SHGetSpecialFolderLocation( HWND_DESKTOP, 
  442.                 nBeginAt, &pidlBeginAt) ;
  443.     // 把PIDL转化为路径名
  444.     SHGetPathFromIDList( pidlBeginAt, szPath) ;
  445.     // 取得要删除的快捷方式
  446.     if( !GetShortcutDel( szPath, szShortcut))
  447.         return ;
  448.     // 删除快捷方式
  449.     if( !DeleteLink(szShortcut))
  450.         return ;
  451.     // 通知SHELL有关改变
  452.     NotifyShell( SHCNE_DELETE|SHCNE_INTERRUPT, 
  453.                 szShortcut) ;
  454. }
  455. void CShortCutDlg::OnDestroy() 
  456. {
  457. CoUninitialize();
  458.     
  459. CDialog::OnDestroy();
  460. }