精易论坛

标题: 一个好看启动菜单(修改版) [打印本页]

---

作者: ludosa    时间: 2021-10-17 21:09
标题: 一个好看启动菜单(修改版)
上一贴地址
比上一贴增加了播放音乐和定时关机
在  20 40 60 80 100 按钮上单击是设置音乐音量
播放/暂停  上一曲 下一曲 背后的标签是当前播放歌曲的进度
压缩包里 包含了源码 和两个模块 精易9.45模块没有打包进去论坛可以下载





补充内容 (2021-10-20 15:35):
关于模块冲突的问题解决方法
把所有在用的模块都删除 重新添加一次
先添加 ed_dui
再添加精易9.4.5

补充内容 (2021-10-20 15:36):
打错一个字   
先添加 ex_dui
再添加精易9.4.5

桌面.rar

2021-10-17 21:01 上传

点击文件名下载附件

下载积分: 精币 -2 枚

1.14 MB, 下载次数: 103, 下载积分: 精币 -2 枚

---

作者: kk2apple    时间: 2021-10-17 22:27
很多年前很喜欢这样的软件，目前更爱TX桌面整理

---

作者: qq1056123185    时间: 2021-10-17 22:37
不错不错，再加上免vip看电影，看图，集成一个多功能的小软件，美美哒

---

作者: qq2518    时间: 2021-10-17 22:54
感谢分享。挺不错的

---

作者: a13511315443    时间: 2021-10-18 00:01
ad爱是飒飒飒飒

---

作者: 伊人独醉    时间: 2021-10-18 01:25
一个好看启动菜单(修改版)

---

作者: 凉忆亦凉心    时间: 2021-10-18 02:08
支持一下

---

作者: happyweeks365    时间: 2021-10-18 08:15

不错不错，再加上免vip看电影，看图，集成一个多功能的小软件，美美哒

---

作者: happyweeks365    时间: 2021-10-18 08:29
新版本天气不显示怎么解决？老版本可以

搜狗截图21年10月18日0828_1.png (117.41 KB, 下载次数: 0)

下载附件

2021-10-18 08:28 上传

搜狗截图21年10月18日0830_2.png (25.49 KB, 下载次数: 0)

下载附件

2021-10-18 08:30 上传

---

作者: FUYUEPC    时间: 2021-10-18 09:07
新技能已get√

---

作者: chenshuang124    时间: 2021-10-18 09:24
错误(10044): 不能将“RECT”数据转换到“精易_矩形”数据。 这怎么改阿？

---

作者: chenshuang124    时间: 2021-10-18 09:27
.版本 2

GetWindowRect (Hwnd, rect)
Width ＝ rect.right － rect.left
Height ＝ rect.bottom － rect.top
MoveWindow (Hwnd, rect.left, rect.top, Width ＋ 1, Height, 假)
MoveWindow (Hwnd, rect.left, rect.top, Width, Height, 真)

---

作者: ludosa    时间: 2021-10-18 09:46

happyweeks365 发表于 2021-10-18 08:29
新版本天气不显示怎么解决？老版本可以

在天气图标上点左键 可以显示天气     在地方名上点左键 可以关闭显示

---

作者: ludosa    时间: 2021-10-18 09:47

chenshuang124 发表于 2021-10-18 09:27
.版本 2

GetWindowRect (Hwnd, rect)

看看是不是模块冲突

1634522982(1).png (73.07 KB, 下载次数: 2)

下载附件

2021-10-18 10:12 上传

---

作者: 君九    时间: 2021-10-18 12:11

---

作者: ludosa    时间: 2021-10-18 17:13

  

子程序名	返回值类型	公开	备 注
W选中
参数名	类 型	参考	可空	数组	备 注
项目	整数型				1=工具 2=应用 3=游戏 4=常用 5=其它

判断 (项目 ＝ 1)
界面可视 (真, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假)
卷帘顶边设置 (53, 417, 436, 454, 472)
判断 (项目 ＝ 2)
界面可视 (假, 真, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假)
卷帘顶边设置 (53, 72, 434, 451, 470)
判断 (项目 ＝ 3)
界面可视 (假, 假, 真, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假)
卷帘顶边设置 (52, 72, 89, 449, 469)
判断 (项目 ＝ 4)
界面可视 (假, 假, 假, 真, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假)
卷帘顶边设置 (54, 72, 90, 108, 468)
判断 (项目 ＝ 5)
界面可视 (假, 假, 假, 假, 真, 真, 真, 真, 真, 真, 真, 真, 真, 真, 真, 真, 真, 真, 真, 假)
卷帘顶边设置 (54, 72, 90, 108, 126)
载入列表 (0)

