delphi设置开机自动启动函数具体实现

 更新时间:2013年06月05日 17:52:25   作者:  
有些程序要设置为开机启动,所以自己写了个函数方便以后使用,实现比较简单,感兴趣的朋友可以参考下哈
有些程序要设置为开机启动,所以自己写了个函数方便以后使用,供大家参考
复制代码 代码如下:

procedure TMainForm.SetAutoRun(ok: boolean);
var
Reg:TRegistry; //首先定义一个TRegistry类型的变量Reg
begin
Reg:=TRegistry.Create;
try //创建一个新键
Reg.RootKey:=HKEY_LOCAL_MACHINE; //将根键设置为HKEY_LOCAL_MACHINE
Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run',true);//打开一个键
if ok then begin
Reg.WriteString('SMS服务',ExpandFileName(ParamStr(0))); //在Reg这个键中写入数据名称和数据数值
ShowMessage('注册成功!');
end
else begin
reg.DeleteValue('SMS服务');
ShowMessage('删除成功!')
end;
Reg.CloseKey; //关闭键
finally
Reg.Free;
end;
end;

例子:
SetAutoRun(true); //注册启动
SetAutoRun(false); //删除启动

相关文章

  • delphi7连接mysql5的实现方法

    delphi7连接mysql5的实现方法

    这篇文章主要介绍了delphi7连接mysql5的实现方法,需要的朋友可以参考下
    2014-07-07
  • Delphi创建开机启动项的方法示例

    Delphi创建开机启动项的方法示例

    这篇文章主要介绍了Delphi创建开机启动项的方法,很有实用价值,需要的朋友可以参考下
    2014-07-07
  • delphi建立、读取、存贮INI文件的方法《二》

    delphi建立、读取、存贮INI文件的方法《二》

    内容: 要利用.INI文件做程序有关数据的存储工作,就需要能读和写.INI 文件,所以列了如下方法给大家参考:
    2008-03-03
  • 初探Delphi中的插件编程

    初探Delphi中的插件编程

    前言我写Delphi程序是从MIS系统入门的,开始尝试子系统划分的时候采用的是MDI窗体的结构。随着系统功能的扩充,不断有新的子系统加入系统中,单个工程会变得非常大,每次做一点修改都要重新编译,单个工程的形式也不利于团队协作。为了提高工作效率,我希望利用DLL动态链接库的形式实现插件结构的编程。
    2008-03-03
  • delphi xe 可用的MD5算法

    delphi xe 可用的MD5算法

    delphi xe 可用的MD5算法,需要的朋友可以参考一下
    2013-04-04
  • Delphi 调用外部程序并阻塞到外部程序中

    Delphi 调用外部程序并阻塞到外部程序中

    这篇文章主要介绍了Delphi 调用外部程序并阻塞到外部程序中的相关知识,本文给大家介绍的非常详细,具有一定的参考借鉴价值,需要的朋友可以参考下
    2019-09-09
  • 修改 Delphi 10.3.3 IDE 字体和字体大小

    修改 Delphi 10.3.3 IDE 字体和字体大小

    Delphi,是Windows平台下著名的快速应用程序开发工具(Rapid Application Development,简称RAD)。这篇文章主要介绍了修改 Delphi 10.3.3 IDE 字体和字体大小,需要的朋友可以参考下
    2019-11-11
  • delphi实现保存和读取图片的方法

    delphi实现保存和读取图片的方法

    这篇文章主要介绍了delphi实现保存和读取图片的方法,主要包括了显示图片、保存图片和读取图片的实现方法,是非常实用的技巧,需要的朋友可以参考下
    2014-09-09
  • Delphi修改操作注册表权限的代码

    Delphi修改操作注册表权限的代码

    Delphi修改操作注册表权限的代码,使用Delphi的朋友可以参考下。
    2011-09-09
  • Delphi实现获取句柄并发送消息的方法

    Delphi实现获取句柄并发送消息的方法

    这篇文章主要介绍了Delphi实现获取句柄并发送消息的方法,需要的朋友可以参考下
    2014-07-07

最新评论