#include <Registry.hpp>
void __fastcall AutoRun(
bool pRun)
{
/**//******************************************************
** 函数名: AutoRun
** 输入: 是否设置自动运行
** 功能描述: 设置开机自动运行
******************************************************/
TRegistry *Reg =
new TRegistry();
try
{
Reg->RootKey =
HKEY_LOCAL_MACHINE;
Reg->OpenKey(
"//SOFTWARE//Microsoft//Windows//CurrentVersion//Run//",
false);
if(!Reg->ValueExists(
"SndMonitor") && !
pRun)
{
return;
}
if(Reg->ValueExists(
"SndMonitor") && !
pRun)
{
Reg->DeleteValue(
"SndMonitor");
}
else
{
if(!Reg->ValueExists(
"SndMonitor") )
{
Reg->WriteString(
"SndMonitor",ExpandFileName(Application->
ExeName));
}
else
{
if(Reg->ReadString(
"SndMonitor")!=ExpandFileName(Application->
ExeName))
{
Reg->WriteString(
"SndMonitor",ExpandFileName(Application->
ExeName));
}
}
}
}
__finally
{
delete Reg;
}
}
转载于:https://www.cnblogs.com/luyuxibaby/p/5217279.html
