Hide TWebBrowser ScrollBar

The following code works in Delphi-7 fine. But D-2005,2006 & 2007, OleObject.Document property is not available.

WB.OleObject.document.body.style.overflowX := 'hidden';
WB.OleObject.document.body.style.overflowY := 'hidden';

Any solution please.
SHAHEEN_AKHTARAsked:
Who is Participating?

Improve company productivity with a Business Account.Sign Up

x
 
Russell LibbyConnect With a Mentor Software Engineer, Advisory Commented:

I could get the code to run on D5, but it did NOT remove the scrollbars. The best way to handle this is to set the flags in the IDocHostUIHandler.GetHostInfo(...) interface call. Luckily, the EmbeddedWB browser (same IE AX control, better VCL wrapper) already implements this. It can be downloaded from:

http://bsalsa.com/DP/download.php?file=0

If you handle the OnGetHostInfo event you can specify no scrollbars. Eg:

function TForm1.WBGetHostInfo(var pInfo: TDOCHOSTUIINFO): HRESULT;
begin
 
  // No scroll bars
  pinfo.dwFlags:=DOCHOSTUIFLAG_SCROLL_NO;

end;


----

Regards,
Russell
0
 
SHAHEEN_AKHTARAuthor Commented:
I am exploring for other solutions. I success, then I will post it. Thanks for Kind reply. Regards
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.