| 窗口程序集名 | 保 留 | 保 留 | 备 注 |
| 窗口程序集_启动窗口 | | | |
| 变量名 | 类 型 | 数组 | 备 注 |
| 歌曲播放器_WMP播放器类 | WMP播放器类 | |
| 歌曲播放器_WMP播放器控制类 | WMP播放器控制类 | |
| 单集地址 | 文本型 | 0 |
歌曲播放器_WMP播放器类.
方法_创建 (外形框1.
取窗口句柄 (), 2, 2, 外形框1.宽度, 外形框1.高度, 0
)| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| 网址 | 文本型 | | |
| 方式 | 整数型 | | |
| 协议头 | 类_POST数据类 | | |
| 提交协议头 | 文本型 | | |
| 结果 | 字节集 | | |
| 返回 | 文本型 | | |
网址 ＝ 网页
方式 ＝ 协议
网页_访问S (网址, 方式, , , , 提交协议头, , , , , , , , , , , 结果, , , ,
)返回 ＝
到文本 (编码转换 (结果,
#编码_UTF_8, #编码_GB18030, ))
返回 (返回
)搜索短剧 (编辑框_短剧名称.内容
)| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| 网页 | 文本型 | | |
| j | zyJsonDocument | | |
| 数量 | 整数型 | | |
| i | 整数型 | | |
| 文本 | 文本型 | | |
| 索引 | 整数型 | | |
网页 ＝
网页访问 (“https://www.hhlqilongzhu.cn/api/duanju_fanqie.php?name=” ＋
编码_URL编码 (关键词, ,
真), 0
)
如果 (j.
解析 (网页
))
数量 ＝ j.
取成员数 (“data”)如果 (数量 ＝ 0
)提示框 (“没有搜索到数据哦！”)
返回 (“”)
超级列表框_短剧列表.
全部删除 ()
计次循环首 (数量, i
)索引 ＝ 超级列表框_短剧列表.
插入表项 (, , , , ,
)超级列表框_短剧列表.
置标题 (索引, 0,
到文本 (i
))
超级列表框_短剧列表.
置标题 (索引, 3,
编码_usc2到ansi (j.
取文本 (“data[” ＋
到文本 (i － 1
) ＋
“].book_id”,
))
)超级列表框_短剧列表.
置标题 (索引, 1, j.
取文本 (“data[” ＋
到文本 (i － 1
) ＋
“].title”,
))
超级列表框_短剧列表.
置标题 (索引, 2, j.
取文本 (“data[” ＋
到文本 (i － 1
) ＋
“].type”,
))
计次循环尾 ()返回 (文本
)
提示框 (“返回Json解析失败”)返回 (“”)|
| _编辑框_短剧名称_鼠标左键被按下 | 逻辑型 | |
|
| 横向位置 | 整数型 | | | |
纵向位置 | 整数型 | | | | 功能键状态 | 整数型 | | | |
编辑框_短剧名称.内容 ＝
“”|
| _超级列表框_短剧列表_被双击 | 逻辑型 | |
|
| 横向位置 | 整数型 | | | |
纵向位置 | 整数型 | | | | 功能键状态 | 整数型 | | | |
如果 (超级列表框_短剧列表.
取标题 (超级列表框_短剧列表.现行选中项, 3
) ＝
“”)提示框 (“没有选中任何短剧”)短剧集数 (超级列表框_短剧列表.
取标题 (超级列表框_短剧列表.现行选中项, 3
))
| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| 网页 | 文本型 | | |
| j | zyJsonDocument | | |
| 数量 | 整数型 | | |
| i | 整数型 | | |
| 文本 | 文本型 | | |
| 索引 | 整数型 | | |
网页 ＝
网页访问 (“https://www.hhlqilongzhu.cn/api/duanju_fanqie.php?book_id=” ＋
编码_URL编码 (关键词, ,
真), 0
)如果 (j.
解析 (网页
))
数量 ＝ j.
取成员数 (“data”)如果 (数量 ＝ 0
)提示框 (“没有搜索到数据哦！”)返回 (“”)超级列表框_短剧集数.
全部删除 ()计次循环首 (数量, i
)索引 ＝ 超级列表框_短剧集数.
插入表项 (, , , , ,
)超级列表框_短剧集数.
置标题 (索引, 0, j.
取文本 (“data[” ＋
到文本 (i － 1
) ＋
“].title”,
))
超级列表框_短剧集数.
置标题 (索引, 1, j.
取文本 (“data[” ＋
到文本 (i － 1
) ＋
“].url_mp4”,
))
计次循环尾 ()返回 (文本
)提示框 (“返回Json解析失败”)返回 (“”)|
| _超级列表框_短剧集数_被双击 | 逻辑型 | |
|
| 横向位置 | 整数型 | | | |
纵向位置 | 整数型 | | | | 功能键状态 | 整数型 | | | |
如果 (超级列表框_短剧集数.
取标题 (超级列表框_短剧集数.现行选中项, 1
) ＝
“”)提示框 (“没有选中任何集数”, , , ,
)歌曲播放器_WMP播放器类.
写_属性_地址 (超级列表框_短剧集数.
取标题 (超级列表框_短剧集数.现行选中项, 1
))
歌曲播放器_WMP播放器控制类.
方法_停止 ()如果 (歌曲播放器_WMP播放器类.
读_属性_状态 () ＝
“已停止”)超级列表框_短剧集数.现行选中项 ＝ 超级列表框_短剧集数.现行选中项 ＋ 1
歌曲播放器_WMP播放器类.
写_属性_地址 (超级列表框_短剧集数.
取标题 (超级列表框_短剧集数.现行选中项, 1
))
播放器1.全屏模式 ＝ 真
控制.
