|
楼主 |
发表于 2011-8-14 14:24:42
|
显示全部楼层
广东省揭阳市
本帖最后由 仴丅ざ亡灵儛 于 2011-8-14 14:27 编辑
小人物 发表于 2011-8-12 10:34
能把源码发出来吗
- .版本 2
- .程序集变量 焦点控件句柄, 整数型
- .程序集变量 旧窗口函数, 子程序指针
- .子程序 __启动窗口_创建完毕
- 接受消息 (编辑框1.取窗口句柄 ())
- .子程序 编辑框内容
- .参数 编辑框句柄, 整数型
- .参数 内容, 文本型
- .局部变量 文本长度, 整数型
- 文本长度 = SendMessageA (编辑框句柄, 193, 0, 0)
- SendMessageA (编辑框句柄, 177, 0, 文本长度)
- SendMessageA_2 (编辑框句柄, 194, 0, 内容)
- .子程序 编辑框只读
- .参数 编辑框句柄, 整数型
- .参数 只读, 逻辑型
- .如果 (只读)
- SendMessageA (编辑框句柄, 207, 1, 0)
- .否则
- SendMessageA (编辑框句柄, 207, 0, 0)
- .如果结束
- .子程序 接受消息, 整数型, , 失败返回0
- .参数 编辑框句柄, 整数型
- 旧窗口函数 = SetWindowLongA (编辑框句柄, -4, &处理)
- .如果真 (到数值 (旧窗口函数) ≠ 0)
- 编辑框只读 (编辑框句柄, 真)
- 编辑框内容 (编辑框句柄, “”)
- .如果真结束
- 返回 (0)
- .子程序 处理, 整数型
- .参数 窗口句柄, 整数型
- .参数 消息, 整数型
- .参数 参数一, 整数型
- .参数 参数二, 整数型
- .判断开始 (消息 = 256)
- 编辑框内容 (窗口句柄, “OK”) ' 这里明明写的是“OK”,为什么在调试时有两个“OK”?
- .判断 (消息 = 257)
- 返回 (0)
- .判断 (消息 = 123) ' 按下鼠标右键
- 编辑框内容 (窗口句柄, “”) ' 清空编辑框内容
- .判断 (消息 = 512) ' 移动鼠标
- 返回 (0)
- .判断 (消息 = 515) ' 双击鼠标左键
- 返回 (0)
- .默认
- CallWindowProcA (旧窗口函数, 窗口句柄, 消息, 参数一, 参数二)
- .判断结束
- 返回 (CallWindowProcA (旧窗口函数, 窗口句柄, 消息, 参数一, 参数二))
复制代码 Dll命令- .版本 2
- .DLL命令 SetWindowLongA, 子程序指针, "user32", "SetWindowLongA", , 在窗口结构中为指定的窗口设置信息 指定数据的前一个值
- .参数 hwnd, 整数型, , 欲为其取得信息的窗口的句柄
- .参数 nIndex, 整数型, , 请参考GetWindowLong函数的nIndex参数的说明
- .参数 dwNewLong, 子程序指针, , 由nIndex指定的窗口信息的新值
- .DLL命令 SendMessageA_2, 整数型, "user32", "SendMessageA", , 调用一个窗口的窗口函数,将一条消息发给那个窗口。除非消息处理完毕,否则该函数不会返回。SendMessageBynum, ; SendMessageByString是该函数的“类型安全”声明形式 由具体的消息决定
- .参数 hwnd, 整数型, , 要接收消息的那个窗口的句柄
- .参数 sMsg, 整数型, , 消息的标识符
- .参数 wParam, 整数型, , 具体取决于消息
- .参数 lParam, 文本型, , 具体取决于消息;
- .DLL命令 SendMessageA, 整数型, "user32", "SendMessageA", , 调用一个窗口的窗口函数,将一条消息发给那个窗口。除非消息处理完毕,否则该函数不会返回。SendMessageBynum, ; SendMessageByString是该函数的“类型安全”声明形式 由具体的消息决定
- .参数 窗口句柄, 整数型, , 要接收消息的那个窗口的句柄
- .参数 信息值, 整数型, , 消息的标识符
- .参数 参数一, 整数型, , 具体取决于消息
- .参数 参数二, 整数型, , 具体取决于消息;
- .DLL命令 CallWindowProcA, 整数型, , "CallWindowProcA", , 将消息传答窗口函数
- .参数 lpPrevWndFunc, 子程序指针
- .参数 hWnd, 整数型
- .参数 Msg, 整数型
- .参数 wParam, 整数型
- .参数 lParam, 整数型
复制代码 一个编辑框 |
|