子程序名	返回值类型	公开	备 注
卷帘顶边设置
参数名	类 型	参考	可空	数组	备 注
工具	整数型
应用	整数型
游戏	整数型
常用	整数型
其它	整数型

卷帘式菜单_工具.顶边 (工具)
卷帘式菜单_应用.顶边 (应用)
卷帘式菜单_游戏.顶边 (游戏)
卷帘式菜单_常用.顶边 (常用)
卷帘式菜单_其它.顶边 (其它)

子程序名	返回值类型	公开	备 注
界面可视
参数名	类 型	参考	可空	数组	备 注
列表框_工具k	逻辑型
列表框_应用k	逻辑型
列表框_游戏k	逻辑型
列表框_常用k	逻辑型
列表框_其它k	逻辑型
按钮_导入音乐k	逻辑型
按钮_定时关机k	逻辑型
图片框_播放k	逻辑型
图形按钮_上一曲k	逻辑型
图形按钮_下一曲k	逻辑型
列表框_歌曲列表k	逻辑型
图形按钮_音量20k	逻辑型
图形按钮_音量40k	逻辑型
图形按钮_音量60k	逻辑型
图形按钮_音量80k	逻辑型
图形按钮_音量100k	逻辑型
图片框_刻度k	逻辑型
标签_进度k	逻辑型
标签_进度框k	逻辑型
标签_进度线k	逻辑型

列表框_工具.可视 (列表框_工具k)
列表框_应用.可视 (列表框_应用k)
列表框_游戏.可视 (列表框_游戏k)
列表框_常用.可视 (列表框_常用k)
列表框_其它.可视 (列表框_其它k)
按钮_导入音乐.可视 (按钮_导入音乐k)
按钮_定时关机.可视 (按钮_定时关机k)
图片框_播放.可视 (图片框_播放k)
图形按钮_上一曲.可视 (图形按钮_上一曲k)
图形按钮_下一曲.可视 (图形按钮_下一曲k)
列表框_歌曲列表.可视 (列表框_歌曲列表k)
图形按钮_音量20.可视 (图形按钮_音量20k)
图形按钮_音量40.可视 (图形按钮_音量40k)
图形按钮_音量60.可视 (图形按钮_音量60k)
图形按钮_音量80.可视 (图形按钮_音量80k)
图形按钮_音量100.可视 (图形按钮_音量100k)
图片框_刻度.可视 (图片框_刻度k)
标签_进度.可视 (标签_进度k)
标签_进度框.可视 (标签_进度框k)
标签_进度线.可视 (标签_进度线k)

