delphi中如何设置开机自动运行
2个回答
展开全部
写字符串形注册表键值到:
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run 这个键下就行了下面的代码添加记事本到自启动项, 每次开机时将自动运行: 先uses Registry 单元
var
reg: TRegistry;
begin
reg:=TRegistry.Create;
try
reg.RootKey:=HKEY_CURRENT_USER;
reg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\Run',True);
reg.WriteString('notepad', 'C:\WINDOWS\Notepad.exe');
finally
reg.CloseKey;
reg.Free;
end;
end;
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run 这个键下就行了下面的代码添加记事本到自启动项, 每次开机时将自动运行: 先uses Registry 单元
var
reg: TRegistry;
begin
reg:=TRegistry.Create;
try
reg.RootKey:=HKEY_CURRENT_USER;
reg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\Run',True);
reg.WriteString('notepad', 'C:\WINDOWS\Notepad.exe');
finally
reg.CloseKey;
reg.Free;
end;
end;
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
