利用BCB自己打造QQ炸弹

来源:灰狐's Blog

注:本文已发表在2007年《黑客防线》第10期,版权归《黑客防线》所有。

俗话说的好啊:不会编程的黑客就不是好黑客(我会编程,但我也不是黑客,因为我是个——程序员,哈哈)。今天呢我们就来亲自动手打造一个专属于自己的小工具。
我们要做的是一个QQ炸弹,这年头用QQ的人实在多。这林子大了可是什么鸟都有,当然其实我们今天做这个工具的威力并不是很大,顶多只能和好友聊天的时候骚扰一下。思路很简单,就是通过程序不停地模拟按键Ctrl+Enter自动发送消息,不过当我们做成的时候心里自然也会有那么一种满足和喜悦。
编程工具的选择其实很重要,像这样的小东东如果用VC来做那真不是一般地麻烦,什么?你说delphi很快?那倒是,不过会pascal的肯定没会C的人多吧。就拿我们学校来说,基本对于所有的理工专业C语言都是必修课。对于快速的可视化开发BCB当然是第一选择,大伙们请安静,因为,兼具了VC与 delphi共同优点的武林第一神兵利器要隆重出场了,让我们用热烈的掌声欢迎:Borland C++ Builder 6.0 (简称BCB)。
程序详细思路:首先打开与好友的聊天窗口,程序通过窗口名搜索得到窗口句柄,下一步是自动将要发送的语句拷贝到剪贴板中,然后激活聊天窗口让其得到键盘输入焦点,最后就是通过循环不断地模拟按键Ctrl+V和Ctrl+Enter了。
启动BCB 6.0,它会默认自动新建一个Application,在窗体上放一个PageControl控件(在Win32页中),将其Align属性设置为 alClient,新建一个TabSheet(很多人都说怎么也找不到这个控件,其实新建它的方法是右键点击PageControl,然后New Page就OK了),将其Caption属性设置为“轰炸好友”,其余控件就根据我的图片(没法传图,不放了,看黑防吧)来放吧,当然您也可以自己发挥创造性弄个更漂亮的界面。
从上到下三个编辑框(Edit控件)的Name属性依次为NcikNameEdit,FrequentEdit,TimesEdit,最下面是个Memo 控件,Name属性设置为WordMemo,好了,下面就用代码说话吧。(代码侧重程序实现原理,有所删减,完整工程及代码文件已经打包)
首先我们要找到聊天窗口:
char WindowBuffer[MAX_PATH]; //存放窗口名的缓冲区
sprintf(WindowBuffer,"与 %s 聊天中",NickNameEdit->Text);
HANDLE hWindow = FindWindow(NULL,WindowBuffer); //查找窗口
if( hWindow == NULL )
{
ShowMessage("抱歉,没有找到此聊天窗口!");
return;
}
这样我们得到了聊天窗口的句柄hWindows,然后就可以开工编写轰炸的代码了。
this->Hide(); //隐藏窗口,没必要显示
for(int i=1;i<=StrToInt(TimesEdit->Text);i++)
{ //因为编辑框里面默认都是String类型,所以我们要通过StrToInt将
//轰炸次数转换成int型才能在循环中使用它

WordMemo->SelectAll(); //选中全部语句
WordMemo->CopyToClipboard; //将其拷贝到剪贴板
SetForegroundWindow(hWindow); //将聊天窗口激活使其得到键盘焦点
StartBomb(); //调用炸弹函数开始轰炸
Sleep(StrToInt(FrequentEdit->Text)); //暂停一段时间后继续下一个循环
}
this->Show(); //执行完毕后显示窗口
其中StartBomb()函数的代码如下:
void __fastcall TMainForm::StartBomb(void)
{
keybd_event(VK_CONTROL,0,0,0); //模拟按下Ctrl键
keybd_event('V','V',0,0); //模拟按下V键,必须为大写
keybd_event('V','V',KEYEVENTF_KEYUP,0); //模拟放开V键
keybd_event(VK_CONTROL,0,KEYEVENTF_KEYUP,0); //模拟放开Ctrl键
keybd_event(VK_CONTROL,0,0,0);
keybd_event(VK_RETURN,0,0,0); //模拟按下Enter键
keybd_event(VK_RETURN,0,KEYEVENTF_KEYUP,0);
keybd_event(VK_CONTROL,0,KEYEVENTF_KEYUP,0);
}
关于keybd_event()的详细用法网上有很多,还有模拟鼠标事件的相关函数。
这样一个QQ炸弹的模型就已经出炉了,记住:它只是个模型。如果要做好一个软件的话,绝不仅仅是可以用了就成,我们更需要考虑用户的友好性、程序的完善性等等,限于篇幅就不多废话了。由于时间限制,我做这个测试炸弹的时候也没有更多地进行优化,对于“炸QQ群”的功能与以上原理是一样的,只要能找到其窗口就可以了。关于托盘图标,我们可以使用BCB自带的TrayIcon控件(在Samples页),然后简单设置一下属性就可以使用了,很方便。
这个程序有一个BUG,是编码问题。如果要发送的字符是中文的话它发送到聊天窗口中就变成了乱码,限于时间原因我没能找出真正的解决方法。不过在尝试解决它的过程中却学到了操作剪贴板的方法,因为那个CopyToClipboard()只是BCB中的一个成员函数,在其他地方不能直接使用,我们可以通过一系列的函数来实现这种功能,下面给出一段实例代码:
AnsiString buffer; //保存要拷贝的字符
OpenClipboard(NULL); //打开系统剪贴板
EmptyClipboard(); //使用之前要先清空剪贴板
HGLOBAL hClipData; //分配一段内存,大小等于要复制的字符串的大小
hClipData = GlobalAlloc(GMEM_DDESHARE,buffer.Length()+1);
char *pchData; //内存控制句柄加锁
pchData = (char *)GlobalLock(hClipData);
strcpy(pchData,buffer.c_str()); //将变量值赋给全局内存
GlobalUnlock(hClipData); //给内存控制句柄解锁
SetClipboardData(CF_TEXT,hClipData); //通过全局内存句柄将数据以相应的格式放进剪贴板
CloseClipboard(); //使用完后记得关闭剪贴板
这段代码通常用来完成进程间通信等功能,由于其使用简单,容易理解,所以用处还是比较广泛的。

最后说一点有关BCB的小技巧:
1,默认情况下你会发现它生成的可执行程序很小,但却不能在没有安装BCB或delphi的机器上运行,我们需要设置一下:在project-> Options->Compiler中点击Release,在project->Options->Packages中取消 Builder with runtime packages的勾,在project->Options->Linker中取消Use dynamic RTL前的勾。
2,更换BCB自带的图标,Project/Options/Application/LoadIcon,目标图片必须是ico格式。
3,如果您是BCB的初学者的话,我推荐《C++ Builder初学问与答》这一系列文章,基本上对BCB中所有的常用控件都做了详细的说明,非常有用。

相关日志

发表评论