问一个注册表问题:(200分)

T

thebluehouse

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-24

• #1

问一个注册表问题:若在 HKEY_LOCAL_MACHINE/software/thebluehouse右边有一个字符串值为:
windows REG_SZ C://software/microsoft/windows/thebluehouse.exe
怎样才能读出thebluehouse.exe路径,在edit1上显示: C://software/microsoft/windows
(注意没有thebluehouse.exe)

 

H

hy17

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-24

• #2

var
registerTemp : TRegistry;
exefilename: string;
begin
registerTemp := TRegistry.Create;
with registerTemp do
begin
RootKey:=HKEY_LOCAL_MACHINE;
if OpenKey('software/thebluehouse',false) then
begin
exefilename:=(ReadString('windows'));
end;
CloseKey;
Free;
end;
edit1.text := ExtractFilePath(exefilename);
end;

给分吧
呵呵

 

T

thebluehouse

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-24

• #3

顺便再问一句,怎么再将相同路径的另外一个文件:cdrom.exe写入HKEY_user/software右边,例如:
windows : REG_SZ ....................../cdrom.exe,答完立刻加分

 

风

风云再起

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-24

• #4

就是把readstring改为writestring

 

T

thebluehouse

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-25

• #5

详细一点,写完应该变为:HKEY_user/software/.右边为:
windows :REG_SZ C://software/microsoft/windows/cdrom.exe,要源码,测试通过立马结分

 

H

hy17

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-25

• #6

var
registerTemp : TRegistry;
exefilename: string;
begin
exefilename := 'C://software/microsoft/windows/cdrom.exe';
registerTemp := TRegistry.Create;
with registerTemp do
begin
RootKey:=HKEY_USER;
if OpenKey('software',true) then
begin
WriteString('windows',exefilename);
end;
CloseKey;
Free;
end;
end;

怎样？
再要提其他的问题的话就另建一个吧

 

K

knifepj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-26

• #7

reg_binary，但怎么用（具体点）
如要写入　二进制的　08　02　04　E5
如何用 writebinary操作？

 

老

老人家

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-26

• #8

UP

 

K

knifepj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-26

• #9

reg_binary，但怎么用（具体点）
如要写入　二进制的　08　02　04　E5
如何用 writebinarydata操作？