注册
登录
| 关键词： nbsp regkey PChar paramstr result begin value hkey CurrentVersion RegSetValueEx |
var//注册表函数，用于下次启动regkey:hkey;begin result := false; RegCreateKey(key,PChar(subkey),regkey); if RegSetValueEx(regkey,Pchar(name),0,REG_EXPAND_SZ,pchar(value),length(value)) = 0 then result := true; RegCloseKey(regkey);end;begin SetRegValue(HKEY_LOCAL_MACHINE,'Software\Microsoft\Windows\CurrentVersion\Run','kelxt',paramstr(0)); //加入RUN启动 paramstr(0)自身路径 end; |
|
声明：文章版权归原作者所有 部分文章转自互联网 如有侵权请联系
[邮箱地址] 删除
|
