🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: borland.public.cppbuilder.internet.web
Article #1309

I successed webbrowser coustomization partly.. plz help more..

#1309
From: jini
Date: Thu, 17 Mar 2005 09:38
85 lines
3990 bytes
I successed webbrowser coustomization partly..

I implemeted below classes
    (1) class myIOleClientSite :public IOleClientSite // <--- work good
    (2) class myIDocHostShowUI :public IDocHostShowUI  // <--- work good
    (3) class myIDocHostUIHandler :public IDocHostUIHandler // <--- work
good
    (4) class myIDispatch :public IDispatch // <--- NOT WORK!!!!

and below is a part of myIOleClientSite implemetation
    class myIOleClientSite :public IOleClientSite
    {
        .....
        virtual HRESULT STDMETHODCALLTYPE QueryInterface( REFIID iid, void
** ppvObject )
        {
            if (iid == IID_IUnknown) *ppvObject = this->pmyIDispatch;
            else if (iid == IID_IDispatch) *ppvObject = this->pmyIDispatch;
            else if (iid == IID_IOleClientSite) *ppvObject =
(IOleClientSite*)this;
            else if (iid == IID_IDocHostUIHandler) *ppvObject =
this->pmyIDocHostUIHandler;
            else if (iid == IID_IDocHostShowUI) *ppvObject =
this->pmyIDocHostShowUI;
            else return E_NOINTERFACE;
            return S_OK;
        }
        .....
    };

where i mistake...??


below is a part of myIDispatch implemetation
    class myIDispatch :public IDispatch
    {
        .....
        virtual HRESULT STDMETHODCALLTYPE Invoke ( DISPID dispidMember,
                      REFIID riid,
                      LCID lcid,
                      WORD wFlags,
                      DISPPARAMS* pDispParams,
                      VARIANT* pvarResult,
                      EXCEPINFO* pExcepInfo,
                      UINT* puArgErr )
        {
            ShowMessage(dispidMember); // <--  it display just two
messages -5501, -5502

            switch (dispidMember)
            {
                case DISPID_AMBIENT_DLCONTROL:
                {
                    ShowMessage("DISPID_AMBIENT_DLCONTROL"); // <-- never
displayed
                    pvarResult->vt = VT_I4;
                    pvarResult->lVal = DLCTL_VIDEOS | DLCTL_NO_SCRIPTS;
                    //pvarResult->lVal = DLCTL_DLIMAGES | DLCTL_VIDEOS |
DLCTL_NO_SCRIPTS;
                }
                break;

                case DISPID_NEWWINDOW2:
                {
                    ShowMessage("DISPID_NEWWINDOW2"); // <-- never displayed
                }
                break;

                case DISPID_BEFORENAVIGATE2:
                {
                    ShowMessage("DISPID_BEFORENAVIGATE2"); // <-- never
displayed
                }
                break;

                default:
                return DISP_E_MEMBERNOTFOUND;
            }
            return E_NOTIMPL;//S_OK;
        }
        .....
    };

I want customize webbrowser's download and execution.. how to do it??
plz help me..
Technical Details
Message-ID: <4239501e$1@newsgroups.borland.com>
Path: arc1-ca.pugleaf.net!g2news1.google.com!news4.google.com!news.glorb.com!border1.nntp.dca.giganews.com!nntp.giganews.com!feeder2.on.meganewsservers.com!meganewsservers.com!textfeed1.on.meganewsservers.com!38.119.100.83.MISMATCH!news-out.nntp.be!propagator2-sterling.newsfeeds.com!in.nntp.be!caladan.landsraad.net!newsgroups.borland.com!not-for-mail
References: <422d9caa@newsgroups.borland.com> <422de978@newsgroups.borland.com> <422fc828$1@newsgroups.borland.com> <42307cb7$3@newsgroups.borland.com>

Show Full Headers
Complete Article Headers
X-Google-Thread: feeec,2e915bcaf988658
X-Google-Attributes: gidfeeec,public
X-Google-Language: ENGLISH,ASCII-7-bit
Reply-To: "jini" <fseconds@hotmail.com>
From: "jini" <fseconds@hotmail.com>
Newsgroups: borland.public.cppbuilder.internet.web
References: <422d9caa@newsgroups.borland.com> <422de978@newsgroups.borland.com> <422fc828$1@newsgroups.borland.com> <42307cb7$3@newsgroups.borland.com>
Subject: I successed webbrowser coustomization partly.. plz help more..
Date: Thu, 17 Mar 2005 18:38:39 +0900
Lines: 87
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2600.0000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
NNTP-Posting-Host: 218.51.152.106
Message-ID: <4239501e$1@newsgroups.borland.com>
X-Trace: newsgroups.borland.com 1111052318 218.51.152.106 (17 Mar 2005 01:38:38 -0800)
Path: arc1-ca.pugleaf.net!g2news1.google.com!news4.google.com!news.glorb.com!border1.nntp.dca.giganews.com!nntp.giganews.com!feeder2.on.meganewsservers.com!meganewsservers.com!textfeed1.on.meganewsservers.com!38.119.100.83.MISMATCH!news-out.nntp.be!propagator2-sterling.newsfeeds.com!in.nntp.be!caladan.landsraad.net!newsgroups.borland.com!not-for-mail