Re: Show Find dialog in TCppWebBrowser

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

Article #1343

Back to borland.public.cppbuilder.internet.web Previous Next

#1343

From: Remy Lebeau (TeamB)
Date: Wed, 23 Feb 2005 09:46

29 lines
1848 bytes

"Albert Wiersch" <mrinternetnewsborland@wiersch.com> wrote in message
news:421be1c2$1@newsgroups.borland.com...

> Just found this. If I can translate it to CPP I think it should work:
> http://members.shaw.ca/iedelphi/webbrowser.htm#advanced2

    #include <utilcls.h>

    const DWORD HTMLID_FIND = 1;
    const GUID CGID_WebBrowser = {0xED016940, 0xBD5B, 0x11CF, {0xBA, 0x4E,
0x00, 0xC0, 0x4F, 0xD7, 0x08, 0x16}};

    void __fastcall TForm1::FindIE()
    {
        if( (WebBrowser1->Document) && (WebBrowser->ReadyState ==
READYSTATE_COMPLETE) )
        {
            TComInterface<IOleCommandTarget> CmdTarget;
            if(
SUCCEEDED(WebBrowser1->Document->QueryInterface(IID_IOleCommandTarget,
(LPVOID*)&CmdTarget)) )
                CmdTarget->Exec(&CGID_WebBrowser, HTMLID_FIND, 0, NULL,
NULL);
        }
    }


Gambit

Technical Details

Message-ID: <421c5106$1@newsgroups.borland.com>

Path:

arc1-ca.pugleaf.net!g2news1.google.com!news1.google.com!proxad.net!212.101.4.254.MISMATCH!solnet.ch!solnet.ch!newsfeed.freenet.de!newsfeed00.sul.t-online.de!newsfeed01.sul.t-online.de!t-online.de!newsgroups.borland.com!not-for-mail

References: <421bcfa2$1@newsgroups.borland.com> <421bd738$1@newsgroups.borland.com> <421be1c2$1@newsgroups.borland.com>

Show Full Headers

Complete Article Headers

X-Google-Thread: feeec,767b6514a77617a0
X-Google-Attributes: gidfeeec,public
X-Google-Language: ENGLISH,ASCII-7-bit
From: "Remy Lebeau \(TeamB\)" <no.spam@no.spam.com>
Newsgroups: borland.public.cppbuilder.internet.web
References: <421bcfa2$1@newsgroups.borland.com> <421bd738$1@newsgroups.borland.com> <421be1c2$1@newsgroups.borland.com>
Subject: Re: Show Find dialog in TCppWebBrowser
Date: Wed, 23 Feb 2005 01:46:44 -0800
Lines: 31
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1409
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1409
NNTP-Posting-Host: 68.69.17.41
Message-ID: <421c5106$1@newsgroups.borland.com>
X-Trace: newsgroups.borland.com 1109152006 68.69.17.41 (23 Feb 2005 01:46:46 -0800)
Path: arc1-ca.pugleaf.net!g2news1.google.com!news1.google.com!proxad.net!212.101.4.254.MISMATCH!solnet.ch!solnet.ch!newsfeed.freenet.de!newsfeed00.sul.t-online.de!newsfeed01.sul.t-online.de!t-online.de!newsgroups.borland.com!not-for-mail

Reply to Parent Message