急!!! 100分 在IE的鼠标右键菜单中加"大富翁论坛" 再点左键后却没有执行.请给出解决的具体代码方法. ( 积分: 100 )

F

freew

Unregistered / Unconfirmed
GUEST, unregistred user!
const
sIndexHtm ='http://www.delphibbs.com';
已实现向IE右键扩展菜单中写入但却没有运行这个链接:
try
REG:=Tregistry.create;
REG.rootkey:=HKEY_CURRENT_USER;
if REG.openkey('SOFTWARE/MICROSOFT/Internet Explorer/MenuExt/大富翁论坛',True) then
REG.writestring('',sIndexHtm);
REG.closekey;
finally
REG.Free;
end;
 
const
sIndexHtm ='http://www.delphibbs.com';
已实现向IE右键扩展菜单中写入但却没有运行这个链接:
try
REG:=Tregistry.create;
REG.rootkey:=HKEY_CURRENT_USER;
if REG.openkey('SOFTWARE/MICROSOFT/Internet Explorer/MenuExt/大富翁论坛',True) then
REG.writestring('',sIndexHtm);
REG.closekey;
finally
REG.Free;
end;
 
帮顶

--------签名档---------------------------

惊爆开源站

http://www.source520.com

80G源码电子书免费免注册下载,大量精辟技术文档库随时更新
 
这个问题刚才试了一下
直接设置确实不行
我研究了一下迅雷的IE集成方法,可以通过相似的方法解决
你先用IE或其这文本编辑器写一个HTM文件
假设该文件是C:/test.htm
然后用文本编辑器在该文件中写入
<script language="javascript">
location.replace("http://www.delphibbs.com");
</script>
这是IE支持的客户端脚本
然后把你上面的代码改成
const
sIndexHtm ='C:/test.htm';
已实现向IE右键扩展菜单中写入但却没有运行这个链接:
try
REG:=Tregistry.create;
REG.rootkey:=HKEY_CURRENT_USER;
if REG.openkey('SOFTWARE/MICROSOFT/Internet Explorer/MenuExt/大富翁论坛',True) then
REG.writestring('',sIndexHtm);
REG.closekey;
finally
REG.Free;
end;

应该就可以了
你试试,不行的话提出来,你的分我拿定了
 
怎么样了,测试了没有?
我还在等着你的分呢
 
当前这个贴子继续请人回答.Mike1234567890先你30分,如果我想加更多的链接呢.
 
可以了,但如果我想加多个链接,如"大富翁论坛" "每周商情" "每日播报" 那么在javascript中如何写呢:

http://www.delphibbs.com;
http://www.meizhoushangqing.com;
http://www.meiribobao.com
Mike1234567890分数暂缓一定多给你分,我第一次写javascript,谢谢您.
 
最好的办法就是每个链接单独写一个本地HTML文件
然在文件转向相应的连接
然后在注册表中也加入多项
由于传参数需要一种CGI支持
即使你的代码没有问题也不一定能在客户端运行
因为客户端不一定装有相应的脚本解释器
而HTML及JavaScript是所有Windows都支持的
也就是说用多个文件的方法比较通用
明白了吗
 
请问一下,可不可以用DELPHI在IE中加入这个的功能
打开IE的话就会运行一个程序。。。而不是只能是HTML文件
 
To:luckyso888
有很多方法
你可以写DLL然后在注册表中特定位置注册一下
IE启动时就自动加载了
加载了DLl还有什么不能做的呢
具体的注册表位置可以看一下Windows系统编程
DLL插入部分
 
谢谢Mike1234567890,若只是纯粹为这个功能写个服务没太大的必要,故尔我采用您说的多个
每个链接单独写一个本地HTML文件.因为我当前写的软件没有对这个功能有要求故尔如此写比较方便代码也少. Mike1234567890谢谢您.为方便以后交流,您可否告知我您的QQ号?
我的QQ号是:415808055,邮箱是:sujian_aaa@163.com ;谢谢!
 
顶部