谁有易语言皮肤模块的源码。有的给我发个

易语言 极度模块 v1.01

.子程序 极度_窗口_改变窗口, 整数型, 公开, 关闭0,最小化1,最大化2,恢复3

.参数 窗口句柄, 整数型

.参搏困侍数 类型, 整数型, , 关闭0,最小化1,最大化2,恢复3

.子程序 极度_窗口_获取窗口尺寸, 窗口尺基吵寸类, 公开, 成功获取窗口尺寸，不成功返回0

.参数 窗口句柄, 整数型

.参数 窗口尺寸类变量, 窗口尺寸类, 参考, 指向一个RECT结构的指针，该结构接收窗口的左上角和右下角的屏幕坐标

.子程序 极度_窗口_获取窗口句柄, 整数型, 公开, 成功获取窗口句柄，不成功返回0

.参数 窗口类名, 文本型, 可空

.参数 窗口标题, 文本型, 可空

.子程序 极度_窗口_取父窗口句柄, 整数型, 公开, 成功获取窗口句柄，不成功返回0

.参数 子窗口句柄, 整数型

.子程序 极度_窗口_取文本框某行文本, 文本型, 公开, 例：取文本框某行文本 (编辑框1.取窗口句柄 (), 1)

.参数 句柄, 整数型, , 对象窗口句柄

.参数 第几行, 整数型, , 取文本框第几行的文本

.子程序 极度_窗口_取文本框行数, 整数型, 公开, 例：取文本框行数 (编辑框1.取窗口句柄 ())

.参数 句柄, 整数型, , 对象窗口句柄

.子程序 极度_进制_十六转十, 文本型, 公开

.参数 待转数值, 文本型

.子程序 极度_进制_十转十六, 文本型, 公开

.参数 待转数值, 文本型

.子程序 极度_皮肤_标题菜单栏, 整数型, 公开, 在窗口标题栏定义菜单，成功返回0。说明:WIN7系统下不可与SkinH_SetAero()函数同时使用

.参数 窗口句柄, 整数型, , 欲换肤的窗口句柄

.参数 是否启用, 整数型, , 是否启用标题菜单栏；0停用，1启用

.参数 菜单高度, 整数型, , 0为默认；一般设置为22或10；根据需要设置

.参数 顶部偏移, 整数型, , 顶部偏移

.参数 右部偏移, 整数型, , 右部偏移

.子程序 极度_皮肤_窗口可否移动, 整数型, 公开, 设置窗体是否可以移动。成功返回0

.参数 句柄, 整数型, , 窗口句柄

.参数 是否移动, 整数型, , 0为不可移动,1为可移动

.子程序 极度_皮肤_从PE资源加载皮肤, 整数型, 公开, 从exe或dll资源加载皮肤，成功返回0

.参数 资源名, 文本型, , PE内的皮肤资源名

.参数 资源类型, 文本型, , PE内的皮肤资源类型

.子程序 极度_皮肤_从资源加载皮肤, 整数型, 公开, 从资源添加皮肤，并指定皮肤的色调，饱和度，亮度，成功返回0

.参数 资源皮肤, 字节集, , 皮肤数据

.参数 资源大小, 整数型, , 皮肤数据大小

.参数 皮肤密码, 文本型, , 皮肤密钥

.参数 色调, 整数型, , 取值范围 -180 - 180

.参数 饱和度, 整数型, , 取值范围 -100 - 100

.参数 亮度, 整数型, , 取值范围 -100 - 100

.子程序 极度_皮肤_调整皮肤颜色, 整数型, 公开, 调整色调，饱和度，亮度，成功返回0

.参数 色调, 整数型, , 取值范围 (-180 至 180)

.参数 饱和度, 整数型, , 取值范围 (-100 至 100)

.参数 亮度, 整数型, , 取值范围 (-100 至 100)

.子程序 极度_皮肤_绘制设备元素, 整数型, 公开, 绘制指定设备上下文的元素。成功返回0

.参数 目标设备, 整数型, , 目标设备上下文

.参数 X1, 整数型, , 左上角水平坐标

.参数 Y1, 整数型, , 左上角垂直坐标

.参数 X2, 整数型, , 右下角水平坐标

.参数 Y2, 整数型, , 右下角垂直坐标

.参数 元素ID, 整数型, , 元素id

.子程序 极度_皮肤_获取指定点颜色, 整数型, 公开, 获取指定窗口或控件在nX,nY处的颜色值，无符号整型 返回颜色值(RGB)

.参数 句柄, 整数型, , 指定窗口或控件的句柄

