DelphiXE程序开机运行设置

一、代码操作注册表

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 ;

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

二、启动菜单设置

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