黑客风云——风云网络
设为首页 加入收藏 我要投稿 网站地图
您现在的位置: 黑客风云 >> 黑客文章 >> 黑客进阶 >> 黑客编程 >> 文章正文
[推荐]利用BCB自己打造QQ炸弹
        ★★★★★
利用BCB自己打造QQ炸弹
文章整理发布:黑客风云 文章来源:www.05112.com 更新时间:2007-10-23

其中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] 

文章录入:cainiaowang    责任编辑:cainiaowang 
  • 上一篇文章:

  • 下一篇文章: 没有了
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
    VIP 专 区
    Copyright @2006 黑客风云 ●业务联系:QQ 联系怪人 联系奇人 Email:给怪人发邮件 给奇人发邮件
    ICP备案:冀06009886