怎么在IE工具栏里加按钮？(50分)

装过金山词霸2000，发现它会自动在IE的工具栏里添加两个指
向它的主页的按钮，这是怎么实现的？

应该是通过Com接口实现的，可惜手头没有这方面的资料。如果谁能做出
切实可行的例程或提供相关的资料我再加200分。

呵呵, 看看这里:
http://www.gislab.ecnu.edu.cn/delphibbs/dispq.asp?LID=159234

这里有一个一样的问题:
http://www.gislab.ecnu.edu.cn/delphibbs/DispQ.asp?LID=159374

实现起来其实很简单,只是繁琐而已. 如果需要例子程序,请加分.

你的分也够多了，还要呀？
我去看看那个网址，如果我搞不定，再来问你，谢谢乐

如果觉得不合适,你可以不给我分呀! 我只是多嘴而已.

尊敬的cAkk先生/小姐:

如果不花钱,也能得到一份的话,请给一份.
<font color="#0000A0">
<pre class="text"> 如果不花钱,也能得到一份的话,请给一份!
<a href="mailto:yunfeng_l@263.net">my mail</a></font></pre>
)

别想赖帐,抓住小辫子不放松!

>>我现在已经掌握的技术有:
1.在IE主菜单,右键菜单里面添加项目,从而执行一个javascript,COM,或exe;
2.给IE添加一个就像history的那个dock窗口一样,里面可以显示html文件,COM对象;

------<<Cakk答题记录>>

---<<>>
忘记不能用'<'了 ,被滤掉了.
应该是 (Cakk答题记录)

single: 因为我已经把原理说的差不多了,剩下的例子的代码写起来应该没什么
问题,只是很麻烦,这是体力活,所以我要加分----这也是希望你凡事
自己先动动手,培养你的自学能力嘛! (瞧,理由多动听呀!)

Charles: 我没有成型的例子代码,因为我很懒.知道原理就可以了.

哎! 脑袋里塞的满满的,却没有精力把它写出来. 我也不知道我每天都在忙活些什么? :-(

看了:http://www.gislab.ecnu.edu.cn/delphibbs/DispQ.asp?LID=159374.
真的是满费体力的.
明白了大侠的苦衷.

多人接受答案了。

、建立一个GUID。
2、打开注册表编辑器，转到HKEY_LOCAL_MACHINE/Software/Microsoft/Internet Explorer/Extensions部分，
在其下添加一个新的项，名称为 <Your GUID> ，Your GUID为你刚建立的GUID。
3、在注册表的 HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Internet Explorer/Extensions/<Your GUID>
下建立一个新的String类型的值，名称为HotIcon，该值定义当按钮具有热点时的图标，它的一般类型为：
包含图标的文件全路径名,图标索引，例如：
C:/PROGRA~1/KINGSOFT/XDICT/ieplugin.DLL,208
4、在注册表的 HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Internet Explorer/Extensions/<Your GUID>
下建立一个新的String类型的值，名称为Icon，该值定义当按钮的图标，它的一般类型为：
图标文件全路径名,图标索引
5、在注册表的 HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Internet Explorer/Extensions/<Your GUID>
下建立一个新的String类型的值，名称为ButtonText，该值定义按钮的ToolTip文本。
6、在注册表的 HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Internet Explorer/Extensions/<Your GUID>
下建立一个新的String类型的值，名称为Default Visible，该值定义按钮是否可见，如果是，则该值设定
为"Yes"，否则设定为"No"。
7、在注册表的 HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Internet Explorer/Extensions/<Your GUID>
下建立一个新的String类型的值，名称为Clsid，将该值设定为{1FBA04EE-3024-11D2-8F1F-0000F87ABD16}
8、在注册表的 HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Internet Explorer/Extensions/<Your GUID>
下建立一个新的String类型的值，名称为Exec，该值定义点击按钮后运行的文件的全路径名称，例如:
c:/program files/samples/net.exe

例如NetAnts的按钮注册表项的内容就是象下面这样：

Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Internet Explorer/Extensions/{57E91B47-F40A-11D1-B792-444553540000}]
"CLSID"="{1FBA04EE-3024-11D2-8F1F-0000F87ABD16}"
"Default Visible"="Yes"
"HotIcon"="C://PROGRA~1//NETANTS//NetAnts.exe,1001"
"Icon"="C://PROGRA~1//NETANTS//NetAnts.exe,1000"
"Exec"="C://PROGRA~1//NETANTS//NetAnts.exe"
"ButtonText"="NetAnts"
"MenuText"="&NetAnts"
"MenuStatusBar"="Launch NetAnts"

当点击NetAnts按钮时就会运行Netants。上面的注册表项中下面的两项：MenuText项添加一个菜单项到菜单
的“工具”栏中，MenuStatusBar项定义当光标移动到添加的菜单栏上后显示在状态栏中提示文本。此外在注册表的
HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Internet Explorer/Extensions/<Your GUID>下还可以添加一个名称为
MenuCustomize的字符串类型值，将该值设定为"Help"将使菜单项出现在“帮助”菜单栏中，否则出现在“工具”栏中。

当然，我们不会满足于只是添加一个按钮，执行一个程序，我们希望能够获得当用户点击按钮时能够操控当前
页面，在注册表的 HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Internet Explorer/Extensions/<Your GUID>
下建立一个新的String类型的值，名称设定为一个htm文件的全路径名，同前面介绍的添加鼠标右键菜单一样，在点击
按钮后IE会调用该文件，在文件中通过设定VBScript访问external对象的menuArguments属性就可以获得浏览器中的
页面。例如我们将HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Internet Explorer/Extensions/<Your GUID>/VBScript
的值设定为c:/program files/samp.htm，然后在c:/program files下建立一个名为Samp.htm的文件，在文件中输入以下
脚本内容：
<script language="VBScript">

Set objNetSamp=CreateObject("IEContextMenu.IEMenu1")
userURL=external.menuArguments.location.href
Call objNetSamp.AddUrl(userURL,"")

</script>
打开IE浏览器，点击新建按钮，就会弹出对话框显示当前页面的URL。注意该项同前面设定的Exec项不能够同时使用。
最后，对于按钮图标，IE需要两种尺寸的图标：20x20和16x16的，前者用于正常状态下的显示，后者用于在全屏幕
下的显示，所以上面HotIcon和Icon指向的图标资源应该是三个图标的组合，这三个图标的规格如下：
16x16 16-色 icon (必须)
20x20 16-色 icon (可选)
20x20 256-色 icon (必须)
在设计图标时，256色图标应该使用Windows半色调调色板，而16色图标使用Windows 16色调色板。

www.applevb.com