.参数 横坐标, 整数型, , 指定横坐标点

.参数 纵坐标, 整数型, , 指定纵坐标点

.子程序 极度_皮肤_加载皮肤, 整数型, 公开, 加尺樱载指定的皮肤，成功返回0

.参数 皮肤路径, 文本型, 可空, 皮肤路径为空时为默认皮肤

.子程序 极度_皮肤_加载皮肤并设置色调参数, 整数型, 公开, 加载指定皮肤，并指定皮肤的色调，饱和度，亮度， 成功返回0

.参数 皮肤路径, 文本型, , 皮肤文件路径

.参数 皮肤密码, 文本型, , 皮肤密钥

.参数 色调, 整数型, , 取值范围 -180 - 180

.参数 饱和度, 整数型, , 取值范围 -100 - 100

.参数 亮度, 整数型, , 取值范围 -100 - 100

.子程序 极度_皮肤_控制滚动条刷新, 整数型, 公开, 用于填充表格或者列表控件数据时，重复绘制滚动条影响执行效率问题。成功返回0

.参数 句柄, 整数型, , 指定窗体句柄

.参数 是否锁定, 整数型, , 是否锁定。1为锁定，0为解锁

.子程序 极度_皮肤_卸载皮肤, 整数型, 公开, 成功返回0

.子程序 极度_皮肤_指定不使用皮肤的组件, 整数型, 公开, 卸载指定句柄的窗体或者控件的皮肤，成功返回0

.参数 句柄, 整数型, , 指定窗体或控件的句柄

.子程序 极度_皮肤_指定换肤类型, 整数型, 公开, 指定窗体和控件的换肤类型，成功返回0。换肤类型参见常量表

.参数 句柄, 整数型, , 指定窗体句柄

.参数 换肤类型, 整数型, , 换肤类型：换肤类型参见常量表

.子程序 极度_皮肤_置Vista特效, 整数型, 公开, 为指定句柄的窗体或者控件设置Vista特效。成功返回0

.参数 有效位, 整数型, , Vista特效是否有效,1为有效,0为无效

.子程序 极度_皮肤_置Vista特效阴影, 整数型, 公开, 设置Vista特效的阴影大小。成功返回0

.参数 透明度, 整数型, , 1－255 默认值0

.参数 亮度, 整数型, , 1－255 默认值0

.参数 锐度, 整数型, , 1－255 默认值0

.参数 阴影大小, 整数型, , 2－19 默认值0

.参数 水平偏移, 整数型, , 默认值0

.参数 垂直偏移, 整数型, , 默认值0

.参数 红色分量, 整数型, , 0－255 默认值 -1

.参数 绿色分量, 整数型, , 0－255 默认值 -1

.参数 蓝色分量, 整数型, , 0－255 默认值 -1

.子程序 极度_皮肤_置菜单透明度, 整数型, 公开, 设置菜单的透明度，成功返回0

.参数 透明度, 整数型, , 取值范围 0-255

.子程序 极度_皮肤_置控件的背景色, 整数型, 公开, 目前仅对单选框,复选框,分组框有效。成功返回0

.参数 句柄, 整数型, , 控件句柄

.参数 红色分量, 整数型, , 取值范围0-255

.参数 绿色分量, 整数型, , 取值范围0-255

.参数 蓝色分量, 整数型, , 取值范围0-255

.子程序 极度_皮肤_置控件的文本颜色, 整数型, 公开, 目前仅对单选框,复选框,分组框有效。成功返回0

.参数 句柄, 整数型, , 控件句柄

.参数 红色分量, 整数型, , 取值范围0-255

.参数 绿色分量, 整数型, , 取值范围0-255

.参数 蓝色分量, 整数型, , 取值范围0-255

.子程序 极度_皮肤_置皮肤透明度, 整数型, 公开, 设置指定句柄的窗体的透明度，成功返回0

.参数 句柄, 整数型, , 指定窗体句柄

.参数 透明度, 整数型, , 取值范围 0-255

.子程序 极度_网页_Ascii转Unicode, 文本型, 公开

.参数 待转换文本, 文本型

.子程序 极度_网页_HTTP进度下载, 整数型, 公开, 进度下载HTTP指定文件

.参数 网址, 文本型, , 要下载的文件远程路径

.参数 文件名, 文本型, , 要保存的位置

.参数 进度显示, 子程序指针, , 需要建一个子程序接收回调函数，参数一为总字节数；参数二为目前下载字节数；参数三为现行下载时间；参数四为实际下载

.参数 起始位置, 整数型, 可空

.子程序 极度_网页_IP转换NUM, 长整数型, 公开

