在桌面创建IE风格的快捷方式(无小箭头)

来源:互联网 发布:java ocr文字识别 编辑:程序博客网 时间:2024/06/08 03:17
在桌面创建IE风格的快捷方式(无小箭头)
在桌面创建IE风格的快捷方式
This article was contributed by Sundar & Naresh 
我们如果要在桌面上建立一个快捷方式,我们通常是用IShellLink接口来生成一
个.lnk文件。用这种方式创建,我们在桌面上得到的是一个左下方还含有小箭头
的图标,右击它,你会看到正常的弹出菜单(含有复制、粘贴等)。但是你看桌面
上IE的快捷方式,你会看到它是一个正常的图标(没有小箭头),而且弹出菜单
也不同。下面我们来建立一个这种风格的快捷方式。

执行这段代码,你会在桌面上获得一个名叫"Netlinker"的图标,右击它,
你会看到一个定制的菜单(没有剪切、复制、粘贴、重命名等菜单祥)。
你甚至不能把它从桌面上删除,如果你选“属性”,它会打开IE的属性对话框

选一个图标文件 
CString shtct_ico=_T("C:\\32x32.ico");
显示IE属性对话框. 
CString shtct_prop=_T("rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,0");
快捷方式的名字
CString shtct_name=_T("Netlinker");
找到IE的路径并保存它. 
CRegKey m_Kiepath;
CString ie_path;
DWORD dwval;
m_Kiepath.Open(HKEY_LOCAL_MACHINE,
               "SOFTWARE\\Microsoft\\Windows\\"
               "CurrentVersion\\App Paths\\IEXPLORE.EXE");
m_Kiepath.QueryValue(ie_path.GetBuffer(1000),
                     NULL,
                     &dwval);
m_Kiepath.Close();
CString shtct_to=ie_path;
用guidgen.exe创建一个GUID并复制粘贴到这里。这是用来表现我们的快捷方式和它
的菜单项的。我用guidgen.ext创建的GUID是6270AEE4-AA41-11d4-A25D-008048B63F94。 
下面的程序在HKCR\CLSID创建这个 GUID 键,并且将快捷方式的值设为它。
CRegKey m_kdsktp;
m_kdsktp.Create(HKEY_CLASSES_ROOT,
                "CLSID\\{6270AEE4-AA41-11d4-A25D-"
                "008048B63F94}");
m_kdsktp.SetValue(shtct_name);
m_kdsktp.Close();
在这个GUID下创建DefaultIcon 键, 它是用来表现快捷方式的图标的
并把他的值设为相应的图标文件的路径. 

m_kdsktp.Create(HKEY_CLASSES_ROOT,
                "CLSID\\{6270AEE4-AA41-11d4-A25D"
                "-008048B63F94}\\DefaultIcon");
m_kdsktp.SetValue(shtct_ico);
m_kdsktp.Close();
设置右击菜单的菜单项.
设置打开菜单项 
m_kdsktp.Create(HKEY_CLASSES_ROOT,
                "CLSID\\{6270AEE4-AA41-11d4-A25D-"
                "008048B63F94}\\Shell\\Open\\Command");
m_kdsktp.SetValue(shtct_to);
m_kdsktp.Close();
设置属性菜单项. 
m_kdsktp.Create(HKEY_CLASSES_ROOT,
                "CLSID\\{6270AEE4-AA41-11d4-A25D-"
                "008048B63F94}\\Shell\\Properties\\Command");
m_kdsktp.SetValue(shtct_prop);
m_kdsktp.Close();
把原来的缺省菜单项(如复制粘贴等)去掉.
BYTE *b;
HANDLE heap;
char a[20];
m_kdsktp.Create(HKEY_CLASSES_ROOT,
                "CLSID\\{6270AEE4-AA41-11d4-A25D-"
                "008048B63F94}\\ShellFolder");
strcpy(a,"00.00.00.00");
heap=HeapCreate(0,0,0);
b=(BYTE*)HeapAlloc(heap,0,30);
sscanf(a,
       "%x.%x.%x.%x",
       &b[0],
       &b[1],
       &b[2],
       &b[3]);
RegSetValueEx(m_kdsktp.m_hKey,
              "Attributes",
              0,
              REG_BINARY,
              b,
              4);
HeapFree(heap, 0, b);
HeapDestroy(heap);
m_kdsktp.Close();
接下来我们添加一个引用到
HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Desktop\Namespace
这样它将只显示在桌面上。
m_kdsktp.Create(HKEY_LOCAL_MACHINE,
                "SOFTWARE\\Microsoft\\Windows\\"
                "CurrentVersion\\Explorer\\Desktop\\"
                "NameSpace\\{6270AEE4-AA41-11d4-A25D-"
                "008048B63F94}");
m_kdsktp.SetValue("Netlink");
m_kdsktp.Close();
我们对Shell作了改动,我们要通知系统,这个改动才会马上表现出来.
SHChangeNotify(SHCNE_ASSOCCHANGED,SHCNF_FLUSHNOWAIT, 0, 0);
0 0