- 博客(8)
- 收藏
- 关注
RSS订阅转载 读取内存
如何在DELPHI中实现读出基址数据 寻找血值在OD中是这样的 ~2HlAU))<& dd [[[95ad3c]+1c]+24]+25c 1" k_l.\,0 u !]g^r DELPHI中这样 rA v)k&l <6!;mb ;cX GameBase =$95E800;//[95ad3c] 55%j$f ReadProcessMemory(
2012-04-06 21:43:05
736
转载 QQ自动发消息源码
- delphi代码 procedure TForm1.Button1Click(Sender: TObject); var hParent,hButton,hMemo: HWND; begin Memo1.CopyToClipboard;//把Memo中选中的语句拷贝到剪贴板中 try //找发送消息的QQ窗口 hParent := FindWindow(nil,
2012-04-05 14:41:43
14706
转载 在case语句中使用字符串
在case语句中使用字符串 (**** 转载敬请注明－本文出处：南山古桃(nsgtao)的百度空间：http://hi.baidu.com/nsgtao/ ****) 在 case 语句中使用字符串 --- by 熊恒(beta) 我今天要介绍的是一个比较另类的方法。大家都知道，case 语句只能对顺序类型 （ordinal type）管用，那么我们先看一下顺序类型到底有那些呢：
2012-04-05 00:24:38
1956
转载 ini文件操作
delphi ini文件操作 { [Section_Name] Key_Name1=Value1 Key_Name2=Value2 } uses IniFiles; // Write values to a INI file procedure TForm1.Button1Click(Sender: TObject); va
2012-04-04 11:07:51
573
转载 发送热键
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls; type TForm1 = class(TForm) Timer1: TTimer; Timer2:
2012-03-31 22:52:24
496
转载 自动登录txt
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) procedure FormCreate(Sender: TObject);
2012-03-31 22:30:56
529
转载 模拟鼠标左键单击
SendMessage(hdl,WM_LBUTTONDOWN,0,$000c0020); SendMessage(hdl,WM_LBUTTONUP,0,$000c0020);
2012-03-31 21:48:08
626
转载 读取多个edit控件句柄
建议首先用spy++看看窗口的层次结构 然后…… var handle, ehandle1, ehandle2: THandle; begin handle：=findwindow( '父窗口类' , '父窗口标题' ); ehandle1 := FindWindowEx(父窗口句柄, 0, 'Edit ', nil);
2012-03-31 21:07:35
1754
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人