一个好看启动菜单(修改版)

ludosa

上一贴地址
比上一贴增加了播放音乐和定时关机
在  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

ludosa

  

子程序名	返回值类型	公开	备 注
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 /> .判断结束

ludosa

可爱小仙女  女生专用

看一眼就怀孕

没币了 让我再赚1币

看一眼就怀孕

支持开源~！感谢分享

阴影

厉害先攒一波

木子李春天

厉害先攒一波

ludosa

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

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

四川小白菜

错误(10002): 指定子程序或类方法名称“彗星置窗口阴影”未找到。  请教一下

四川小白菜

好人一生平安 感谢分享。

wsliuzi

感谢感谢

junhai

谢谢！！！！！

zytyz

好像不行啊，运行不起来