🚀 go-pugleaf

"Mike Collins" <its@TheBottomOfThePost> wrote in message 
news:4894d00f@newsgroups.borland.com...

> We use a TImage streatched across the main form and load
> a JPEG background to create a graphical backdrop.

I would suggest using the form's OnPaint event for that instead.

> However, the system frequently falls over and the toolbar reverts
> to being painted as is.

The toolbar's HWND is likely be recreated in response to some action.  Every 
time a new HWND is created, you will have to call SetWindowTheme() again.

>   // See if UxTheme.dll is already loaded, it it is, use it's handle

That is redundant.  LoadLibrary() already does that for you.  DLLs are 
reference counted.  If the DLL is already loaded, LoadLibrary() will simply 
increment its reference count, not reload it anew.  The DLL is not freed 
until its reference count falls to 0.

>         (SetWindowTheme)(p_hWindow, (wchar_t *)" ", (wchar_t *)" ");

You can't cast a char* to a wchar_t* like that.  If you need to use a 
wchar_t* literal, then prefix it with an 'L' instead:

    (SetWindowTheme)(p_hWindow, L" ", L" ");

BTW, you did not say which version of BCB you are using?  If BCB2006 or 
later, then the VCL has native support for UxTheme.dll, so you don't have to 
access it manually.  It also has ways of controlling when theming should be 
active or not for any given control.


Gambit