delphi中如何对注册表的读写?

[linzhisong]

通过程序进行对系统的注册表修改.比如隐藏驱动器等.多谢了!

[workboy]

http://cnboor.com 有

[thedream]

用tregistry,在uses里加上Registry单元;

procedure test;
var
ls:tregistry;
begin;
ls:=tregistry.create;
ls.rootkey:=HKEY_LOCAL_MACHINE;//这个叫根键,windows有六个还是几个去了,反正都叫根键
ls.openkey('\software\microsoft\windows\currentversion\run',false)//打开键
ls.writestring('ppp','c:\ppp.exe');//相应还有其他的method,看看帮助
ls.closekey;//关闭键
ls.free
end;