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

王朝vc·作者佚名  2006-01-08
窄屏简体版  字體: |||超大  

在桌面创建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);

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
© 2005- 王朝網路 版權所有 導航