delphi怎样让程序开机自动运行

你可以在程序运行时自动写入注册表

uses中包含

Registry

var

MyFilePath:String

begin

MyFilePath:=Application.ExeName

MyReg:=TRegistry.Create

MyReg.RootKey:=

HKEY_CURRENT_USER

MyReg.OpenKey('SoftWare\Microsoft\Windows\CurrentVersion\Run',True)

MyReg.WriteString

('myfile',MyFilePath

)

MyReg.Free

这样做，一般会有杀毒软件进行拦截，需要同意才行。

你还可以直接把程序放到开始菜单中的启动下。

根据我的经验，可考虑三种方法:

一是将离去某程序的命令放到循环体内，为避免运行出错死循环，套上tryexcept end。

二是在调用单元窗体上加上个TIMER控件，通过时间设置定时运行。

三是开动你的脑筋，根据需求做个触发程序块，满足条件就启动该程序。

---