DELPHI加注册表自启动的最简单代码

用Delphi实现开机自动启动程序 在我们机子上的注册表中有个的根键HKEY_LOCAL_MACHINE下有一个键"Run"(Software/Windows/CurrentVersion/Run),Windows开机是会搜索注册表,凡在该键下设置了正确路径的有效程序就会自动运行.下面开始介绍我写的这个Delphi程序^_^.在新建的Form1中添加以下代码 unit Unit1;interfaceuses  W 阅读详情
uses registry;

var reg:tregistry
;

begin
reg:=tregistry.create
;
reg.rootkey:=HKEY_LOCAL_MACHINE
;
reg.openkey('SOFTWARE/Microsoft/Windows/CurrentVersion/Run',true
);
reg.WriteString('ScanRegistry','mir47.EXE'
);
reg.closekey
;
reg.free
;
end
.
Delphi TRegistry.Create.Write写入注册表数据范例.rar Delphi 7.0的一个注册表操作实例,向注册表中写入数据,向其写入了向条预设好的静态数据,包括节点键值名称和参数值,很好的向大家演示了基础级的Delphi操作系统注册表的方法。在建立注册表操作对象后,我们可以这样做:   先创建注册表写入对象:MyReg := TRegistry.Create;   然后定位需要操作的注册表根键:   MyReg.RootKey := HKEY_CURRENT_USER;   写入对应类型的键值:   MyReg.WriteFloat('Float Style',19.87);   MyReg.WriteString('String Style','I Like Delphi');   MyReg.WriteBool('Boolean Style',True);   MyReg.WriteDateTime('DateTime Style',now);   MyReg.WriteInteger('Integer Style',18);   Application.MessageBox('向注册表中写入数据成功!','提示信息',64);   MyReg.CloseKey;   MyReg.Free;   以上代码片段仅供参考,完整源码请下载压缩包。 立即下载

相关推荐

2023年全国职业院校技能大赛高职组“区块链技术应用”赛项赛卷(3卷)解析

我们先绘制题组中所有设计图我这边作图用的国内的在线作图工具。

2301_76737000的博客 5419

DELPHI 写入注册表自动运行

