易语言139个皮肤模块（不是源码）

新风up

无聊写的139个skin皮肤模块，分享出来给大家用下，代码简洁，轻快。特色：
1、去掉skin皮肤的小衣服图标
2、非内存加载版
3、超精简，去除n多未使用的dll和代码
4、139个皮肤收集于网络，应该会有两三个重复的皮肤
5、自动释放skin.dll到运行目录，已存在则不释放
6、不需要初始化，直接使用 skin_加载皮肤（）即可
7、目前仅有两个功能 skin_加载皮肤 和 skin_设置参数
8、部分代码
.子程序 skin_加载皮肤, , 公开, 从资源加载皮肤，非内存版
.参数 资源皮肤, 字节集, , 皮肤数据
.局部变量 jz, 整数型

.如果真 (文件是否存在 (取运行目录 () ＋ “/SkinH_EL.dll”) ＝ 假)
    写到文件 (取运行目录 () ＋ “/SkinH_EL.dll”, #skindll)
.如果真结束

SkinH_Attach ()
SkinH_AttachRes (资源皮肤, 取字节集长度 (资源皮肤), “”, 0, 0, 0)
9、使用的dll命令
.版本 2

.DLL命令 SkinH_Attach, , "SkinH_EL.dll"

.DLL命令 SkinH_AttachRes, 整数型, "SkinH_EL.dll", , , 从资源添加皮肤
    .参数 资源皮肤, 字节集, , 皮肤数据
    .参数 资源大小, 整数型, , 皮肤数据大小
    .参数 皮肤密码, 文本型, , 皮肤密钥
    .参数 色调, 整数型, , 取值范围 -180-180
    .参数 饱和度, 整数型, , 取值范围 -100-100
    .参数 亮度, 整数型, , 取值范围 -100-100

.DLL命令 SkinH_AdjustHSV, , "SkinH_EL.dll"
    .参数 色调, 整数型
    .参数 饱和度, 整数型
    .参数 亮度, 整数型

.DLL命令 SkinH_SetMenuAlpha, , "SkinH_EL.dll"
    .参数 nAlpha, 整数型

.DLL命令 LoadLibraryA, 整数型
    .参数 lpLibFileName, 文本型

.DLL命令 WriteProcessMemory, 整数型, "kernel32.dll"
    .参数 进程id, 整数型
    .参数 内存地址, 整数型, , 内存地址
    .参数 数据指针, 字节集, 传址, 数据指针
    .参数 长度, 整数型, , 长度
    .参数 实际写出长度, 整数型, , 实际写出长度

.DLL命令 SkinH_SetTitleMenuBar, , "SkinH_EL.dll"
    .参数 hWnd, 整数型, , 窗口句柄
    .参数 bEnabled, 整数型, , 是否设置
    .参数 nHeight, 整数型, , 菜单栏高度
    .参数 nTopOffs, 整数型, , 上部偏移
    .参数 nRightOffs, 整数型, , 右部偏移




补充内容 (2018-8-1 21:32):
7楼dll版本

gzboy020

感谢楼主。。。。。。

308228

谢谢..............

nevergiveup520

瞅瞅！！！！！！！！

nevergiveup520

静态编译失败！！！！！！！！！！

新风up

nevergiveup520 发表于 2018-8-1 19:13
静态编译失败！！！！！！！！！！

请更换vc6链接器试试，

新风up

dll版也放出来吧，此次更新：
.版本 2

.子程序 skin_加载皮肤, , 公开, 从资源加载皮肤，非内存版
.参数 皮肤, 整数型, , 范围1-135

vod ＝ 皮肤
.判断开始 (皮肤 ≤ 70)
    载入70前 ()
.默认
    载入70后 ()
.判断结束

.版本 2

.子程序 skin_设置参数, , 公开, 弹出指定窗口可以调整皮肤参数
.参数 色调, 整数型, , 范围-180-180
.参数 饱和度, 整数型, , 范围-100-100
.参数 亮度, 整数型, , 范围-100-100
.参数 菜单透明度, 整数型, , 范围0-255
.参数 窗口句柄, 整数型, , 设置标题栏菜单
.参数 是否设置, 整数型, , 0不设置1设置

SkinH_AdjustHSV (色调, 饱和度, 亮度)
SkinH_SetMenuAlpha (菜单透明度)
SkinH_SetTitleMenuBar (窗口句柄, 是否设置, 0, 0, 0)

调用方式优化，优化代码逻辑，提升响应速度
调用方式：.
版本 2

.DLL命令 skin加载皮肤, , "xfskin.dll", "skin_加载皮肤", , 非内存版
    .参数 皮肤, 整数型, , 范围1-135

.DLL命令 skin设置参数, , "xfskin.dll", "skin_设置参数"
    .参数 色调, 整数型
    .参数 饱和度, 整数型
    .参数 亮度, 整数型
    .参数 菜单透明度, 整数型
    .参数 窗口句柄, 整数型
    .参数 是否设置, 整数型
更多内容请下载后自行使用皮肤预览源码查看吧，绝对不添加恶意代码！！！

新风up

有任何问题欢迎反馈

kmskik

谢谢分享好东西

learnsong

谢谢分享，