.版本 2<br /> <br /> .子程序 W选中<br /> .参数 项目, 整数型, , 1=工具 2=应用 3=游戏 4=常用 5=其它<br /> <br /> .判断开始 (项目 ＝ 1)<br />     界面可视 (真, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假)<br />     卷帘顶边设置 (53, 417, 436, 454, 472)<br /> .判断 (项目 ＝ 2)<br />     界面可视 (假, 真, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假)<br />     卷帘顶边设置 (53, 72, 434, 451, 470)<br /> .判断 (项目 ＝ 3)<br />     界面可视 (假, 假, 真, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假)<br />     卷帘顶边设置 (52, 72, 89, 449, 469)<br /> .判断 (项目 ＝ 4)<br />     界面可视 (假, 假, 假, 真, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假, 假)<br />     卷帘顶边设置 (54, 72, 90, 108, 468)<br /> .判断 (项目 ＝ 5)<br />     界面可视 (假, 假, 假, 假, 真, 真, 真, 真, 真, 真, 真, 真, 真, 真, 真, 真, 真, 真, 真, 假)<br />     卷帘顶边设置 (54, 72, 90, 108, 126)<br />     载入列表 (0)<br /> .默认<br /> <br /> .判断结束<br /> <br /> <br /> .子程序 卷帘顶边设置<br /> .参数 工具, 整数型<br /> .参数 应用, 整数型<br /> .参数 游戏, 整数型<br /> .参数 常用, 整数型<br /> .参数 其它, 整数型<br /> <br /> 卷帘式菜单_工具.顶边 (工具)<br /> 卷帘式菜单_应用.顶边 (应用)<br /> 卷帘式菜单_游戏.顶边 (游戏)<br /> 卷帘式菜单_常用.顶边 (常用)<br /> 卷帘式菜单_其它.顶边 (其它)<br /> <br /> <br /> .子程序 界面可视<br /> .参数 列表框_工具k, 逻辑型<br /> .参数 列表框_应用k, 逻辑型<br /> .参数 列表框_游戏k, 逻辑型<br /> .参数 列表框_常用k, 逻辑型<br /> .参数 列表框_其它k, 逻辑型<br /> .参数 按钮_导入音乐k, 逻辑型<br /> .参数 按钮_定时关机k, 逻辑型<br /> .参数 图片框_播放k, 逻辑型<br /> .参数 图形按钮_上一曲k, 逻辑型<br /> .参数 图形按钮_下一曲k, 逻辑型<br /> .参数 列表框_歌曲列表k, 逻辑型<br /> .参数 图形按钮_音量20k, 逻辑型<br /> .参数 图形按钮_音量40k, 逻辑型<br /> .参数 图形按钮_音量60k, 逻辑型<br /> .参数 图形按钮_音量80k, 逻辑型<br /> .参数 图形按钮_音量100k, 逻辑型<br /> .参数 图片框_刻度k, 逻辑型<br /> .参数 标签_进度k, 逻辑型<br /> .参数 标签_进度框k, 逻辑型<br /> .参数 标签_进度线k, 逻辑型<br /> <br /> 列表框_工具.可视 (列表框_工具k)<br /> 列表框_应用.可视 (列表框_应用k)<br /> 列表框_游戏.可视 (列表框_游戏k)<br /> 列表框_常用.可视 (列表框_常用k)<br /> 列表框_其它.可视 (列表框_其它k)<br /> 按钮_导入音乐.可视 (按钮_导入音乐k)<br /> 按钮_定时关机.可视 (按钮_定时关机k)<br /> 图片框_播放.可视 (图片框_播放k)<br /> 图形按钮_上一曲.可视 (图形按钮_上一曲k)<br /> 图形按钮_下一曲.可视 (图形按钮_下一曲k)<br /> 列表框_歌曲列表.可视 (列表框_歌曲列表k)<br /> 图形按钮_音量20.可视 (图形按钮_音量20k)<br /> 图形按钮_音量40.可视 (图形按钮_音量40k)<br /> 图形按钮_音量60.可视 (图形按钮_音量60k)<br /> 图形按钮_音量80.可视 (图形按钮_音量80k)<br /> 图形按钮_音量100.可视 (图形按钮_音量100k)<br /> 图片框_刻度.可视 (图片框_刻度k)<br /> 标签_进度.可视 (标签_进度k)<br /> 标签_进度框.可视 (标签_进度框k)<br /> 标签_进度线.可视 (标签_进度线k)

  

home ＝ zc热键 (Hwnd, 标签2.取窗口句柄 (), 0, 36)
end ＝ zc热键 (Hwnd, 标签2.取窗口句柄 (), 0, 35)
向上箭头 ＝ zc热键 (Hwnd, 标签2.取窗口句柄 (), 0, 38)
向下箭头 ＝ zc热键 (Hwnd, 标签2.取窗口句柄 (), 0, 40)
向左箭头 ＝ zc热键 (Hwnd, 标签2.取窗口句柄 (), 0, 37)
向右箭头 ＝ zc热键 (Hwnd, 标签2.取窗口句柄 (), 0, 39)
空格键 ＝ zc热键 (Hwnd, 标签2.取窗口句柄 (), 0, 32)

子程序名	返回值类型	公开	备 注
_标签2_反馈事件	整数型
参数名	类 型	参考	可空	数组	备 注
参数一	整数型
参数二	整数型

判断 (参数一 ＝ home)
窗口_激活 (Hwnd)
判断 (参数一 ＝ end)
结束 ()
判断 (参数一 ＝ 向上箭头)
音量_设置当前程序音量 (音量_取当前程序音量 () ＋ 1)
判断 (参数一 ＝ 向下箭头)
音量_设置当前程序音量 (音量_取当前程序音量 () － 1)
判断 (参数一 ＝ 向左箭头)
事件_上一曲_被单击 ()
判断 (参数一 ＝ 向右箭头)
事件_下一曲_被单击 ()
判断 (参数一 ＝ 空格键)
图形按钮_播放_左键单击 ()

i支持库列表	支持库注释
shellEx	扩展功能支持库一

