C++Builder 高手进阶
（一） 编写弹出广告杀手
nxyc_twz@163.com
一、系统分析
作为一名软件开发人员，必然会经常上网查找资料，可讨厌的广告真让人心烦。有没有办法自动关闭这些广告呢？答案是肯定的！也许你会说：“网上这类软件多的是，随便找一个不就行了？”，你说的确实不错，可作为一名软件开发人员，总不能什么都靠别人吧？自己动手作一个如何？说干就干，首先得找出弹出广告窗口的工作原理：
1． 使用自己的《系统窗口分析器》（在下一期讲述其开发过程），轻易地就发现弹出广告窗口的特征：其窗口类是CabinetWClass或IEFrame。
2． 如果找出窗口类是CabinetWClass或IEFrame的窗口，向其发送WM_CLOSE不就OK了吗？心里不由一阵窃喜！
3． 使用定时器定时进行检测，找到符合条件的窗口就向其发送WM_CLOSE消息。
二、实战前沿
道理讲明了，可如何找到窗口类名呢？这就需要使用API函数了：
GetWindowText ：取得窗口文本
GetWindow ：取得窗口句柄
GetClassName ：取得类名
PostMessage ：发送消息
SetWindowLong ：设置方式
具体用法请查阅相关资料。
三、设计流程
1． 启动C++Builder 5，新建一个Application，将Form的Name设置为Form1，其BoldStyle设置为bsNone，在Form的Icon中设置好图标。
2． 定义数据变量：
TRAYICON_ID = 1;
ICONEVENT = WM_APP + 100;
TNotifyIconData TrayIcon ;
3． 拖放一个Timer控件和一个Popmenu控件到窗体上。Timer的属性：Name->Timer1，Interval->1000；Popmenu1上追加三个子项：继续->ContinueCmd，PauseCmd->暂停，ExitCmd->退出。
4． 使应用程序进入系统托盘：void TrayIconCmd(void);
TrayIcon.cbSize = sizeof(TNotifyIconData);
TrayIcon.hWnd = Handle;
TrayIcon.uID = ID_TRAYICON;
TrayIcon.uFlags = NIF_ICON | NIF_MESSAGE | NIF_TIP;
TrayIcon.uCallBackMessage = ICONEVENT;
TrayIcon.hIcon = Form1->Icon->Handle;
TrayIcon.szTip = “广告窗口杀手”;
Shell_NotifyIcon(NM_ADD, &TrayIcon);
5． 使应用程序退出系统托盘：void TrayIconExit(void);
Shell_NotifyIcon(NIM_DELETE, &TrayIcon );
6． 使应用程序启动后直接进入系统托盘：编写Form1的OnCreate事件
TrayIconCmd(); //在系统托盘中安装图标
Width = 0;
SetWindowLong(Application->Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW);
7． 从系统托盘中卸载图标：编写Form1的OnClose事件
TrayIconExit();
8． 自定义消息TrayIconOnClick：
在头文件.h中定义：
private:
MESSAGE void __fastcall TrayIconOnClick(Tmessage &message);
BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(ICONEVENT, Tmessage, TrayIconOnClick);
END_MESSAGE_MAP(Tform)
9． 鼠标点击系统托盘图标(TrayIconOnClick)，则弹出菜单：
Tpoint p;
if( message.lParam == WM_LBUTTONDOWN ||
message.lPram == WM_RBUTTONDOWN)
{
PopupMenu1->PopupComponent = Form1;
SetForegroundWindow(Handle);
GetCursorPos(p);
PopupMenu->Popup(p.x,p.y);
}
10． 枚举指定窗口句柄的所有子窗口：void MENumChildWindows(HWND hand);
char tempstr[255];
bool IsPopWindow = true;
HWND h = GetWindow(hand, GW_CHILD);
while(h)
{
GetClassName(h, tempstr, 256);
if( !strcmp(tempstr, “WorkerA”) || !strcmp( tempstr, “WorkerW”))
if( IsWindowVisible(h) ) IsPopWindow = false;
h = GetWindow(h, GW_HWNDNEXT);
}
if( IsPopWindw )PostMessage(hand, WM_CLOSE, 0, 0);
11． 双击Timer控件，添加其事件OnTimer：
char Text[255];
HWnd h := GetWindow(Handle, GW_HWNDFIRST);
while(h)
{
if (GetWindowText(h, Text, 255) > 0)
if (GetClassName(h,Text , 255)>0)
if ( !strcmp( Text, “CabinetWClass”) || !strcmp(Text, “IEFrame”))
EnumChildWindows(h);
h = GetWindow(h, GW_HWNDNEXT);
}
12．编写菜单响应事件：
ContinueCmd：继续
Timer1->Enabled = true;
PauseCmd->Checked = false;
ContinueCmd->Checked = true;
PauseCmd：暂停
Timer1->Enabled = false;
PauseCmd->Checked = true;
ContinueCmd->Checked = false;
ExitCmd:：退出
Close();
