Updated TWebBrowser now implements IDocUIHandler from the start, how can I keep using my custom implementation?

Question

Beginning with Delphi 10.0 Seattle, Embarcadero has changed the implementation of the TWebBrowser control:

Pre-Seattle: TWebBrowser = class(TOleControl)

Seattle+: TWebBrowser = class(TOleControl, IDocHostUIHandler, IDocHostShowUI, IOleCommandTarget)

I have somewhat old code running where I had implemented a class that could register as a client site/host for a TWebBrowser where I provided my own implementation of the IDocHostUIHandler interface.

Since a TWebBrowser is now implementing these from the start (and keeping them private) and is hard to descend from for all I know - how do I go about to get the new TWebBrowser component to re-register where to find an implementation for IDocHostUIHandler?

Wouldn't it be easiest either to use an earlier version of ShDocVw.Pas, or simply create your own import unit for the webbrowser? You don't have to use the Delphi-supplied one. — MartynA, Aug 03 '16 at 10:23

score 6 · Accepted Answer · answered Aug 03 '16 at 11:21

6

You can descend from TWebBrowser and provide your own interface definitions as before, like this:

Type
  TMyWebBrower = class( TWebBrowser, IDocHostUIHandler )
  ...
  end;

This tells Delphi that you are reimplementing the IDocHostUIHandler interface. You must provide all functions for the interface, but you already have that.

answered Aug 03 '16 at 11:21

Dsm

5,870
20
24

That's the solution I settled with, and it indeed works! – nelshh Aug 04 '16 at 07:25

Updated TWebBrowser now implements IDocUIHandler from the start, how can I keep using my custom implementation?

1 Answers1