BCB6中的ActiveForm的问题(100分)

ActiveForm 增加属性的问题 [所有相关帖子]

在BCB6中，我新建一个ActiveForm工程,增加一个标签Label1,编辑属性表，
增加一个可读写属性，程序自动生成读写属性的代码，
我在设置属性代码中，修改代码如下：
STDMETHODIMP TMyActiveFormXImpl::set_Property1(BSTR Value)
{
try
{
m_VclCtl->Label1->Caption = AnsiString(Value);
}
catch(Exception &e)
{
return Error(e.Message.c_str(), IID_IActiveFormX);
}
return S_OK;
};
编译并deploy，修改Htm文件
<OBJECT classid="..>
<PARAM NAME="Property1" Value="test">
</OBJECT>
用IE打开后，Label1的Caption却没有变化，我试过N次了，都不行，但同样的方法
在Delphi5中一试就成功了，只不过在delphi5中没有m_VclCtl这种东西，直接
用
Label1.Caption := Value;
就行了，百试百灵，　请问各位大侠，我的BCB程序或方法中有什么问题？