【文件属性】:
文件名称:易语言多页浏览器源码
文件大小:96KB
文件格式:E
更新时间:2016-03-10 03:29:01
易语言 多页浏览器 源码
易语言多页浏览器源码.版本 2
.支持库 HtmlView
.支持库 iext
.程序集 窗口程序集2
.子程序 _窗口1_创建完毕
.子程序 _超文本浏览框1_状态文本被改变
.局部变量 web, 超文本浏览框
web = 取事件组件 ()
_启动窗口.状态条1.置文本 (0, web.状态条文本)
.子程序 _超文本浏览框1_标题被改变
.局部变量 web, 超文本浏览框
.局部变量 i, 整数型
.局部变量 child, MDI_子窗口
web = 取事件组件 ()
.变量循环首 (1, 取数组成员数 (临时浏览器), 1, i)
.如果真 (临时浏览器 [i].浏览器 = web)
child = 寻找子窗口 (临时浏览器 [i].hwnd)
child.设置标题 (web.标题)
跳出循环 ()
.如果真结束
.变量循环尾 ()
.子程序 _超文本浏览框1_即将打开新窗口, 逻辑型
.局部变量 web, 超文本浏览框
web = 取事件组件 ()
.如果真 (取文本左边 (web.状态条文本, 7) = “http://”)
MDIWIN.新建页面 (web.状态条文本)
.如果真结束
返回 (假)
网友评论
- 真好用这个源码,让我学会了变量。
- 不错 是我想要的
- 好,不错,但没怎么懂...
- 编程真的好难学啊,一定要有基础,有文化才懂得理解
- 说实在的 东西是好但是看不懂 为什么不放控件 而是自己代码生成呢!