求开机即启动程序的函数(23分)

求一个开机即可运行程序的函数

函数没有　写到注册表实现倒是可能

var<br> &nbsp;reg:TRegistry;<br>begin<br> &nbsp;reg := TRegistry.Create;<br> &nbsp;try<br> &nbsp; &nbsp;reg.RootKey := HKEY_CURRENT_USER;<br> &nbsp; &nbsp;reg.OpenKey('/Software/Microsoft/Windows/CurrentVersion/Run', True);<br> &nbsp; &nbsp;if chkAutoRun.Checked then<br> &nbsp; &nbsp; &nbsp;reg.WriteString('PosBak.exe', ParamStr(0) + ' -m')<br> &nbsp; &nbsp;else<br> &nbsp; &nbsp; &nbsp;if reg.ValueExists('PosBak.exe') then reg.DeleteValue('PosBak.exe');<br> &nbsp;finally<br> &nbsp; &nbsp;reg.Free;<br> &nbsp;end;<br>end;

[]同楼上

要不就創建一個排程，然後排程設置為當系統每登錄時就啟動用戶指定的程序，當然這也算是一個辦法，相比較而方，樓上說得方法妙些！

写到注册表实现是一种方法；还有一种方法就是做一个服务，服务就是开机运行的，查找一下资料而且delphi还有向导，应该不是很困难的！

没有函数。<br>但可以根据需求，自定义一个函数。<br>技术交流QQ：136293586

ok