用来判断XP风格是否使能

BOOL IsThemeActiveEx()
...{                                    
                      HINSTANCE hDll=LoadLibrary(CString((LPCTSTR)IDS_UTIL_UXTHEME));    // 'UxTheme.dll'
     if(hDll==NULL) return FALSE;        // the DLL won't be available on anything except Windows XP
    UINT (PASCAL *pfnIsThemeActive)();
    (FARPROC&)pfnIsThemeActive=GetProcAddress(hDll,CString((LPCTSTR)IDS_UTIL_THEMEACT));    // 'IsThemeActive'
    UINT uiThemeActive=0;
    if(pfnIsThemeActive)
        uiThemeActive=pfnIsThemeActive();            
    FreeLibrary(hDll);
    return uiThemeActive?TRUE:FALSE;
}

这段小函数用来判断XP的主题是否使能