图形按钮应用

妖孽彼岸花

图形按钮，主要在于裁剪图案的水平，会点PS，一般都没有问题

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
易语言官方论坛	文本型
易语言资源网	文本型
精易论坛	文本型
天涯易栈论坛	文本型
易语言资源搜索	文本型
易语言官网	文本型
图形按钮_数组	图形按钮	6

子程序名	返回值类型	公开	备 注
__启动窗口_首次激活

变量名	类 型	静态	数组	备 注
n1	整数型
n2	整数型

计次循环首 (6, n1)
计次循环首 (4, n2)
图形按钮_数组 [n1].高度 ＝ 图形按钮_数组 [n1].高度 ＋ 53
延迟 (10)
计次循环尾 ()
计次循环尾 ()

子程序名	返回值类型	公开	备 注
_图形按钮差_被单击

销毁 ()

子程序名	返回值类型	公开	备 注
_图形按钮1_被单击

变量名	类 型	静态	数组	备 注
b	图形按钮

b ＝ 取事件组件 ()
判断 (b.左边 ＝ 248)  ' 1
打开指定网址 (易语言官网)

判断 (b.左边 ＝ 360)  ' 2
打开指定网址 (易语言官方论坛)
判断 (b.左边 ＝ 472)  ' 3
打开指定网址 (易语言资源网)
判断 (b.左边 ＝ 584)  ' 4
打开指定网址 (天涯易栈论坛)
判断 (b.左边 ＝ 696)  ' 5
打开指定网址 (精易论坛)
判断 (b.左边 ＝ 808)  ' 6
打开指定网址 (易语言资源搜索)

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
n	整数型

