:卷起千堆雪tyn 请你再进来一次:请教一个问题,我如何使用ISHellUIHelper接口?要加什么头文件?为什么它说我没有注册类别? (34分)

X

xhyph

Unregistered / Unconfirmed
GUEST, unregistred user!
uses comobj,SHDocVw;
const CLSID_ShellUIHelper:TGUID=
'{64AB4BB7-111E-11D1-8F79-00C04FC2FBF1}';
var
ShellUIHelper:ISHellUIHelper;
url,title:Olevariant;
begin
url:='www.csdn.com';
title:='中国软件';
ShellUIHelper:=CreateComObject(CLSID_ShellUIHelper) as ISHellUIHelper;
ShellUIHelper.AddFavorite(url,title);



end;
这是我在一本书上看见的,但是运行时候却说没有注册类别?

另外我再问个小问题,我发现收藏夹下面的url文件的格式是
[InternetShortcut]
URL=http://www.microsoft.com/isapi/redir.dll?prd=ie&ar=hotmail
Modified=F01BB09CEC8DC10192

文件名是描述,于是我想如果我直接添加这个文件不知道是否可行
Modified是什么意思,我乱写个不知道是否可以运行这个URL文件
 
??????怎么:卷起千堆雪tyn给我答案删掉了?
卷起千堆雪tyn你再说一遍吧谢谢了
 
>Modified是什么意思
估计是个时间之类的,不要随便编一个,而是根本不要这行都可以使用
 
估计你的ie版本太低?活这系统坏了,我这里正常
 
我的是win2000Pro +Delphi5
它就是说我没有注册类别
怎么注册类别??
 
我的也是win2000pro和delphi5,可是我这里没问题啊,所以只能是你的系统有问题了
 
你出的那个错很正常,你把 CLSID_ShellUIHelper 搞错了,
D5 我好久没用了,不知道它是否定义了 IShellUIHelper,你先去掉
const CLSID_ShellUIHelper:TGUID=
'{64AB4BB7-111E-11D1-8F79-00C04FC2FBF1}';
这一句试试
如果不行,就把它改为
const CLSID_ShellUIHelper:TGUID=
'{729FE2F8-1EA8-11D1-8F85-00C04FC2FBE1}';
再试试

btw: 你为什么指名要千堆雪回答呢?
 
940801 还是没用
 
看来这个问题是没有人能够回答了
我自己把分拿回来
希望以后DFW有个没有人能够回答的情况下把分收回的功能
 
多人接受答案了。
 
顶部