永痕 发表于 2025-3-26 10:48
[e=0].版本 2
.支持库 ecef

原来还可以这样写，学到了，非常感谢

问题已解决，已取到文档了

1.e (151.14 KB, 下载次数: 4)

2025-3-26 10:39 上传

点击文件名下载附件

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
父窗口	整数型
临时	整数型
集_浏览器	水星浏览器

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

进程初始化 (, )
父窗口 ＝ 水星铬浏览框1.取窗口句柄 ()

子程序名	返回值类型	公开	备 注
_水星铬浏览框1_进程初始化完毕

变量名	类 型	静态	数组	备 注
窗口设置	水星窗口设置

窗口设置 ＝ 创建子窗口设置 (父窗口, 0, 0, 水星铬浏览框1.宽度, 水星铬浏览框1.高度)
水星铬浏览框1.创建浏览器 (窗口设置, “https://125.confly.eu.org/forum.php?mod=viewthread&tid=14648940”, , )
输出调试文本 (“_水星铬浏览框1_进程初始化完毕”)

子程序名	返回值类型	公开	备 注
_水星铬浏览框1_浏览器创建完毕
参数名	类 型	参考	可空	数组	备 注
浏览器	水星浏览器

集_浏览器 ＝ 浏览器
输出调试文本 (“_水星铬浏览框1_浏览器创建完毕”)

子程序名	返回值类型	公开	备 注
_水星铬浏览框1_渲染进程线程已创建
参数名	类 型	参考	可空	数组	备 注
附加信息	水星列表型

输出调试文本 (“_水星铬浏览框1_渲染进程线程已创建”)

子程序名	返回值类型	公开	备 注
_水星铬浏览框1_浏览器加载完毕
参数名	类 型	参考	可空	数组	备 注
浏览器	水星浏览器
框架	水星框架
状态码	整数型

输出调试文本 (“_水星铬浏览框1_浏览器加载完毕”)
' 主框架已就绪
' DOM 没有就绪
' 测试 ()

子程序名	返回值类型	公开	备 注
测试

变量名	类 型	静态	数组	备 注
主框架	水星框架
dom	水星网页文档对象
b	逻辑型
ele	水星网页文档元素

主框架 ＝ 集_浏览器.取主框架 ()
b ＝ 主框架.是否有效 ()
输出调试文本 (“主框架.是否有效 ()：” ＋ 到文本 (b))
如果真 (b ＝ 假)
返回 ()
输出调试文本 (“主框架.取URL ()：” ＋ 主框架.取URL ())
dom ＝ 主框架.取文档对象 ()
b ＝ dom.是否有效 ()
输出调试文本 (“dom.是否有效 ()：” ＋ 到文本 (b))
如果真 (b ＝ 假)
返回 ()

ele ＝ dom.cha询元素 (“.ts”)
b ＝ ele.是否有效 ()
如果真 (b)
输出调试文本 (ele.取内部文本 ())

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

' 临时 ＝ FindWindowExA (父窗口, 0, “CefBrowserWindow”, 0)
' 输出调试文本 (临时)
测试 ()

i支持库列表	支持库注释
ecef	水星浏览器支持库

.版本 2<br /> .支持库 ecef<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 父窗口, 整数型<br /> .程序集变量 临时, 整数型<br /> .程序集变量 集_浏览器, 水星浏览器<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 进程初始化 (, )<br /> <br /> 父窗口 ＝ 水星铬浏览框1.取窗口句柄 ()<br /> <br /> <br /> <br /> .子程序 _水星铬浏览框1_进程初始化完毕<br /> .局部变量 窗口设置, 水星窗口设置<br /> <br /> 窗口设置 ＝ 创建子窗口设置 (父窗口, 0, 0, 水星铬浏览框1.宽度, 水星铬浏览框1.高度)<br /> <br /> 水星铬浏览框1.创建浏览器 (窗口设置, “<a href="https://125.confly.eu.org/forum.php?mod=viewthread&tid=14648940" target="_blank">https://125.confly.eu.org/forum.php?mod=viewthread&tid=14648940</a>”, , )<br /> <br /> 输出调试文本 (“_水星铬浏览框1_进程初始化完毕”)<br /> <br /> <br /> .子程序 _水星铬浏览框1_浏览器创建完毕<br /> .参数 浏览器, 水星浏览器, 参考<br /> <br /> 集_浏览器 ＝ 浏览器<br /> 输出调试文本 (“_水星铬浏览框1_浏览器创建完毕”)<br /> <br /> <br /> .子程序 _水星铬浏览框1_渲染进程线程已创建<br /> .参数 附加信息, 水星列表型, 参考<br /> <br /> 输出调试文本 (“_水星铬浏览框1_渲染进程线程已创建”)<br /> <br /> <br /> .子程序 _水星铬浏览框1_浏览器加载完毕<br /> .参数 浏览器, 水星浏览器, 参考<br /> .参数 框架, 水星框架, 参考<br /> .参数 状态码, 整数型<br /> <br /> 输出调试文本 (“_水星铬浏览框1_浏览器加载完毕”)<br /> ' 主框架已就绪<br /> ' DOM 没有就绪<br /> <br /> ' 测试 ()<br /> <br /> <br /> .子程序 测试<br /> .局部变量 主框架, 水星框架<br /> .局部变量 dom, 水星网页文档对象<br /> .局部变量 b, 逻辑型<br /> .局部变量 ele, 水星网页文档元素<br /> <br /> 主框架 ＝ 集_浏览器.取主框架 ()<br /> b ＝ 主框架.是否有效 ()<br /> 输出调试文本 (“主框架.是否有效 ()：” ＋ 到文本 (b))<br /> .如果真 (b ＝ 假)<br />     返回 ()<br /> .如果真结束<br /> 输出调试文本 (“主框架.取URL ()：” ＋ 主框架.取URL ())<br /> <br /> dom ＝ 主框架.取文档对象 ()<br /> b ＝ dom.是否有效 ()<br /> 输出调试文本 (“dom.是否有效 ()：” ＋ 到文本 (b))<br /> .如果真 (b ＝ 假)<br />     返回 ()<br /> .如果真结束<br /> <br /> ele ＝ dom.cha询元素 (“.ts”)<br /> b ＝ ele.是否有效 ()<br /> .如果真 (b)<br />     输出调试文本 (ele.取内部文本 ())<br /> <br /> .如果真结束<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> ' 临时 ＝ FindWindowExA (父窗口, 0, “CefBrowserWindow”, 0)<br /> ' 输出调试文本 (临时)<br /> <br /> 测试 ()