开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

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

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


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

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

楼主: 时间的温柔
收起左侧

[易语言模块源码] 软件皮肤模块源码

[复制链接]
结帖率:76% (38/50)
发表于 2012-8-20 14:47:22 | 显示全部楼层   福建省莆田市

...怎么没说明的?
回复 支持 反对

使用道具 举报

结帖率:100% (11/11)
发表于 2012-8-22 15:52:37 | 显示全部楼层   广东省深圳市
发个图没什么的吧..晕
回复 支持 反对

使用道具 举报

结帖率:0% (0/1)
发表于 2012-8-24 15:21:44 | 显示全部楼层   河北省秦皇岛市
.版本 2

.程序集 程序集1
.程序集变量 文件名, 文本型

.子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码


_临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
返回 (0)  ' 可以根据您的需要返回任意数值

.子程序 _临时子程序

' 本名称子程序用作测试程序用,仅在开发及调试环境中有效,编译发布程序前将被系统自动清空,请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。


.子程序 加载皮肤, , 公开
.参数 皮肤类型, 整数型, 可空, 一共25种,从1开始;

.如果真 (文件是否存在 (“C:\WINDOWS\system32\jedata.dll”) = 假)
    写到文件 (“C:\WINDOWS\system32\jedata.dll”, #gz36)
.如果真结束
皮肤类型 (皮肤类型)

.子程序 卸载皮肤, , 公开

_皮肤卸载 ()

.子程序 皮肤_颜色调整, , 公开, 调整所用皮肤的颜色,可以直接填入数值
.参数 色调, 整数型, 可空, 取值范围0-255,为空则不改变
.参数 饱和度, 整数型, 可空, 取值范围0-255,为空则不改变
.参数 亮度, 整数型, 可空, 取值范围0-255,为空则不改变

_皮肤调整颜色 (色调, 饱和度, 亮度)

.子程序 皮肤类型
.参数 类型, 整数型, 可空

文件名 = 取运行目录 () + “/xiaohu.skn”
.如果真 (类型 = 0)
    类型 = 25
.如果真结束
.判断开始 (类型 = 1)
    写到文件 (文件名, #_001Adamant)
    皮肤加载 (文件名, “”)
.判断 (类型 = 2)
    写到文件 (文件名, #_002Asus)
    皮肤加载 (文件名, “”)
.判断 (类型 = 3)
    写到文件 (文件名, #_003Aero)
    皮肤加载 (文件名, “”)
.判断 (类型 = 4)
    写到文件 (文件名, #_004Black)
    皮肤加载 (文件名, “”)
.判断 (类型 = 5)
    写到文件 (文件名, #_005MSN)
    皮肤加载 (文件名, “”)
.判断 (类型 = 6)
    写到文件 (文件名, #_006QQ2008)
    皮肤加载 (文件名, “”)
.判断 (类型 = 7)
    写到文件 (文件名, #_007QQ影音)
    皮肤加载 (文件名, “”)
.判断 (类型 = 8)
    写到文件 (文件名, #_008QQGaMe)
    皮肤加载 (文件名, “”)
.判断 (类型 = 9)
    写到文件 (文件名, #_009QQ2009)
    皮肤加载 (文件名, “”)
.判断 (类型 = 10)
    写到文件 (文件名, #_010QQ2009_黑色)
    皮肤加载 (文件名, “”)
.判断 (类型 = 11)
    写到文件 (文件名, #_011QQ2009_宽_底边)
    皮肤加载 (文件名, “”)
.判断 (类型 = 12)
    写到文件 (文件名, #_012QQ2009_窄_底边)
    皮肤加载 (文件名, “”)
.判断 (类型 = 13)
    写到文件 (文件名, #_013Dogmax)
    皮肤加载 (文件名, “”)
.判断 (类型 = 14)
    写到文件 (文件名, #_014Longhorn)
    皮肤加载 (文件名, “”)
.判断 (类型 = 15)
    写到文件 (文件名, #_015Itunes)
    皮肤加载 (文件名, “”)
.判断 (类型 = 16)
    写到文件 (文件名, #_016WhiteFire)
    皮肤加载 (文件名, “”)
.判断 (类型 = 17)
    写到文件 (文件名, #_017Storm)
    皮肤加载 (文件名, “”)
.判断 (类型 = 18)
    写到文件 (文件名, #_018ShanMeng窄版)
    皮肤加载 (文件名, “”)
.判断 (类型 = 19)
    写到文件 (文件名, #_019office2007)
    皮肤加载 (文件名, “”)
.判断 (类型 = 20)
    写到文件 (文件名, #_020炫绿)
    皮肤加载 (文件名, “”)
.判断 (类型 = 21)
    写到文件 (文件名, #_021积木)
    皮肤加载 (文件名, “”)
.判断 (类型 = 22)
    写到文件 (文件名, #_022中国风)
    皮肤加载 (文件名, “”)
.判断 (类型 = 23)
    写到文件 (文件名, #_023纯净皮肤)
    皮肤加载 (文件名, “”)
.判断 (类型 = 24)
    写到文件 (文件名, #_024悬浮镂空)
    皮肤加载 (文件名, “”)
.判断 (类型 = 25)
    写到文件 (文件名, #_025彗星小助手深蓝色)
    皮肤加载 (文件名, “”)
.默认

.判断结束
回复 支持 反对

使用道具 举报

结帖率:100% (5/5)
发表于 2012-8-24 22:18:53 | 显示全部楼层   广东省惠州市
我要了。。谢谢了。。
回复 支持 反对

使用道具 举报

结帖率:50% (1/2)
发表于 2012-8-25 19:49:23 | 显示全部楼层   山西省晋中市

谢谢楼主分享。
回复 支持 反对

使用道具 举报

结帖率:100% (1/1)
发表于 2012-8-26 00:50:45 | 显示全部楼层   天津市天津市
看看,收藏了!!!
回复 支持 反对

使用道具 举报

结帖率:100% (2/2)

签到天数: 19 天

发表于 2012-8-26 01:00:26 | 显示全部楼层   海南省定安县
看看把!!!!
回复 支持 反对

使用道具 举报

发表于 2012-8-26 01:23:11 | 显示全部楼层   广东省江门市
感谢分享。。。支持
回复 支持 反对

使用道具 举报

结帖率:61% (35/57)
发表于 2012-8-26 15:28:59 | 显示全部楼层   海南省海口市
没有截图看的吖。。。。
回复 支持 反对

使用道具 举报

结帖率:13% (1/8)
发表于 2012-8-26 15:38:15 | 显示全部楼层   河南省商丘市
谢谢分享,,,学习
回复 支持 反对

使用道具 举报

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

本版积分规则 致发广告者

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

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

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