Activex参数问题?(50分)

我定义了一个Property Text
在private中声明了一个变量
strText:widestring;
并在set_Text过程中给变量赋值
strText:=Value;
在get_Text过程中返回值
Result:=strText;
在窗体中button1的on_click事件中
showmessage(strText);
然后注册ocx组件
修改发布的htm中的代码如下:
<OBJECT
classid="clsid:4A708C55-C26E-11D7-B459-006008A13063"
codebase="http://localhost/muti/ParamProj1.ocx#version=1,0,0,0"
width=350
height=250
align=center
hspace=0
vspace=0
>
<param name="Text" value="new"> ----给参数赋值
</OBJECT>

结果:
当点击Button时,showmessage窗体中显示不出"new"
全部代码如下:
function TParam.Get_Text: WideString;
begin
Result := strText;
end;
procedure TParam.Set_Text(const Value: WideString);
begin
strText := Value;
end;
procedure TParam.Button1Click(Sender: TObject);
begin
showMessage(strText);
end;

跟踪调试一下了 看那一步没对

正在调试中,还有就是,delphi7,当我发布acitvexform后,然后关闭工程,再打开该工程,web deployment options和web deploy 都不可用,delphi6就没事儿

http://www.delphibbs.com/delphibbs/dispq.asp?lid=1537847

这有说

什么工具可以把ocx打包成cab

呵呵,weploy ,可是不能用列!

现在发布ocx后,客户端,已经下载了ocx组件,但是ie上无法显示
这是怎么回事儿

将strText设成PUBLIC,也不用WIDESTRING,用普通的STRING就可以了.

这样写没用，你必需在TLB中写入此方法才行

楼上的,你说的没错,我在type library中声明了方法,就好了

多人接受答案了。