Solved

Enable XP Themes on WebBrowser

Posted on 2003-11-19
4
281 Views
Last Modified: 2010-04-05
Hello

I'm using a TWebBrowser in my app, but it doesn't show controls in XP Style,
of course i have added a XPManifest, so the rest of the app is XP-ished.

How can i enable such in my TWebBrowser?

thanks!
--
0
Comment
Question by:tearsoftragedy
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
4 Comments
 
LVL 9

Accepted Solution

by:
ginsonic earned 250 total points
ID: 9788170
In the EmbeddedWB, you should change two parts to use themes.

procedure TEmbeddedWB.UpdateUserInterfaceValue;
const
acardUserInterfaceValues: array[TUserInterfaceOption] of Cardinal =
($00000001, $00000002, $00000004, $00000008,
$00000010, $00000020, $00000040, $00000080,
$00000100, $00000200, $00000400, $00000800,
$00001000, $00002000, $00004000, $00010000, $00020000,
$00040000, $00080000, $00100000, $00200000);

and...

TUserInterfaceOption = (DIALOG, DISABLE_HELP_MENU, NO3DBORDER,
SCROLL_NO, DISABLE_SCRIPT_INACTIVE, OPENNEWWIN,
DISABLE_OFFSCREEN,
FLAT_SCROLLBAR, DIV_BLOCKDEFAULT, ACTIVATE_CLIENTHIT_ONLY,
OVERRIDEBEHAVIORFACTORY,
CODEPAGELINKEDFONTS, URL_ENCODING_DISABLE_UTF8,
URL_ENCODING_ENABLE_UTF8,
ENABLE_FORMS_AUTOCOMPLETE, ENABLE_INPLACE_NAVIGATION,
IME_ENABLE_RECONVERSION,
THEME, NOTHEME, NOPICS, NO3DOUTERBORDER);
0
 
LVL 9

Expert Comment

by:ginsonic
ID: 9788188
More details at : http://msdn.microsoft.com/library/default.asp?
url=/workshop/browser/hosting/reference/enum/dochostuiflag.asp
0
 

Author Comment

by:tearsoftragedy
ID: 9800913
Thanks a lot!
It did it.

Thank you very much for your time
--
0
 
LVL 9

Expert Comment

by:ginsonic
ID: 9802823
My pleasure :)
0

Featured Post

Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
Introduction I have seen many questions in this Delphi topic area where queries in threads are needed or suggested. I know bumped into a similar need. This article will address some of the concepts when dealing with a multithreaded delphi database…

738 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question