程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> C語言 >> C++ >> 關於C++ >> 如何在快速啟動欄創建快捷方式

如何在快速啟動欄創建快捷方式

編輯:關於C++
#define NO_WIN32_LEAN_AND_MEAN
#include <shlobj.hpp>
#include <vcl.h>
// 以上三行放在單元文件最開始
//---------------------------------------------------------------------------
struct TShortcutCfg
{
  // 構造函數
  TShortcutCfg()
  {
    nShowCmd = SW_SHOWNORMAL;
    wHotKey = 0;
    nIconIndex = 0;
  }
  // 結構成員:
  AnsiString strShortcutName; //
  AnsiString strLnkDir;    //
  AnsiString strDestFile;   //
  AnsiString strArguments;  //
  AnsiString strIconFile;   //
  int     nIconIndex;   //
  AnsiString strWorkingDir;  //
  AnsiString strDescription; //
  WORD    wHotKey;     //
  int     nShowCmd;    //
};
//---------------------------------------------------------------------------
// 在快速啟動欄創建快捷方式
bool CreateQuickLaunchShortcut(TShortcutCfg *scConfig)
{
  char szBuf[MAX_PATH];
  bool bReturn = true;
  wchar_t wszBuf[MAX_PATH];
  IShellLink *pShellLink;
  AnsiString strShortcutFile;
  LPITEMIDLIST lpItemIdList;
  SHGetSpecialFolderLocation(0, CSIDL_APPDATA, &lpItemIdList);
  SHGetPathFromIDList(lpItemIdList, szBuf);
  if(DirectoryExists(AnsiString(szBuf)))
  {
    strShortcutFile = AnsiString(szBuf)
      + "\\Microsoft\\Internet Explorer\\Quick Launch\\"
      + scConfig->strShortcutName + ".lnk";
    strShortcutFile.WideChar(wszBuf, MAX_PATH);
  }
  else
    bReturn = false;
  if(bReturn)
  {
    bReturn = CoCreateInstance (CLSID_ShellLink, NULL, CLSCTX_INPROC_SERVER,
        IID_IShellLink, (void **)&pShellLink) >= 0;
    if(bReturn)
    {
      IPersistFile *ppf;
      bReturn = pShellLink->QueryInterface(IID_IPersistFile, (void **)&ppf) >= 0;
      if(bReturn)
      {
        // 目標文件
        if(scConfig->strDestFile != EmptyStr)
        bReturn = pShellLink->SetPath(scConfig->strDestFile.c_str()) >= 0;
        // 參數
        if(bReturn && scConfig->strArguments != EmptyStr)
        bReturn = pShellLink->SetArguments(scConfig->strArguments.c_str()) >= 0;
        // 顯示圖標
        if(bReturn && scConfig->strIconFile !=
            EmptyStr && FileExists(scConfig->strIconFile))
          pShellLink->SetIconLocation(scConfig->strIconFile.c_str(),
              scConfig->nIconIndex);
        // 起始位置
        if(bReturn && scConfig->strWorkingDir != EmptyStr)
          pShellLink->SetWorkingDirectory(scConfig->strWorkingDir.c_str());
        // 備注
        if(bReturn && scConfig->strDescription != EmptyStr)
          pShellLink->SetDescription(scConfig->strDescription.c_str());
        // 快捷鍵
        if(bReturn && scConfig->wHotKey != 0)
          pShellLink->SetHotkey(scConfig->wHotKey);
        // 運行方式
        if(bReturn && scConfig->nShowCmd != 0)
          pShellLink->SetShowCmd(scConfig->nShowCmd);
        if(bReturn)
          bReturn = (ppf->Save(wszBuf, TRUE) >= 0);
        ppf->Release ();
      }
      pShellLink->Release ();
    }
  }
  return bReturn;
}
// 調用代碼舉例:
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  TShortcutCfg scShortcut;
  scShortcut.strDestFile = "C:\\123\\123.exe";
  scShortcut.strShortcutName = "test";
  if(CreateQuickLaunchShortcut(&scShortcut))
    ShowMessage("在快速啟動欄創建快捷方式成功!");
}
  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved