在类型库中添加(打开*.TLB文件),如果你是指要在HTML中响应你的事件,这样操作(以下是Copy的一段,来源未知):
打开Type Library在IActiveFormX中New一个方法,Delphi会自动完成它的声明工作,
你只要完成其中的实现就可以了。如:增加一个SaveFile方法,Delphi自动完成
procedure TActiveFormX.SaveFile;
begin
//你自己在这里完成需要的功能
end;
在网页上调用就可以直接 objID.SaveFile();就可以直接调用方法了
如果需要从ActiveObje通知网页返回参数的话,可以使用Event
在IActiveFormXEvents中加入一个方法OnSaveFile(name : widestring);
在代码中需要产生这个事件的情况就可以
procedure TActiveFormX.SaveFile;
begin
//你自己在这里完成需要的功能
if FEvents <> Nil then
FEvents.OnSaveFile('文件名称');//这样网页就能得到'文件名称'的值了
end;
网页中只要
<SCRIPT LANGUAGE=javascript FOR=objID EVENT=OnSaveFile>
<!--
alert(arguments[0]);//这样表示取得第一个参数的值
//-->
</SCRIPT>
这样就可以完成从网页调用ActiveX的方法,和ActiveX返回参数给网页的方法