.版本 2<br /> .支持库 shellEx<br /> <br /> <br /> home ＝ zc热键 (Hwnd, 标签2.取窗口句柄 (), 0, 36)<br /> end ＝ zc热键 (Hwnd, 标签2.取窗口句柄 (), 0, 35)<br /> 向上箭头 ＝ zc热键 (Hwnd, 标签2.取窗口句柄 (), 0, 38)<br /> 向下箭头 ＝ zc热键 (Hwnd, 标签2.取窗口句柄 (), 0, 40)<br /> 向左箭头 ＝ zc热键 (Hwnd, 标签2.取窗口句柄 (), 0, 37)<br /> 向右箭头 ＝ zc热键 (Hwnd, 标签2.取窗口句柄 (), 0, 39)<br /> 空格键 ＝ zc热键 (Hwnd, 标签2.取窗口句柄 (), 0, 32)<br /> <br /> .版本 2<br /> <br /> .子程序 _标签2_反馈事件, 整数型<br /> .参数 参数一, 整数型<br /> .参数 参数二, 整数型<br /> <br /> .判断开始 (参数一 ＝ home)<br />     窗口_激活 (Hwnd)<br /> .判断 (参数一 ＝ end)<br />     结束 ()<br /> .判断 (参数一 ＝ 向上箭头)<br />     音量_设置当前程序音量 (音量_取当前程序音量 () ＋ 1)<br /> .判断 (参数一 ＝ 向下箭头)<br />     音量_设置当前程序音量 (音量_取当前程序音量 () － 1)<br /> .判断 (参数一 ＝ 向左箭头)<br />     事件_上一曲_被单击 ()<br /> .判断 (参数一 ＝ 向右箭头)<br />     事件_下一曲_被单击 ()<br /> .判断 (参数一 ＝ 空格键)<br />     图形按钮_播放_左键单击 ()<br /> .默认<br /> <br /> .判断结束

MeMu.e

2021-10-18 17:12 上传

点击文件名下载附件

下载积分: 精币 -2 枚

1.91 MB, 下载次数: 30, 下载积分: 精币 -2 枚

优化

---

作者: happyweeks365    时间: 2021-10-18 19:55

ludosa 发表于 2021-10-18 09:47
看看是不是模块冲突

模块冲突怎么解决？

---

作者: happyweeks365    时间: 2021-10-18 19:56

ludosa 发表于 2021-10-18 09:47
看看是不是模块冲突

正在编译易模块"Ex_DirectUI", 文件名: "C:\Program Files (x86)\易语言小伟增强版\易语言小伟增强版\ecom\ExDui.ec", 版本号: "2.0", 创建号: "13.1216", 作者: "泆寒".
正在进行名称连接...
正在统计需要编译的子程序
正在编译...
错误(10044): 不能将“RECT”数据转换到“精易_矩形”数据。

---

作者: 六先生    时间: 2021-10-18 21:12

ludosa 发表于 2021-10-18 09:47
看看是不是模块冲突

同问 模块冲突怎么解决？

---

作者: 六先生    时间: 2021-10-18 21:32


                                                         

---

作者: 六先生    时间: 2021-10-18 21:33


关于模块冲突的，发现 GetWindowRect  调用的是精益模块中的命令由此改下RECT类型 即可

  

子程序名	返回值类型	公开	备 注
置窗口透明度
参数名	类 型	参考	可空	数组	备 注
透明度	整数型

变量名	类 型	静态	数组	备 注
hobj	整数型
msg	整数型
wparam	整数型
lparam	整数型
rect	精易_矩形
Width	整数型
Height	整数型

组件_置成员值 (窗口_取指针 (Hwnd), 27, 透明度)
GetWindowRect (Hwnd, rect)
Width ＝ rect.右边 － rect.左边
Height ＝ rect.底边 － rect.顶边
' Width ＝ rect.right － rect.left
' Height ＝ rect.bottom － rect.top
MoveWindow (Hwnd, rect.左边, rect.顶边, Width ＋ 1, Height, 假)
MoveWindow (Hwnd, rect.左边, rect.顶边, Width, Height, 真)
' MoveWindow (Hwnd, rect.left, rect.top, Width ＋ 1, Height, 假)
' MoveWindow (Hwnd, rect.left, rect.top, Width, Height, 真)
判断 (是否已创建 (窗口1))
XML_配置.修改节点值 (“I_Menu/Config/透明度”, 到文本 (窗口1.hk条1.位置), )
XML_配置.导出到文件 (XML_路径, , , )

i支持库列表	支持库注释
EXMLParser	XML解析支持库