如果 (文件是否存在 (取当前目录 () ＋ “\配置.ini”) ＝ 假)
如果 (信息框 (“是否创建快捷键？”, #询问图标 ＋ 1, , ) ＝ #确认钮 )
创建快捷方式 (取特定目录 (3) ＋ “\易语言网站.lnk”, 取当前目录 () ＋ “\” ＋ 取执行文件名 (), , , )
写配置项 (取当前目录 () ＋ “\配置.ini”, “快捷键”, “创建”, “1”)
写配置项 (取当前目录 () ＋ “\配置.ini”, “快捷键”, “创建”, “0”)



边框 ＝ 0
图形按钮差.正常图片 ＝ 读入文件 (取运行目录 () ＋ “\Wllpaper Icon\差-正常.png”)
图形按钮差.点燃图片 ＝ 读入文件 (取运行目录 () ＋ “\Wllpaper Icon\差-点燃.png”)
图形按钮差.按下图片 ＝ 读入文件 (取运行目录 () ＋ “\Wllpaper Icon\差-按钮.png”)
图形按钮差.宽度 ＝ 30
图形按钮差.高度 ＝ 22
图形按钮差.左边 ＝ 宽度 － 图形按钮差.宽度
图形按钮差.顶边 ＝ 0
底图 ＝ 读入文件 (取运行目录 () ＋ “\Wllpaper Icon\背景1.png”)
易语言官方论坛 ＝ “http://bbs.eyuyan.com/”
易语言资源网 ＝ “http://www.5a5x.com/”
精易论坛 ＝ “http://bbs.125.la/”
易语言资源搜索 ＝ “http://go.it608.com/link/jc/”
天涯易栈论坛 ＝ “http://www.tianya88.com/”
易语言官网 ＝ “http://www.dywt.com.cn/”
计次循环首 (6, n)
复制窗口组件 (图形按钮1, 图形按钮_数组 [n])
如果 (n ＞ 1)
图形按钮_数组 [n].左边 ＝ 图形按钮_数组 [n － 1].左边 ＋ 图形按钮_数组 [n － 1].宽度 ＋ 80
图形按钮_数组 [n].左边 ＝ 248
图形按钮_数组 [n].可视 ＝ 真
图形按钮_数组 [n].顶边 ＝ 40
图形按钮_数组 [n].正常图片 ＝ 读入文件 (取运行目录 () ＋ “\Wllpaper Icon\按钮-正常” ＋ 到文本 (n) ＋ “.png”)
图形按钮_数组 [n].点燃图片 ＝ 读入文件 (取运行目录 () ＋ “\Wllpaper Icon\按钮-点燃” ＋ 到文本 (n) ＋ “.png”)
图形按钮_数组 [n].按下图片 ＝ 读入文件 (取运行目录 () ＋ “\Wllpaper Icon\按钮-按下” ＋ 到文本 (n) ＋ “.png”)
图形按钮_数组 [n].高度 ＝ 0
调试输出 (图形按钮_数组 [n].左边)
计次循环尾 ()

子程序名	返回值类型	公开	备 注
__启动窗口_鼠标右键被放开	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

弹出菜单 (创建, 取鼠标水平位置 (), 取鼠标垂直位置 ())

子程序名	返回值类型	公开	备 注
_创建快捷键_被选择

如果 (信息框 (“是否创建快捷键？”, #询问图标 ＋ 1, , ) ＝ #确认钮 )
创建快捷方式 (取特定目录 (3) ＋ “\易语言网站.lnk”, 取当前目录 () ＋ “\” ＋ 取执行文件名 (), , , )
写配置项 (取当前目录 () ＋ “\配置.ini”, “快捷键”, “创建”, “1”)

i支持库列表	支持库注释
spec	特殊功能支持库
eAPI	应用接口支持库
shell	操作系统界面功能支持库

.版本 2<br /> .支持库 spec<br /> .支持库 eAPI<br /> .支持库 shell<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 易语言官方论坛, 文本型<br /> .程序集变量 易语言资源网, 文本型<br /> .程序集变量 精易论坛, 文本型<br /> .程序集变量 天涯易栈论坛, 文本型<br /> .程序集变量 易语言资源搜索, 文本型<br /> .程序集变量 易语言官网, 文本型<br /> .程序集变量 图形按钮_数组, 图形按钮, , "6"<br /> <br /> .子程序 __启动窗口_首次激活<br /> .局部变量 n1, 整数型<br /> .局部变量 n2, 整数型<br /> <br /> .计次循环首 (6, n1)<br />     .计次循环首 (4, n2)<br />         图形按钮_数组 [n1].高度 ＝ 图形按钮_数组 [n1].高度 ＋ 53<br />         延迟 (10)<br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> <br /> .子程序 _图形按钮差_被单击<br /> <br /> 销毁 ()<br /> <br /> .子程序 _图形按钮1_被单击<br /> .局部变量 b, 图形按钮<br /> <br /> b ＝ 取事件组件 ()<br /> .判断开始 (b.左边 ＝ 248)  ' 1<br />     打开指定网址 (易语言官网)<br /> <br /> .判断 (b.左边 ＝ 360)  ' 2<br />     打开指定网址 (易语言官方论坛)<br /> <br /> .判断 (b.左边 ＝ 472)  ' 3<br />     打开指定网址 (易语言资源网)<br /> <br /> .判断 (b.左边 ＝ 584)  ' 4<br />     打开指定网址 (天涯易栈论坛)<br /> <br /> .判断 (b.左边 ＝ 696)  ' 5<br />     打开指定网址 (精易论坛)<br /> <br /> .判断 (b.左边 ＝ 808)  ' 6<br />     打开指定网址 (易语言资源搜索)<br /> .默认<br /> <br /> .判断结束<br /> <br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 n, 整数型<br /> <br /> .如果 (文件是否存在 (取当前目录 () ＋ “\配置.ini”) ＝ 假)<br />     .如果 (信息框 (“是否创建快捷键？”, #询问图标 ＋ 1, , ) ＝ #确认钮)<br />         创建快捷方式 (取特定目录 (3) ＋ “\易语言网站.lnk”, 取当前目录 () ＋ “\” ＋ 取执行文件名 (), , , )<br />         写配置项 (取当前目录 () ＋ “\配置.ini”, “快捷键”, “创建”, “1”)<br />     .否则<br />         写配置项 (取当前目录 () ＋ “\配置.ini”, “快捷键”, “创建”, “0”)<br />     .如果结束<br /> <br /> .否则<br /> <br /> .如果结束<br /> 边框 ＝ 0<br /> 图形按钮差.正常图片 ＝ 读入文件 (取运行目录 () ＋ “\Wllpaper Icon\差-正常.png”)<br /> 图形按钮差.点燃图片 ＝ 读入文件 (取运行目录 () ＋ “\Wllpaper Icon\差-点燃.png”)<br /> 图形按钮差.按下图片 ＝ 读入文件 (取运行目录 () ＋ “\Wllpaper Icon\差-按钮.png”)<br /> 图形按钮差.宽度 ＝ 30<br /> 图形按钮差.高度 ＝ 22<br /> 图形按钮差.左边 ＝ 宽度 － 图形按钮差.宽度<br /> 图形按钮差.顶边 ＝ 0<br /> 底图 ＝ 读入文件 (取运行目录 () ＋ “\Wllpaper Icon\背景1.png”)<br /> 易语言官方论坛 ＝ “http://bbs.eyuyan.com/”<br /> 易语言资源网 ＝ “http://www.5a5x.com/”<br /> 精易论坛 ＝ “<a href="http://bbs.125.la/" target="_blank">http://bbs.125.la/</a>”<br /> 易语言资源搜索 ＝ “http://go.it608.com/link/jc/”<br /> 天涯易栈论坛 ＝ “http://www.tianya88.com/”<br /> 易语言官网 ＝ “http://www.dywt.com.cn/”<br /> .计次循环首 (6, n)<br />     复制窗口组件 (图形按钮1, 图形按钮_数组 [n])<br />     .如果 (n ＞ 1)<br />         图形按钮_数组 [n].左边 ＝ 图形按钮_数组 [n － 1].左边 ＋ 图形按钮_数组 [n － 1].宽度 ＋ 80<br />     .否则<br />         图形按钮_数组 [n].左边 ＝ 248<br />     .如果结束<br />     图形按钮_数组 [n].可视 ＝ 真<br />     图形按钮_数组 [n].顶边 ＝ 40<br />     图形按钮_数组 [n].正常图片 ＝ 读入文件 (取运行目录 () ＋ “\Wllpaper Icon\按钮-正常” ＋ 到文本 (n) ＋ “.png”)<br />     图形按钮_数组 [n].点燃图片 ＝ 读入文件 (取运行目录 () ＋ “\Wllpaper Icon\按钮-点燃” ＋ 到文本 (n) ＋ “.png”)<br />     图形按钮_数组 [n].按下图片 ＝ 读入文件 (取运行目录 () ＋ “\Wllpaper Icon\按钮-按下” ＋ 到文本 (n) ＋ “.png”)<br />     图形按钮_数组 [n].高度 ＝ 0<br />     调试输出 (图形按钮_数组 [n].左边)<br /> .计次循环尾 ()<br /> <br /> .子程序 __启动窗口_鼠标右键被放开, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 弹出菜单 (创建, 取鼠标水平位置 (), 取鼠标垂直位置 ())<br /> <br /> .子程序 _创建快捷键_被选择<br /> <br /> .如果 (信息框 (“是否创建快捷键？”, #询问图标 ＋ 1, , ) ＝ #确认钮)<br />     创建快捷方式 (取特定目录 (3) ＋ “\易语言网站.lnk”, 取当前目录 () ＋ “\” ＋ 取执行文件名 (), , , )<br />     写配置项 (取当前目录 () ＋ “\配置.ini”, “快捷键”, “创建”, “1”)<br /> .否则<br /> <br /> .如果结束

小堆

很给力的 玩意啊

木小果

看帖不回帖，不是好孩子！！！！

qq123456aa

嗯嗯   用的好的话 不比自绘差，就是有点麻烦

youwoyy

谢谢分享，软件一看就是高大上

阳光大侠

这个倒是不错啊，但是你还是用了模块

妖孽彼岸花

猥琐小胖子 发表于 2016-4-28 19:06
那天接了个源码修改功能，也是用图形按钮。软件一看就是高大上啊。

嗯嗯   用的好的话 不比自绘差，就是有点麻烦

猥琐小胖子

那天接了个源码修改功能，也是用图形按钮。软件一看就是高大上啊。