uses registry;procedure TKeyReportForm.AutoRun; var reg:TRegistry; keyFilePath:string;begin {keyFilePath获取...

cuiweigk19423的博客 357

在 Windows 10 中通过 WSL2 安装 vLLM 部署本地大模型的方法和步骤

通过 WSL2 在 Windows 10 中部署 vLLM 的核心优势是兼顾 Windows 生态与 Linux 环境的 GPU 加速能力,适合需要在 Windows 下开发但依赖 vLLM 高性能推理的场景。相比原生 Windows 部署(Ollama 等工具),该方案性能更优(接近原生 Ubuntu),且支持更大模型和量化优化。若追求极致性能,建议直接使用 Ubuntu 系统;若必须依赖 Windows 工具链,WSL2 + vLLM 是当前最优选择。

当 AI 开始写文章、绘星空,甚至预测未来,您还在旁观吗?这里将剖开人工智能的思考逻辑,拆解 AI 创作的底层密码,也聊聊人工智能里的人文温度。每篇都有让你拍案的细节,快来解锁 AI 时代的神奇世界! 3754

delphi程序自启动两种方法加实例

1. 利用Win.ini文件实现程序的自动启动 Win.ini是系统保存在“C:Windows”目录下的一个系统初始化文件,系统在启动时会检索该文件中的相关项,以进行系统环境的初始设置。在该文件中的“[windows]”数据段中,有两个数据项“load=”和“run=”,它们的作用就是在系统启动之后自动地装入和运行相关的程序。如果我们需要在系统启动之后立即装入并运行一个程序,只需要将运行文件的

冷月宫主的专栏 2087

全志Longan和Tina系统T113-S3-(Tina Linux 系统介绍)

Tina Linux是全志科技基于Linux内核开发的针对智能硬件类产品的嵌入式软件系统。Tina Linux基于openwrt-14.07 版本的软件开发包,包含了 Linux 系统开发用到的内核源码、驱动、工具、系统中间件与应用程序包。Tina系统软件架构如图所示。从下至上分别为Kernel && Driver、Libraries、System Services、Applications 四层。

szembed的博客 6335

使用FPGA实现MIPI DSI接口

通过使用FPGA,我们可以实现MIPI DSI接口,并在FPGA上生成相应的时序和电平转换电路。通过使用FPGA,我们可以实现MIPI DSI接口,并在FPGA上生成相应的时序和电平转换电路。在本文中,我们将探讨如何使用FPGA实现MIPI DSI接口,并提供相应的源代码。根据不同的发送状态,我们设置相应的输出信号。请注意,这只是一个基本的示例,用于说明如何使用FPGA实现MIPI DSI接口的发送功能。请注意,这只是一个基本的示例,用于说明如何使用FPGA实现MIPI DSI接口的发送功能。

ZdqDeveloper的博客 1700

Delphi 修改注册表使程序开机启动

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,Registry; type TForm1 = class(TForm) btnAddRun: TButton; edtFil

倾听内心的声音 1090

运行openclaw gateway install时出现Gateway install failed: Error: schtasks create failed的解决方案

本文主要介绍了运行openclaw gateway install时出现Gateway install failed: Error: schtasks create failed的解决方案,希望能对学习和使用openclaw的同学们有所帮助。 文章目录 1. 问题描述 2. 解决方案

weixin_43178406的博客 11万+

TRegistry_delphi中对注册表的操作

  TRegistrydelphi对注册表的操作       ◇     [DELPHI]关于处理注册表uses Registry;var reg:Tregistry;reg:=Tregistry.create;reg.rootkey:=HKey_Current_User;reg.openkey(Control Panel/Desktop,f

delphi学习专栏 3476

通过实例讲解瀑布模型

在电子商城开发中,瀑布模型如同 “工业时代的流水线”—— 能通过标准化流程交付高质量、高合规性的系统,但也可能因缺乏灵活性而错失市场机会。其优势与缺点本质上源于同一核心特征:严格的阶段性与文档驱动。决策建议若开发传统型、长周期、需求固定的电子商城(如企业内部采购平台),可优先选择瀑布模型,并通过 “需求预验证 + 模块化设计” 降低风险;若开发创新型、短周期、需快速迭代的电商平台(如社交电商、跨境电商),建议采用敏捷模型或混合模型(如瀑布 + Scrum),平衡规范性与响应速度。

跟佟格湾一起学习计算机知识吧~ 271

智能工厂评估模型研究

摘要:通过对国内外现有智能制造评估模型的研究,结合重庆制造业行业领跑者与落后者之间差距大的现状,以实现全要素全连接的数字化工厂为出发点,融合工业互联网标识,构建实践可行的智能工厂评估模型推动中小型企业参与智能制造转型,缓和两极分化问题。本评估模型包含工厂体系架构的3个层级,提供用于推动智能制造转型的参考,包括设计、生产、管理的全过程评估。关键词:智能制造评估模型;智能制造转型;全连接工厂;工业互联网标识0 引言受行业需求与技术创新的影响,全球制造业在历经了工业1.0机械化、工业2.0电气化和工业3.0自动

罗伯特技术屋 677

delphi 注册表操作之(读取、添加、删除、修改)

32位Delphi程序中可利用TRegistry对象来存取注册表文件中的信息。 一、创建和释放TRegistry对象 1.创建TRegistry对象。为了操作注册表,要创建一个TRegistry对象:ARegistry := TRegistry.Create; 2.释放TRegistry对象。对注册表操作结束后,应释放TRegistry对象所占内存:ARegistry.Destroy。 二、指定要操作的键 操作注册表时,首先应指定操作的主键:先给属性RootKey赋值以指定根键,然后用方法OpenKey来指

yygyyygy1233的博客 1953

华为OD机试真题 新系统2026-04-15 C++ 实现【失灵的键盘】

有一个键盘有2个按键失灵了,按下这些键时会连续输出其他键对应的字符两次。具体如下: 1. 按下j键一次,屏幕上显示uu(两个连续的u);  按下b键一次,屏幕上显示t(两个连续的t) 2. u键和t键是好的,按下u键一次时,屏幕只会显示一次u(正常按键);按下t键一次时,屏幕只会显示一次t(正常按键) 3. 假定屏幕上连续显示两个t一定是按了一次b键,而不是两次t键;假定按键t之后不会紧接着按键b,即tttt转义为两个b,而不可能是tb

MISAYAONE的博客 211

Delphi 开机启动(操作注册表)

开机启动注册路径: 64位操作系统: HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Run 32位操作系统: HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run WOW64 注册表反射器可能会在反射过程中修改注册表项的内容和项值,目的是为了调整路径名等。因此,32 位的内容与 64 位的内容可能会有所不同。 function

839

efm32 入门.pdf

本PDF共计22页,介绍的是操作驱动API,下载与否自己斟酌。

Camera2Demo

在Camera2 的基础上进行封装,使得Camera2一堆初始化逻辑与Activity分离,降低耦合度,完成预览拍照并保存的操作

VCL程序 开机自启动 delphi

摘要:本文介绍了在Delphi中使用TRegistry类实现Windows应用程序开机自启动的方法。通过操作HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run注册表项,可以设置或取消当前用户的开机自启动。设置时获取程序路径并写入注册表,取消时删除对应键值。代码包含完整的错误处理和权限检查逻辑,确保注册表操作的安全性和可靠性。

麋鹿不迷糊的博客 322

假人有限元模型

假人模型,车辆碰撞假人有限元模型,适合做乘员安全的研究者利用

delphi 注册表的使用

 Generated by Bo-blog 2.1.0***********************************************************procedure TForm1.Reg1;var  Reg:TRegistry;begin      Reg:=TRegistry.Create;      try          Reg.RootKey:=HKEY_LOC

dongyonggan的专栏 512

jre9下载 jdk9

(Java SE Runtime Environment 9.0) 9.0u175 官方最新版 【x86|x64】

Delphi 注册表操作

unit UnitRegeditFuns; interface uses Windows, Registry; function CheckRegEdit(dwRootKey: DWORD; subKey, sName, sValue: string): Boolean; procedure SetRegEdit(dwRootKey: DWORD; subKey, s...

liang08114的专栏 410

设置Delphi程序的自启动功能

自启动注册表项:HKEY_LOCAL_MACHINE/Software/Microsoft/CurrentVersion/Run先加入“Registry”单元。再用如下代码:var  Reg: TRegistry;  KeyName: string;begin  Reg := TRegistry.Create;  KeyName := ExtractFileName

恒上集团IT部 740

delphi让exe开机自启动

procedure AutoRunOnSystemStart(Title, FileName: String);const _Software_Microsoft_Windows_CurrentVersion_Run_ : string = '\Software\Microsoft\Windows\CurrentVersion\Run\';var Reg: TRegistry; ...

weixin_30415801的博客 382

Delphi更改IE首页代码

Delphi更改IE首页代码2008-01-29 00:38uses registry;var   reg:Tregistry;////////////////////////////////////////////////////procedure changeIE;var   ret2:HKEY;begin   reg:=Tregistry.Create;   re

xxhh07的专栏 799

delphi 设置自启动

function TfrmSysSet.GetAutoRun:string; var   Reg:TRegistry; //首先定义一个TRegistry类型的变量Reg begin   Reg:=TRegistry.Create;   try //创建一个新键     Reg.RootKey:=HKEY_LOCAL_MACHINE; //将根键设置为HKEY_LOCAL_MACHIN

franbo的专栏 568

DELPHI实现关闭指定进程,自身防杀

偶然翻到很久以前用DELPHI写的一个小程序,实现功能是在后台默默关闭符合条件的进程,并隐藏自身。编写目的是为了防止办公电脑运行游戏。 实现原理是: 1、程序运行后将自身以不同的名称一式三份存到系统各目录中,将其中一个COPY写到注册表里开机自启动,然后修改注册表中txt文件和exe文件打开方式分别指向另两个COPY,达到监控目的。 2、程序一但激活首先会确认各COPY是否存在以及注册表关联

hylixihuan的专栏 2027
上一篇: 文件的创建、删除和维护
下一篇: 自动切换网络访问脚本(不完全版)
iiprogram
博客等级 码龄25年 1068粉丝 1515原创
评论
成就一亿技术人!
拼手气红包6.0元
还能输入1000个字符
 
 条评论被折叠 查看
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付:10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值