.版本 2<br /> .支持库 EXMLParser<br /> <br /> .子程序 置窗口透明度<br /> .参数 透明度, 整数型<br /> .局部变量 hobj, 整数型<br /> .局部变量 msg, 整数型<br /> .局部变量 wparam, 整数型<br /> .局部变量 lparam, 整数型<br /> .局部变量 rect, 精易_矩形<br /> .局部变量 Width, 整数型<br /> .局部变量 Height, 整数型<br /> <br /> 组件_置成员值 (窗口_取指针 (Hwnd), 27, 透明度)<br /> GetWindowRect (Hwnd, rect)<br /> Width ＝ rect.右边 － rect.左边<br /> Height ＝ rect.底边 － rect.顶边<br /> ' Width ＝ rect.right － rect.left<br /> ' Height ＝ rect.bottom － rect.top<br /> MoveWindow (Hwnd, rect.左边, rect.顶边, Width ＋ 1, Height, 假)<br /> MoveWindow (Hwnd, rect.左边, rect.顶边, Width, Height, 真)<br /> ' MoveWindow (Hwnd, rect.left, rect.top, Width ＋ 1, Height, 假)<br /> ' MoveWindow (Hwnd, rect.left, rect.top, Width, Height, 真)<br /> .判断开始 (是否已创建 (窗口1))<br />     XML_配置.修改节点值 (“I_Menu/Config/透明度”, 到文本 (窗口1.hk条1.位置), )<br />     XML_配置.导出到文件 (XML_路径, , , )<br /> .默认

---

作者: ft272296734    时间: 2021-10-20 13:13
模块冲突怎么解决

---

作者: ludosa    时间: 2021-10-20 15:33

ft272296734 发表于 2021-10-20 13:13
模块冲突怎么解决

把所有模块删除
重新添加一次,精易模块最后添加

---

作者: ludosa    时间: 2021-10-20 15:40

六先生 发表于 2021-10-18 21:33
关于模块冲突的，发现 GetWindowRect  调用的是精益模块中的命令由此改下RECT类型 即可

[e=2].版本 2

关于模块冲突的问题解决方法
把所有在用的模块都删除 重新添加一次
先添加 ex_dui
再添加精易9.4.5

---

作者: ludosa    时间: 2021-10-20 15:41

happyweeks365 发表于 2021-10-18 19:55
模块冲突怎么解决？

关于模块冲突的问题解决方法
把所有在用的模块都删除 重新添加一次
先添加 ex_dui
再添加精易9.4.5

---

作者: shayanlong    时间: 2021-10-20 16:16
看下 学习一下

---

作者: happyweeks365    时间: 2021-10-20 21:11

ludosa 发表于 2021-10-20 15:41
关于模块冲突的问题解决方法
把所有在用的模块都删除 重新添加一次
先添加 ex_dui

ok.............

---

作者: ludosa    时间: 2021-10-21 17:28
可爱小仙女  女生专用

未命名项目222.gif (1.8 MB, 下载次数: 3)

下载附件

2021-10-21 17:27 上传

可爱小仙女

---

作者: 原始世界    时间: 2021-10-23 21:01

---

作者: zjkhzx    时间: 2021-10-24 10:50
感谢分享

---

作者: panda92    时间: 2021-10-27 13:00

看下 学习一下

---

作者: zytyz    时间: 2021-11-10 14:29
这个看起来不错，感觉也挺复杂

---

作者: zytyz    时间: 2021-11-10 14:42
好像不行啊，运行不起来

---

作者: junhai    时间: 2022-1-7 10:13
谢谢！！！！！

---

作者: wsliuzi    时间: 2022-1-12 20:11
感谢感谢

---

作者: 四川小白菜    时间: 2022-1-16 09:22
好人一生平安 感谢分享。

---

作者: 四川小白菜    时间: 2022-1-16 09:25
错误(10002): 指定子程序或类方法名称“彗星置窗口阴影”未找到。  请教一下

胜多负少.png (22.94 KB, 下载次数: 1)

下载附件

2022-1-16 09:25 上传

---

作者: ludosa    时间: 2022-1-16 19:24

四川小白菜 发表于 2022-1-16 09:25
错误(10002): 指定子程序或类方法名称“彗星置窗口阴影”未找到。  请教一下  ...

上一贴有这个模块,看上面  有上一贴地址

---

作者: 木子李春天    时间: 2022-1-30 20:40
厉害先攒一波

---

作者: 阴影    时间: 2022-10-4 19:30
厉害先攒一波

---

作者: 看一眼就怀孕    时间: 2022-10-12 00:20
支持开源~！感谢分享

---

作者: 看一眼就怀孕    时间: 2022-10-12 00:21
没币了 让我再赚1币

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4