怎样编写一个程序让计算机一起动就运行该程序?

nitxht 2003-05-02 01:20:14
怎样编写一个程序让计算机一起动就运行该程序(即在后台运行),并且画面不出现?类似金山毒霸,但不出现启动画面.
...全文
85 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
malionsw 2003-05-02
  • 打赏
  • 举报
回复
楼上所说的具体实现方法:
声明外部函数:
function RegisterServiceProcess(dwProcessID, dwType: Integer): Integer; stdcall; external 'KERNEL32.DLL';
主程序添加如下代码:
var
RegF:TRegistry;
begin
RegF:=TRegistry.Create;//创建Registry组件,这个组件是专门针对注册表操作的组件
RegF.RootKey :=HKEY_LOCAL_MACHINE;//把根键设为HKEY_LOCAL_MACHINE
RegF.OpenKey('Software\MicroSoft\Windows\CurrentVersion\Run',True);//打开Software\MicroSoft\Windows\CurrentVersion\Run子键
RegF.WriteString('sys',ParamStr(0));//在里面写入本程序的路径
RegF.Free;//释放Registry组件。
Application.showmainform:=false;//隐藏窗体
RegisterServiceProcess(GetCurrentProcessID, 1);//注册服务
scvzhang 2003-05-02
  • 打赏
  • 举报
回复
1写入注册表自动启动
2启动时隐藏到系统托盘

1,184

社区成员

发帖
与我相关
我的任务
社区描述
Delphi Windows SDK/API
社区管理员
  • Windows SDK/API社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