开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 5546|回复: 13
收起左侧

[易源码分享] 高级通用对话框

[复制链接]
发表于 2015-12-27 13:41:40 | 显示全部楼层 |阅读模式   福建省泉州市
分享源码
界面截图: -
是否带模块: 纯源码
备注说明: -
  
子程序名返回值类型公开备 注
安装Hook 核心代码
变量名类 型静态数组备 注
hModule整数型 
FuncAddress整数型2
hHook整数型2
HookFuncAddr整数型2
OldProtect整数型 
HookFuncAddr [1]到整数 (&_GetOpenFileNameA)
HookFuncAddr [2]到整数 (&_GetSaveFileNameA)
hModule = GetModuleHandle (“comdlg32.dll”)
FuncAddress [1]GetProcAddress (hModule, “GetOpenFileNameA”)
FuncAddress [2]GetProcAddress (hModule, “GetSaveFileNameA”)
hHook [1]VirtualAlloc (0, 14, 12288, 64)
hHook [2]VirtualAlloc (0, 14, 12288, 64)
RtlMoveMemory_1 (hHook [1], 到字节集 (FuncAddress [1]), 4)
RtlMoveMemory_1 (hHook [2], 到字节集 (FuncAddress [2]), 4)
JmpCode [1] = hHook [1] + 4
JmpCode [2] = hHook [2] + 4
RtlMoveMemory (JmpCode [1], FuncAddress [1], 5)
RtlMoveMemory (JmpCode [2], FuncAddress [2], 5)
RtlMoveMemory_1 (JmpCode [1] + 5, { 233 }到字节集 (到整数 (FuncAddress [1] + 5 - JmpCode [1] - 10)), 5)
RtlMoveMemory_1 (JmpCode [2] + 5, { 233 }到字节集 (到整数 (FuncAddress [2] + 5 - JmpCode [2] - 10)), 5)
VirtualProtect (FuncAddress [1], 5, 64, OldProtect)
RtlMoveMemory_1 (FuncAddress [1], { 233 }到字节集 (到整数 (HookFuncAddr [1] - FuncAddress [1] - 5)), 5)
VirtualProtect (FuncAddress [1], 5, OldProtect, 0)
VirtualProtect (FuncAddress [2], 5, 64, OldProtect)
RtlMoveMemory_1 (FuncAddress [2], { 233 }到字节集 (到整数 (HookFuncAddr [2] - FuncAddress [2] - 5)), 5)
VirtualProtect (FuncAddress [2], 5, OldProtect, 0)
子程序名返回值类型公开备 注
_GetOpenFileNameA整数型 
参数名类 型参考可空数组备 注
lpofn整数型
处理OFN (lpofn)
返回 (Jmp (JmpCode [1], lpofn))
子程序名返回值类型公开备 注
_GetSaveFileNameA整数型 
参数名类 型参考可空数组备 注
lpofn整数型
处理OFN (lpofn)
返回 (Jmp (JmpCode [2], lpofn))
子程序名返回值类型公开备 注
处理OFN  
参数名类 型参考可空数组备 注
lpofn整数型
写到内存 (位异或 (指针到整数 (lpofn + 52), 32), lpofn + 52, 4)
子程序名返回值类型公开备 注
Jmp整数型 
参数名类 型参考可空数组备 注
地址整数型
参数整数型
置入代码 ({ 201, 88, 135, 4, 36, 255, 224 })
返回 (0)
子程序名返回值类型公开备 注
指针到整数整数型 
参数名类 型参考可空数组备 注
指针整数型
置入代码 ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 })
返回 (0)
DLL命令名返回值类型公开备 注
GetModuleHandle整数型 
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
GetModuleHandleA
参数名类 型传址数组备 注
子程序名返回值类型公开备 注
(未填写子程序名)   
参数名类 型参考可空数组备 注
参数名类 型参考可空数组备 注
lpModuleName文本型

DLL命令名返回值类型公开备 注
GetProcAddress整数型 
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
GetProcAddress
参数名类 型传址数组备 注
子程序名返回值类型公开备 注
(未填写子程序名)   
参数名类 型参考可空数组备 注
参数名类 型参考可空数组备 注
hModule整数型
lpProcName文本型

DLL命令名返回值类型公开备 注
VirtualAlloc整数型 
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
VirtualAlloc
参数名类 型传址数组备 注
子程序名返回值类型公开备 注
(未填写子程序名)   
参数名类 型参考可空数组备 注
参数名类 型参考可空数组备 注
lpAddress整数型
dwSize整数型
flAllocationType整数型
flProtect整数型

DLL命令名返回值类型公开备 注
RtlMoveMemory_1 
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
RtlMoveMemory
参数名类 型传址数组备 注
子程序名返回值类型公开备 注
(未填写子程序名)   
参数名类 型参考可空数组备 注
参数名类 型参考可空数组备 注
Destination整数型
Source字节集
Length整数型

DLL命令名返回值类型公开备 注
RtlMoveMemory 
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
RtlMoveMemory
参数名类 型传址数组备 注
子程序名返回值类型公开备 注
(未填写子程序名)   
参数名类 型参考可空数组备 注
参数名类 型参考可空数组备 注
Destination整数型
Source整数型
Length整数型

DLL命令名返回值类型公开备 注
VirtualProtect逻辑型 
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
VirtualProtect
参数名类 型传址数组备 注
子程序名返回值类型公开备 注
(未填写子程序名)   
参数名类 型参考可空数组备 注
参数名类 型参考可空数组备 注
lpAddress整数型
dwSize整数型
flNewProtect整数型
lpflOldProtect整数型


发表于 2023-12-14 09:38:52 | 显示全部楼层   云南省临沧市
有没有例程
回复 支持 反对

使用道具 举报

发表于 2022-2-17 22:59:45 | 显示全部楼层   广东省潮州市
666666666666666666666
回复 支持 反对

使用道具 举报

结帖率:0% (0/2)
发表于 2016-6-22 14:04:32 | 显示全部楼层   广东省肇庆市
最伟大的先知 发表于 2015-12-31 22:26
就是使通用对话框打开有这样的效果

大神  这玩意有例程吗  
回复 支持 反对

使用道具 举报

头像被屏蔽
结帖率:37% (7/19)
发表于 2016-1-16 04:15:25 | 显示全部楼层   江苏省苏州市
marker  marker
回复 支持 反对

使用道具 举报

发表于 2016-1-3 12:53:02 | 显示全部楼层   广西壮族自治区贵港市
666666666666666666666666666666666666666666666666666666666666666666666666666666666666666666666
回复 支持 反对

使用道具 举报

发表于 2016-1-3 12:52:09 | 显示全部楼层   广西壮族自治区贵港市
66666666666666666666666666666666666666666666666
回复 支持 反对

使用道具 举报

 楼主| 发表于 2015-12-31 22:26:10 | 显示全部楼层   福建省泉州市
6.png 就是使通用对话框打开有这样的效果
回复 支持 反对

使用道具 举报

结帖率:96% (25/26)

签到天数: 5 天

发表于 2015-12-30 10:04:57 | 显示全部楼层   广东省深圳市
这么屌,看的我什么都不懂
回复 支持 反对

使用道具 举报

结帖率:100% (7/7)

签到天数: 1 天

发表于 2015-12-29 16:11:12 | 显示全部楼层   河北省沧州市
这么屌,看的我什么都不懂
回复 支持 反对

使用道具 举报

结帖率:100% (3/3)
发表于 2015-12-27 19:06:09 | 显示全部楼层   广东省茂名市
不错,感谢楼主分享
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 793400750,邮箱:wp@125.la
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表