利用BCB自己打造QQ炸弹

其中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中所有的常用控件都做了详细的说明，非常有用。

上一页  [1] [2]