unit OleObj;interfaceuses
  ComObj, ActiveX, OleDpr_TLB, StdVcl,Windows;type
  TExeFile = class(TAutoObject, IExeFile)
  protected
    procedure RunExeFile(const AFileName: WideString); safecall;
    { Protected declarations }
  end;implementationuses ComServ;procedure TExeFile.RunExeFile(const AFileName: WideString);
begin
    Winexec(PChar(AFileName), SW_SHOWNORMAL);
end;initialization
  TAutoObjectFactory.Create(ComServer, TExeFile, Class_ExeFile,
    ciMultiInstance, tmApartment);
怎样在(TWebbrowser)HTML中调用该OLE对象的RunExeFile方法?