Delphi6 ActiveXForm 里怎么控制IE啊,急啊(100分)

Delphi6 ActiveXForm 里怎么控制IE啊

比如 ActiveXForm 里面有Edit用户名，密码,Button登录
点击[登录]按钮把用户名密码以Post方式发送给网页(在当前IE窗口)

谢谢各位大虾拉

给个示例给你！
1、在ActiveFormX拖一个Edit,
2、在ActiveFormX的Type Libray上新建一个属性（在第一个下面如1ActiveFormX上点
右键New->Property），取名叫EditValue，它的Type，改成BSTR,然后刷新，在即可看到生成的两个关于的Get_EditValue和Set_EditValue的，
3、在Get_Value中输入代码：Result:=Edit1.Text;
4、在Set_Value中输入代码：Edit1.Text := Value;
5、编译，注册，发布。打开自动生的HTM页面。
先添加两个按钮：
<input type=&quot;button&quot;
value=&quot;read&quot;
onClick=&quot;javascript:readvalue();&quot;>
<input type=&quot;button&quot;
value=&quot;write&quot;
onClick=&quot;javascript:writevalue();&quot;>
再添加如下的JAVASCRIPT代码：
<Script language=&quot;javascript&quot;>
function readvalue()
{
alert(obj.EditValue);

}
function writevalue()
{
obj.EditValue = 'testsetset';
}
</Script>
6、最后不要忘了，要为OCX对象设个ID值：
如：<OBJECT
classid=&quot;clsid:AA2E6F62-EDBC-42AD-8EDD-2419CDB9D0BC&quot;
codebase=&quot;f:/ActiveFormProj1.ocx#version=1,0,0,0&quot;
width=350
height=250
align=center

id=&quot;obj&quot;


hspace=0
vspace=0
>
</OBJECT>


搞定！快给分吧。我可以第一次来抢分哦！！

谢谢anndy1999
但是为了安全，我的button是放在ActiveForm里面的，不是<Input Button/>
需要在ActiveForm里控制IE，比如，点[登录]，即进入系统（在当前IE窗口，以Post方式提交数据），
这该怎么办呢？