• 博客园logo
  • 会员
  • 周边
  • 新闻
  • 博问
  • 闪存
  • 众包
  • 赞助商
  • Chat2DB
    • 搜索
      所有博客
    • 搜索
      当前博客
  • 写随笔 我的博客 短消息 简洁模式
    用户头像
    我的博客 我的园子 账号设置 会员中心 简洁模式 ... 退出登录
    注册 登录
 






Nothing Is Impossible

 
 

Powered by 博客园
| 首页 | 新随笔 | | 订阅 订阅 | 管理

07 2010 档案

 
Delphi外挂辅助技术入门篇、Windows扫雷程序示例
摘要:程序本身就不多说了、应用很基础、代码里的注释也比较详细、、而且基本是使用api完成、所以改VB/VC++等都是很容易的至此、也基本了解了扫雷程序的工作原理(猜测)1.随机产生列阵、等待用户2.判断用户首次左键单击位置是否为雷区、如果不是则继续、若是的话、重新排列列阵、让用户首次单击区域不为雷区(我猜想是为了不让游戏这么快的结束)3.一旦首次判断完成、列阵则已经被确定、不再更改4.扫雷程序界面上提示的数字、预先并没有生成、只是在用户将要把他翻开时判断四周9个点、才显示出来的、“自动完成”部分我没写完、应该是坐标的判断有点问题、也就不弄了、有兴趣的同学可以参考重写(照着我这个修改可能比你重写还难) 阅读全文
posted @ 2010-07-16 07:44 forDream 阅读(467) 评论(0) 推荐(0)
[测试]注册全局热键
摘要:第一帖测试下CSDN的效果、copy一份网络上的东西看看效果、、typeTForm1 = class(TForm) Label1: TLabel; procedure FormCreate(Sender: TObject); procedure FormDestroy(Sender: TObject);private { Private declarations } aatom:atom; procedure hotkey(var msg:tmessage);message wm_hotkey; //定义全局热键消息事件public { Public declarations }end;var 阅读全文
posted @ 2010-07-12 16:47 forDream 阅读(277) 评论(0) 推荐(0)