演示EmbeddedWB（D5-D2009）组件如何通过GetExternal事件来达到从WEB页面控制浏览器的功能...

本例子是演示EmbeddedWB（D5-D2009）组件如何通过GetExternal事件来达到从WEB页面控制浏览器的功能。

实现的步骤概括起来就是以下几步：
1、在原工程中创建一个TAutoObject对象（与创建ActiveX相似）；
例如本例子建的TAutoObject对象是TBrowserToDelphi（BrowserToDelphiImpl.pas文件）

2、给TAutoObject对象增加要暴露给WEB页面调用的方法或属性（与设置ActiveX的方法和属性相同）；

3、如果要从TBrowserToDelphi中操作Form的属性或方法，则在TBrowserToDelphi中uses引入要操作Form类；

4、在WEB页面中，通过JavaScript或VBScript来访问TBrowserToDelphi暴露出来的方法和属性；
例如：
<SCRIPT type="text/javascript">
//访问name属性
function GetName(){
 document.all.name.value = window.external.name;
}
function SetName(){
 window.external.name = document.all.name.value ;
}

//访问number属性
function GetNumber(){
 document.all.number.value = window.external.number;
}
function SetNumber(){
 window.external.number = document.all.number.value;
}

//访问ShowMsg方法
function ShowMessage(){
 window.external.ShowMsg( document.all.msg.value);
}

//访问ChgWinSize方法
function ChangeWinSize(){
 window.external.ChgWinSize(  document.all.w.value,  document.all.h.value);
}

</SCRIPT>