|
|
用于创建一个 WEB Base 的桌面应用程序
Set htWin = CreateObject("NetBox.HtmlWindow")
| Browser | 查询 HtmlWindow 中的 WebBrowser 对象 |
| AllowClose | 指定是否允许用户关闭本窗口,缺省为 true,允许关闭 |
| Argument | 获取 HTML 窗口打开 URL 时传递的参数 |
| border | 查询和设定窗口是否有边框,为 True 则有边框。缺省为 True |
| Caption | 查询和设定窗口是否有标题栏,为 True 则有标题栏。缺省为 True |
| clientHeight | 查询窗口用户区域的高度 |
| clientWidth | 查询窗口用户区域的宽度 |
| DropShadow | 设定和查询窗口是否显示阴影,需要 Windows XP 以上的系统支持 |
| ContextMenu | 查询和设定窗口是否允许上下文菜单,为 True 则允许上下文菜单。缺省为 True |
| Height | 查询和设定当前窗口的高度 |
| HWND | 查询窗口的系统句柄 |
| Icon | 加载图标到对象中,支持的图标格式为:BMP (bitmap), JPEG, WMF (metafile), ICO (icon), GIF |
| LayeredAlpha | 设定和查询窗口半透明值,需要 Windows 2000 以上的系统支持 |
| Left | 查询和设定当前窗口左上角 x 值 |
| MaximizeBox | 查询和设定窗口是否有最大化按钮,为 True 则有最大化按钮。缺省为 True |
| Maximized | 查询和设定窗口是否有是最大化状态,为 True 则是最大化状态。缺省为 False |
| MinimizeBox | 查询和设定窗口是否有最小化按钮,为 True 则有最小化按钮。缺省为 True |
| Minimized | 查询和设定窗口是否有是最小化状态,为 True 则是最小化状态。缺省为 False |
| resizable | 查询和设定窗口是否可以自由改变尺寸,为 True 则可以自由改变尺寸。缺省为 True |
| scrollbar | 查询和设定窗口是否有滚动条,为 True 则有滚动条。缺省为 True |
| Title | 查询和设定当前窗口的标题文本 |
| ToolWindow | 查询和设定窗口是否是工具窗口,为 True 则是工具窗口。缺省为 False |
| Top | 查询和设定当前窗口左上角 y 值 |
| TopMost | 查询和设定窗口是否是顶层窗口,为 True 则是顶层窗口。缺省为 False |
| Width | 查询和设定当前窗口的宽度 |
| WindowEdge | 查询和设定窗口是否有内陷边框,为 True 则有内陷边框。缺省为 False |
| Visible | 查询和设定窗口是否显示,为 True 则显示。缺省为 False |
| center | 将当前窗口定位到屏幕中央 |
| close | 关闭当前窗口 |
| drag | 以指定的方式拖动窗口 |
| EndDialog | 关闭当前窗口并设定返回值 |
| isClosed | 检查当前对象的窗口是否已经关闭 |
| isActive | 检查当前对象的窗口是否是当前激活的窗口 |
| focus | 将活动焦点设定到当前窗口 |
| moveTo | 移动当前窗口到指定位置,参数窗口左上角的目标位置 |
| moveWindow | 同时指定窗口的位置和大小 |
| Open | 在当前窗口打开给定 url 的 HTML 资源 |
| OpenModalDialog | 快捷方法,创建并运行一个对话框窗口,返回结果 |
| resizeTo | 设定当前窗口到指定的大小 |
| SetTransparentMask | 设定窗口的透明模版和拉伸模式 |
| showDialog | 显示激活当前窗口,并等待窗口关闭 |
此对象用于创建基于 WEB 和 HTML 技术的桌面应用程序,通过使用 HTML,可以方便迅速的创建丰富多彩的用户操作界面。
在创建 HTML 窗口时,可以为窗口指定一个 URL,此 URL 通常可以是 http:,也可以使用 netbox: 协议直接使用 NetBox 应用程序的内部文件,以方便发布和部署。
在连接了 URL 以后,页面 HTML 内的 Javascript 或者 VBScript 可以使用 window.external 访问和操作窗口本身。
下面的例子创建一个 HTML 窗口,连接一个 html 文件,显示窗口:
Set htWin= CreateObject("NetBox.HtmlWindow")
htWin.Open "netbox:/default.htm"
htWin.ShowDialog
在创建窗口和关闭窗口时,也可以在主程序和窗口程序之间传递参数和返回结果:
Set ht = CreateObject("NetBox.HtmlWindow")
ht.open "netbox:/html.htm", "Hello!!! :-P"
Shell.Console.WriteLine ht.showDialog
html.htm 的内容如下:
<script>
document.write(external.Argument);
</script>
<br>
<button onclick="external.endDialog('Hi!!!')">endDialog</button>