IT运维管理,创造商业价值!
中国IT运维网首页 | 资讯中心 | 运维管理 | 信息安全 | CIO视界 | 云计算 | 最佳案例 | 运维资源 | 专题策划 | 知识库 | 论坛

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

2008年07月16日
51CTO/

程序特点

每次启动计算机都要执行一次(这一功能由本程序自动完成而不必手工在注册表中添加,只需运行一次程序即可),为增加隐蔽性,该程序为后台运行的无窗体程序。


编程要点
1. 在C++ Builder 5环境中建立新工程文件:执行菜单命令File/New Application,然后将工程文件另存为“Logon.bpr”。
2. 执行菜单命令Project/View Source,打开Logon.cpp文件,将其中的
USEFORM(“Unit1.cpp”, Form1);

Application->CreateForm(__classid(Tform1), &Form1);
两条语句删除,目的是创建无窗体程序。
3. 文件Logon.cpp的全部代码如下:
#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;
}

应用
利用此法,将上述相关代码移植到其它C++ Builder应用程序中,通过读写注册表对程序的使用加以限制,比如限制使用程序次数:30次,只要在上述代码③处增加一条if语句
if(num==30)
{
Application->MessageBox(“本程序已经使用30次,将要退出!!”, “警告:”, MB_OK);
return 0;
}
即可(删除①到②行的语句段),编写限制版的应用程序。当然也可以考虑对时间的限制,这只要在注册表中暗设“机关”就行。

为了生成单独的EXE文件,应激活Project/Options…菜单项,去掉标签“Linker”下的“Use dynamic RTL”选项,同时去掉“Packages”标签下的“Build with runtime packages”选项。将此文件Logon.exe复制到需要记录的机器上的一个固定的文件夹中(比如,windows文件夹),执行一次即可完成程序的注册。

发表评论请到:http://bbs.cnitom.com

相关阅读

图文热点

以不变应万变 网络虚拟化应对园区网新挑战
以不变应万变 网络虚拟化应对园区网新挑战Forrester Research的分析师Robert Whiteley认为: “十年以来,虚拟化技术与网络...
OpenShift加入更多新元素 友好面对开发者
OpenShift加入更多新元素 友好面对开发者通过网络进行程序提供的服务称之为SaaS(Software as a Service),而将服务器平台...

本类热点