IE自定义工具栏后,信息保存在哪里?(200分)

  • 主题发起人 主题发起人 real_clq
  • 开始时间 开始时间
R

real_clq

Unregistered / Unconfirmed
GUEST, unregistred user!
IE自定义工具栏后,信息保存在哪里?用delphi怎样访问它?
 
注册表中吧
 
应该在注册表中:
SOFTWARE/MICROSOFT/INTERNET EXPLORER/EXTENSIONS/...
 
注册表中。。。

SOFTWARE/MICROSOFT/INTERNET EXPLORER/ToolBar
 
兄弟们,是这样的.IE中的"查看"->"工具栏"中可以设置显示不同的面板[打勾的显示],
我是想问这些打不勾的信息是保存在那里,在delphi中又是怎样操作它的.
目前知道是在
[HKEY_CURRENT_USER/Software/Microsoft/Internet Explorer/Toolbar/WebBrowser]
下的"ITBarLayout"中但它的数据是
"ITBarLayout"=hex:11,00,00,00,5c,00,00,00,00,00,00,00,30,00,00,00,1b,00,00,00,/
5c,00,00,00,01,00,00,00,a0,06,00,00,a0,0f,00,00,05,00,00,00,62,04,00,00,26,/
00,00,00,02,00,00,00,a1,06,00,00,a0,0f,00,00,04,00,00,00,a1,00,00,00,48,01,/
.....
这样的二进制内容,所以直接用操作注册表的方法来操作好象不合适
[比如说我想让"地址栏"不显示,不知道应该改哪一个],请问高手们有什么好的办法?
 
好像是个记录类型,包含了IE的菜单、工具栏显示、窗口的大小等属性。具体的忘了:)
 
littlefish
能不能说一下,在什么地方可以找到它的帮助?
 
肯定是修改注冊表。我找找看﹐記得以前有。
 
E文好的话可以到http://www.euromind.com/iedelphi


去看看
 
楼上的网址 极爽~~

好几次有关于IE的问题,我在google上查了半天,最后都追到了 http://www.euromind.com/iedelphi
这里~
 
以前我就去过一次,刚才又去了,但是还是没找到。
兄弟们再帮帮忙。
 
应该是在注册表中的,不过我与不是很清楚。[:)]
 
我已经知道是在注册表中了,现在就是想知道上面的哪个二进制内容如何访问。
 
用一些注册表监控工具就可以搞顶
 
张兄,我是说delphi中如何操作那个二进制内容。
 
这么牛的人,连这个问题都不知道么。
我在这里回贴了,自己去牛吧。
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1999919
 
应该是在注册表里面的,你看看一下添加一个工具的代码:
Procedure CreateExplorerButton(Path: String);

Const Tagit = '/{10954C80-4F0F-11d3-B17C-00C0DFE39736}/';
Var Reg : TRegistry;
Path: String;
Path1: String;
Merge: String;
Begin

Path := 'c:/your program path';

Reg := TRegistry.CReate;
try
With Reg Do
Begin
RootKey := HKEY_LOCAL_MACHINE;
Path1 := 'Software/Microsoft/Internet Explorer/Extensions';
Merge := Path1 + Tagit;
OPenKey(Merge,True);
WriteString('ButtonText','ButtonText');
WriteString('MenuText','Tools Menu Item');
WriteString('MenuStatusBar','Run Script');
WriteString('ClSid','{1FBA04EE-3024-11d2-8F1F-0000F87ABD16}');
WriteString('Default Visible','Yes');
WriteString('Exec',Path+'/ProgramName.exe');
WriteString('HotIcon',',4');
WriteString('Icon',',4');

end
Finally
Reg.CloseKey;
Reg.Free;
End;

End;
 

Similar threads

D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
871
DelphiTeacher的专栏
D
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
后退
顶部