.参数 IP, 文本型

.子程序 极度_网页_JS加密, 文本型, 公开

.参数 待加密文本, 文本型

.子程序 极度_网页_JS解密, 文本型, 公开

.参数 待解密文本, 文本型

.子程序 极度_网页_Unicode转Ascii, 文本型, 公开

.参数 待转换文本, 文本型

.子程序 极度_网页_URL编码, 文本型, 公开, 例：极度_网页_URL编码 (“abc 极度网”, “ |+”, 真)

.参数 转换前, 文本型

.参数 自定义编码, 文本型, 可空, （可空）例： (空格)|+,?|?,/|/ 以|隔开替换的 以,隔开多个

.参数 只转换汉字, 逻辑型, 可空, 可空，默认为全转换，为真 只转换汉字

.子程序 极度_网页_简繁火转换, 文本型, 公开

.参数 待转换文本, 文本型

.参数 转换类型, 整数型, , 1,简体 2,繁体 3,火星文

.子程序 极度_网页_清除cookies, 逻辑型, 公开

.参数 网址, 文本型, 可空

.子程序 极度_网页_取cookies, 文本型, 公开

.参数 网址, 文本型

.参数 COOKIE名称, 文本型, 可空, 为空返回全部COOKIE

.子程序 极度_网页_取端口, 整数型, 公开

.参数 网址, 文本型

.子程序 极度_网页_取页面地址, 文本型, 公开

.参数 网址, 文本型

.子程序 极度_网页_取域名, 文本型, 公开

.参数 网址, 文本型

.参数 不过滤端口, 逻辑型, 可空

.子程序 极度_网页_取中间文, 文本型, 公开

.参数 全文, 文本型

.参数 左文, 文本型

.参数 右文, 文本型

.子程序 极度_网页_设COOKIE, 逻辑型, 公开, 1.1

.参数 网址, 文本型

.参数 COOKIE名称, 文本型, 可空, 为空清除所有

.参数 COOKIE内容, 文本型, 可空, 为空清除

.参数 有效期, 日期时间型, 可空, 为空不保存

.子程序 极度_网页_设置IE代理, 整数型, 公开

.参数 代理IP, 文本型, 可空, 代理IP为空时将取消IP代理

.子程序 极度_网页_提交数据, 字节集, 公开

.参数 完整网址, 文本型, , 如：

.参数 访问方式, 文本型, 可空, "GET" or "POST",为空默认"GET"

.参数 代理地址, 文本型, 可空, 没有使用代理请留空

.参数 用户名, 文本型, 可空, 没有使用代理请留空

.参数 密码, 文本型, 可空, 没有使用代理请留空

.参数 源地址, 文本型, 可空, Referer地址如：，可空

.参数 提交信息, 字节集, 可空, "POST"专用

.参数 超时值, 整数型, 可空, 单位秒，默认90

.参数 返回状态文本, 文本型, 可空, 在Send之后可以获取状态文本

.参数 文件类型, 文本型, 可空, Accept: 为空则为默认 */*

.子程序 极度_网页_文本加密, 文本型, 公开

.参数 待加密文本, 文本型

.子程序 极度_网页_文本解密, 文本型, 公开

.参数 待解密文本, 文本型

.子程序 极度_网页_延时器, , 公开

.参数 延时值, 整数型

.子程序 极度_网页_验证IE代理, 逻辑型, 公开

.参数 代理IP, 文本型

.子程序 极度_网页_转换为GMT格式, 文本型, 公开, 将日期时间型数据转换为GMT格式

.参数 待转换时间, 日期时间型

下载地址：

呵呵估计你要失望了，如果要求不高的话，可以试着用用skin皮肤，虽然可以透明但完全和WIN7不是一回事而且只是从外圆缓碧观上改变了，而且没有Win7的Aore动画效果。

如果要求很高的话，可以试着手绘，自己去写，部分组件（比如按钮）的渐变效果模仿得非常相似。只不过程序写起来费时费力，如果要写一淘网整的程序，且都要带上这种WIN7效果的哪厅话，没有一定的技术底子和猫抓耗子般的耐心，是很难做到的。

当然你也可以偷懒，可以用skin皮肤配橘举合自己再写一些动画代码，我京城这样做，一般我也就是窗口打开和关闭的过滤特效自己写，界面组件使用skin，如果只用打开和关闭这个Aore动画特效的话，不防把它编译成模块，每个窗口创建的时候都执行以下“动画打开（）”将被销毁的时候执行“动画关闭（）”这样可以在节省时间方面起到事半功倍的效果。

---