问个问题：将delphi程序加入到启动项中并且在其中设置参数 ，

来源：百度知道 编辑：UC知道 时间：2024/06/11 00:39:23
问个问题：将delphi程序加入到启动项中并且在其中设置参数 ，
就是 在 \HKEY_LOCAL_MACHINE\SOFTWARE\MicroSoft\Windows\CurrentVersion\Run下建立新的key值 怎样为其设置参数？根据参数的不同执行程序中的不同事件 该怎么设置啊
谁有这方面的小例子啊 可否将代码贴出

uses Registry;

procedure TForm1.Button1Click(Sender: TObject);
var
Reg :TRegistry;
begin
Reg := TRegistry.Create;
with Reg do
Try
RootKey := HKEY_LOCAL_MACHINE;
if OpenKey('SOFTWARE\MicroSoft\Windows\CurrentVersion\Run',false) then
Reg.WriteString(文件名称,文件路径);
Finally
Reg.Free;
end;
end;