hiwj

I am having a problem with Windows XP themes.

My VB6 application looks OK with the XP Classic theme, but if I switch to the XP Standard (blue) theme, I loose the bottom of my forms (even when I maximise them).

Is there a way of finding which theme XP is using (so that I have the option of leaving extra space at the bottom of my forms)?

Flyguy

Design the Form on Windows XP with theming enabled on the IDE.
I experienced the same problems with mis-alignments

Shazbot

just make a manifest file call vb.exe.manifest and put it in the same folder as vb.exe (VB98)

hiwj

I have found a way of doing it now by using the IsThemeActive function to find if a Windows XP theme is being used (then compensating for it in the VB code):

Declare Function IsThemeActive Lib "UxTheme.dll" () As Boolean

If IsThemeActive Then MsgBox "Theme is on."