用 Inno Setup 修改注册表使程序随机启动的问题!

Question

想要使程序在机器启动,数据库启动后,不需要用户登陆就能运行
怎么修改注册表项SYSTEM\CurrentControlSet\Services\ ???

Answer 1

写到程序里就行。这是写的一个函数，，当checkbox1选择时，程序随系统启动，反之。。
//设置checkBox1,实现启动自动运行与否
procedure Check_AutoRun(CheckBox1: TCheckBox; StrRegName: String; StrRegValue: String);
var
    RegMy : Tregistry;  //定义变量RegMy
begin
    RegMy := Tregistry.Create;  //创建变量
    RegMy.RootKey := HKEY_CURRENT_USER;  //指定要操作的根键
    if CheckBox1.Checked=True then
    try
        if RegMy.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run',True) then
            RegMy.WriteString(StrRegName,StrRegValue);
    finally
        RegMy.CloseKey;
        RegMy.Free;      
    end;
    
    if CheckBox1.Checked=False then
    try
        if RegMy.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run',False) then
        begin
            if RegMy.ValueExists(StrRegName) then
                RegMy.DeleteValue(StrRegName);
        end;
    finally
        RegMy.CloseKey;
        RegMy.Free;
        //inherited;
    end;
end;仅供参考！

Answer 2

没有必要能过Inno Setup了，这样也活动些！