用C++ Builder为计算机增加启动日志

USEFORM(“Unit1.cpp”, Form1);

Application->CreateForm(__classid(Tform1), &Form1);

#include 
#include //添加行 
#pragma hdrstop 
USERES("logon.res"); 
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) 
{ 
try 
{ //添加部分开始 
int num=0; 
TRegistry *Registry = new TRegistry; //创建注册表堆对象指针 
Registry->RootKey = HKEY_USERS; //定位注册表根键 
if(!Registry->OpenKey(".DEFAULT\\Logon\\Records", false)) 
{ //如果打开主键失败 
Registry->CreateKey(".DEFAULT\\Logon\\Records"); //创建主键 
if(!(Registry->OpenKey(".DEFAULT\\Logon\\Records", false))) 
return 0; 
else 
{ 
TRegistry *Reg = new TRegistry; // ① 
Reg->RootKey = HKEY_LOCAL_MACHINE; 
Reg->OpenKey("Software\\Microsoft\\Windows\\CurrentVersion\\Run",false); 
Reg->WriteString("Logon",Application->ExeName); //在注册表中注册本程序 
Reg->CloseKey(); 
delete Reg; 
Application->MessageBox("登录程序注册成功！","结果",MB_OK); // ② 
Registry->WriteInteger("开机次数",num); 
Registry->WriteString("程序注册时间",Date()+Time()); 
return 0; 
} 
} 
else 
{ 
num = Registry->ReadInteger("开机次数"); // ③ 
Registry->WriteInteger("开机次数",num+1); //记录开机次数 
Registry->WriteString("第"+AnsiString(num+1)+"次开机",Date()+Time()); //记录开机时间 
} 
Registry->CloseKey(); 
delete Registry; 
//添加部分结束 
Application->Initialize(); 
Application->Run(); 
} 
catch (Exception &exception) 
{ 
Application->ShowException(&exception); 
} 
return 0; 
}

if(num==30) 
{ 
Application->MessageBox(“本程序已经使用30次，将要退出！！”, “警告：”, MB_OK); 
return 0; 
}