在Win98行而在Win2000不行,为什么,高手进(50分)

  • 主题发起人 主题发起人 太阳河上
  • 开始时间 开始时间

太阳河上

Unregistered / Unconfirmed
GUEST, unregistred user!
我在操作注册表时,见以下程序:
procedure TFTPSysForm.BitBtn1Click(Sender: TObject);
var Reg: TRegistry;
begin
Reg:=TRegistry.Create;
with Reg do
begin
RootKey:=HKEY_USERS;
if OpenKey('.DEFAULT/Software/AdultFTPSys',True) then
begin
WriteString('Host',HostText.Text);
WriteInteger('Port',StrToInt(PortText.Text));
WriteString('UserID',UserIDText.Text);
WriteString('PassWord',PassWordText.Text);
WriteBool('ProxyYes',CheckBox1.Checked);
if CheckBox1.Checked then
begin
WriteString('ProxyHost',ProxyHost.Text);
WriteInteger('ProxyPort',StrToInt(ProxyPort.Text));
end else
begin
WriteString('ProxyHost','');
WriteInteger('ProxyPort',0);
end;
CloseKey;
end;
end;
Reg.Free;
SetSys:=10;
Close;
end;
注:刚开始时/AdultFTPSys键不存在,
在Win98下没有问题,会创建/AdultFTPSys键,但在win2000下行,不能建/AdultFTPSys
为什么?
 
您的win2k登陆用户有操作注册表的权限吗?
 
可能全限问题,要先得到系统管理员的全限。
就向2k下的关机程序
 
真的不能。考虑这样吧。
if not OpenKey('.DEFAULT/Software/AdultFTPSys',True) then
CreateKey
 
各位:
我是用管理员Administrator进入,因此,有最高的权限。
 
哪位高手帮解决呀,在线等待。
 
高手请回答,难道没有高手进来
 
用administrator登陆
 
leeaero:
你好,我是用用administrator登陆的。但就是不行,急死我也。
 
leeaero:
按上面做法,总是显示:Failed to creare key AdultFTPSys,即创建AdultFTPSys失败。
if not OpenKey('.DEFAULT/Software/AdultFTPSys',False) then
begin
CreateKey('.DEFAULT/Software/AdultFTPSys');
end;
 
判断Key是否存在应该使用KeyExists方法。判断VAlue是否存在应该使用ValueExists方法。
 
leeaero:
你好,关键是在CreateKey('.DEFAULT/Software/AdultFTPSys');上出错,提示创建
AdultFTPSys失败,而在Win98下则可以。我是以Administrator进入的
 
你把"/"必变"/"就可以了。
 
接受答案了.
 
后退
顶部