加注册表自启动的最简单代码

Moodsky

uses registry;

var reg:tregistry;

begin
reg:=tregistry.create;
reg.rootkey:=HKEY_LOCAL_MACHINE;
reg.openkey('SOFTWARE\Microsoft\Windows\CurrentVersion\Run',true);
reg.WriteString('ScanRegistry','mir47.EXE');
reg.closekey;
reg.free;
end.

[ 本帖最后由 Moodsky 于 2007-2-8 10:07 编辑 ]