注册表操作(100分)

  • 主题发起人 主题发起人 Zhejiang_Knight
  • 开始时间 开始时间
Z

Zhejiang_Knight

Unregistered / Unconfirmed
GUEST, unregistred user!
我在建立类TRegistry时提示错误:
[Warning] main.pas(8): Unit 'ShellCtrls' is specific to a platform
[Error] main.pas(196): Undeclared identifier: 'TRegistry'
该怎么做啊?
 
在第一个uses部分加TRegistry单元即可.
 
同意楼上的。
 
这是回答:
[Warning] main.pas(8): Unit 'ShellCtrls' is specific to a platform
[Fatal Error] main.pas(8): File not found: 'TRegistry.dcu'
 
同意二位楼上的……
 
各位,不行啊!
 
uses Registry;不是uses TRegistry
~~~~
 
问题追加
Reg.OpenKey('Software/abc/abc',True);
这句有没有问题啊,做了没反应啊!
在D6中
 
举例：
procedure AddIeButton;
var
rg: Tregistry;
SubKey, TemName: string;
begin
rg := Tregistry.create;
rg.rootkey := HKEY_CURRENT_USER;
SubKey := 'SOFTWARE/MICROSOFT/INTERNET EXPLORER/EXTENSIONS/{0713E8D2-850A-101B-AFC0-4210102A8DA8}';
if not rg.KeyExists(SubKey) then
begin
rg.openkey(SubKey,true);
rg.writestring('BUTTONTEXT','收藏伴侣');
rg.writestring('CLSID','{1FBA04EE-3024-11D2-8F1F-0000F87ABD16}');
rg.writestring('DEFAULT VISIBLE','YES');
rg.writestring('EXEC',AppName);
rg.writestring('ICON',AppDir+'/Icon2.ico');
rg.writestring('HOTICON',AppDir+'/Icon1.ico');
end
rg.closekey;
rg.free;
end;
 
thank you all
 
您必须登录或注册才可回复。

Similar threads

D
如何在delphi6下安装rxLib控件？(50分)
回复
5
查看
135
东方飘雨
东
太
关于注册表的问题......(50分)
回复
6
查看
222
太阳河上
太
Y
请教各位：奇怪，为什么这样就不行？(50分)
回复
7
查看
199
yangh888
Y
N
如何操作注册表？(100分)
回复
7
查看
150
Star5
S
H
操作注册表 类型为REG_MULTI_SZ如何读写？？(100分)
回复
10
查看
234
heming
H
后退
顶部