摘要: 一、异常迄今为止,我们处理程序中的错误一般都是用if语句测试某个表达式,然后处理错误的特定义代码。C++异常机制使用了三个新的关键字(SEH(结构化异常处理))try──标识可能出现的异常代码段throw──抛出一个异常catch──标识处理异常的代码段提示:使用异常处理将带来更多的系统开销。因此慎用异常。二、抛出异常throwthrow必须在try代码块中.后边跟的值决定抛出异常的类型。三、捕获异常catch出现在try代码块后,后边跟的数据决定捕获的类型catch(...)//表示捕获所有异常int _tmain(int argc, _TCHAR* argv[]){ int a,b; .. 阅读全文
posted @ 2013-09-11 00:41 GameKing 阅读(27102) 评论(0) 推荐(2) 编辑
摘要: 把窗口的position属性设置为poScreenCenter,就可以使窗口居于屏幕的中央。 阅读全文
posted @ 2013-07-14 14:14 GameKing 阅读(657) 评论(0) 推荐(0) 编辑
摘要: 这个函数添加新项目到指定菜单的末尾。你可以使用appendmenu指定内容,外观,和菜单项行为。BOOL AppendMenu( HMENU hMenu, UINT uFlags, UINT uIDNewItem, LPCTSTR lpNewItem ); 参数来[in]处理菜单,下拉菜单,子菜单或快捷菜单,可改变。uFlags[in]常数控制新的菜单项的外观和行为。这个参数可以是常量值列在菜单组合。如果这个参数包括mf_separator常数,appendmenu忽略值的lpnewitem和uidnewitem参数。如果这个参数包括mf_string常数,该lpnewitem参... 阅读全文
posted @ 2013-07-02 00:43 GameKing 阅读(7499) 评论(0) 推荐(0) 编辑
摘要: var Gameh:HWND; GamePid:DWORD; Gamehprocess: THandle; SitNum :DWORD; readByte:DWORD;begin //获取游戏窗口句柄 Gameh:=findwindow(nil,'对对碰角色版'); //获取进程ID GetWindowThreadprocessID(Gameh,GamePid); //获取进程句柄 PROCESS_VM_READ or PROCESS_VM_WRITE 一个是读入内存权限 一个是写入内存数据权限 gamehProcess:=OpenProcess(PROCESS_VM_READ 阅读全文
posted @ 2013-04-24 17:35 GameKing 阅读(449) 评论(0) 推荐(0) 编辑
摘要: 在Window98以下,如果程序要激活自己,只需要简单的调用SetForegroundWindow即可达到目的。但到Win98以后,再也没有这么简单了。新建一个简单的工程,加进一个Timer控件,设置时间间隔为3秒,接着在时间事件中写SetForegroundWindow(Handle),好,运行程序,将窗口切换到后台,3秒钟之后,你看到的只是任务栏上闪了闪,窗口仍然躺在后面。这是怎么回事呢,原来在Win98以后,窗口要使用SetForegroundWindow激活自己, 必须得到“允许”,允许的方式有很多种,我只介绍最简单的一种,就是利用这个API:LockSetForegroundWind 阅读全文
posted @ 2013-04-24 17:16 GameKing 阅读(5080) 评论(0) 推荐(0) 编辑
摘要: {鼠标软模拟:好处就是不会真的移动鼠标 开始按钮 坐标 x=386y=387 }sendmessage(hookHwnd,messages.WM_LBUTTONDOWN ,0,$0180017A); {按下鼠标左键}sendmessage(hookHwnd,messages.WM_LBUTTONUP ,0, $0180017A); {抬起鼠标左键}{硬件模拟:会真的移动鼠标}mouse_event(MOUSEEVENTF_LEFTDOWN,X ,Y ,0,0);mouse_event(MOUSEEVENTF_LEFTUP,X ,Y ,0,0); 函数功能 该函数将指定的消息发送到一个... 阅读全文
posted @ 2013-04-24 17:05 GameKing 阅读(958) 评论(0) 推荐(0) 编辑
摘要: 本文主要跟大家介绍Delphi中获取其它进程的窗口句柄,在Delphi中获取其它进程的窗口句柄,绝大部分人首先想到的会使用:FindWindow或者用GetWindow来遍历查找,如: handle := FindWindow(nil,PChar('窗口的标题')); 或者: procedure TForm1.Button1Click(Sender: TObject); var hCurrentWindow: HWnd; WndText:String; begin hCurrentWindow := GetWindow(Ha... 阅读全文
posted @ 2013-04-23 22:59 GameKing 阅读(729) 评论(0) 推荐(0) 编辑
摘要: absolute //指令(变量)abstract //指令(方法)and //运算符(布尔)array //类型as //运算符(RTTI)asm //语句assembler //向后兼容(汇编)at //语句(异常处理)automated //访问类别符(类)begin //块标记case //语句cdecl //函数调用协定class //类型const //声明或指令(参数)constructor //特殊方法contains //运算符(集合)default //指令(属性)destructor //特殊方法dispid //dispinterface 接口类... 阅读全文
posted @ 2013-04-10 16:53 GameKing 阅读(270) 评论(0) 推荐(0) 编辑
摘要: 修改控件对应 showHint的属性为True并且在控件对应的Hint填写你所需要悬浮的说明文字。 阅读全文
posted @ 2013-04-09 15:31 GameKing 阅读(2147) 评论(0) 推荐(0) 编辑
摘要: 首部 function SameText(const S1, S2: string): Boolean; $[SysUtils.pas 功能 返回两个字符串是否相等 说明 不区分大小写 参考 <NULL> 例子 CheckBox1.Checked := SameText(Edit1.Text, Edit2.Text); ━━━━━━━━━━━━━━━━━━━━━ 首部 function AnsiUpperCase(const S: string): string; $[SysUtils.pas 功能 返回字符串S... 阅读全文
posted @ 2012-11-08 13:01 GameKing 阅读(27759) 评论(0) 推荐(0) 编辑