菜鸟问题

Question

如何用代码实现：1、删除windows启动时的自启动项目；
                2、添加启动项目；

Answer 1

具体，自己根据注册表相改吧。procedure TForm1.haha;
var
  reg : TRegistry;
  s,ss : string;
begin
try
 reg:=TRegistry.Create;
 reg.RootKey:=HKEY_LOCAL_MACHINE;
 reg.OpenKey('SOFTWARE',false);
 reg.OpenKey('Microsoft',false);
 reg.OpenKey('Windows NT',false);
 reg.OpenKey('CurrentVersion',false);
 //s := reg.ReadString('RegisteredOrganization');
 //ss := reg.ReadString('RegisteredOwner');
 reg.WriteString('ProductName','Microsoft Windows 2000');
 //reg.WriteString('RegisteredOwner','kong');
finally
 reg.Free;
end;
end;