BDS的欢迎页面中点击链接调用功能如何做?

比如点击New Project打开的是新建项目的对话框,似乎调用的是程序内部函数.状态栏显示javascript:newProject();这是怎么做到的?用哪些控件?

解决方案 »

  1.   

    用的是java脚本吧，不是什么控件
      

  2.   

    java脚本如何调用程序内部函数呢?这可是在网页中调用!用的是TCPPWebBrowser控件显示网页
      

  3.   

    WebBrowser 有一个OnGetExternal事件，在这里实现：  wbBrowser.OnGetExternal := OnGetExternal;...function TfrmBrowser.OnGetExternal(out ppDispatch: IDispatch): HRESULT;
    var
      FIntf: TWebBrowserEvent;
    begin
      FIntf := TWebBrowserEvent.Create;  ppDispatch := FIntf;
      Result := S_OK;
    end;.../// Com Objectuses
      ComObj, ActiveX, BrowserEx_TLB, StdVcl;type
      TWebBrowserEvent = class(TAutoObject, ISomeIntface)
      protected
        procedure Test; safecall;
        function Get_GetMacAddr: OleVariant; safecall;
        // do something, implement ISomeIntface
      end
      

  4.   

    问题解决了，虽然budded说的事件没有(我用BCB)，但是使用外部扩展external是对的。