Gestion des thèmes XP Résolu

Question

Bonsoir,



Vous avez peut-&#234;tre (ou pas) remarqu&#233; ma derni&#232;re source sur les
richedits avec apparence XP. Je souhaiterais corriger un bug qui fait
qu'une application sans manifest (et donc, non cens&#233;e utiliser les
th&#232;mes XP) dessine malgr&#233; tout les richedits avec l'apparence XP, ce
qui fait t&#226;che au milieu des autres composants...



D'apr&#232;s la MSDN, je devrais utiliser la fonction IsAppThemed et/ou
IsThemeActive. Je les ai donc import&#233;es et utilis&#233;es lors de la
r&#233;ception du message WM_THEMECHANGED mais elles retournent toujours
TRUE, indiff&#233;remment avec ou sans manifest...



http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/commctls/userex/functions/isappthemed.asp

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/commctls/userex/functions/isthemeactive.asp



Merci d'avance...



PS : rien &#224; voir, mais &#231;&#224; serait bien de skinner cette bo&#238;te &#224; partir
des couleurs du site, &#231;&#224; fait un peu tache ce bleu au milieu de ce...
euh, c'est quoi comme couleur d'ailleurs, les cadres de cppfrance ?

cs_Nebula · Accepted Answer

Bon, j'ai finalement trouv&#233;... Il "suffit" de v&#233;rifier la version de
comctl32.dll mapp&#233;e dans notre processus : avec un manifest on a la
version 6 ou plus, sans manifest on a la version 5.



Merci pour ton aide

cs_DARKSIDIOUS · Answer

La fonction IsThemeActive te permet juste de savoir si le th&#232;me
WindowsXP est actif ou si l'utilisateur utilise ce bon vieil habillage
de Windows 98 ! Donc que ta fen&#234;tre soit ou pas skinn&#233;e, elle te
renverra la m&#234;me chose d'apr&#232;s les recherches que j'ai pu faire.

DarK Sidious

[Administrateur et responsable VB/API du site  ProgOtoP]

cs_Nebula · Answer

Certes mais IsAppThemed, tu ne trouves pas que sa description ressemble
&#224; ce dont j'ai besoin (et pourtant, elle renvoie toujours TRUE elle
aussi) ?

cs_DARKSIDIOUS · Answer

Ben justement : ca renvoie si l'application utilise un th&#232;me ou pas...

DarK Sidious

[Administrateur et responsable VB/API du site ProgOtoP]

cs_Nebula · Answer

Et elle renvoie TRUE que l'application utilise ou non un manifest (donc, avec ou sans th&#232;me activ&#233;)...

cs_DARKSIDIOUS · Answer

Le fait d'utiliser ou non un manifest n'emp&#234;che pas &#224; la fen&#234;tre
d'utiliser le th&#232;me XP si Windows utilise un th&#232;me (y'a qu'&#224; voir la
barre de titre par exemple !). Applique le th&#232;me de Windows classique,
et rappelle ta fonction IsAppThemed et tu verra...

DarK Sidious

[Administrateur et responsable VB/API du site  ProgOtoP]

cs_Nebula · Answer

Ben non, sans manifest seuls les bords de la fen&#234;tre sont "skinn&#233;s",
les contr&#244;les (boutons, etc) ne le sont pas sauf mon richedit qui est
l&#224; comme un blaireau avec les th&#232;mes XP... et IsAppThemed renvoie TRUE,
m&#234;me dans ce contexte.



Voici comment je g&#232;re :

  case WM_THEMECHANGED:

    if (hTheme != NULL) {

      pCloseThemeData(hTheme);

    }

    if (pIsThemeActive != NULL && pIsThemeActive() != 0 && pIsAppThemed() != 0) {

      hTheme = pOpenThemeData(hWnd, L"EDIT");

    } else {

      hTheme = NULL;

    }



Les p*** sont des pointeurs de fonctions sur les fonctions d'uxtheme.dll, ils sont initialis&#233;s comme suit :

      pIsThemeActive = (ITA) GetProcAddress(hUxTheme, "IsThemeActive");

      pIsAppThemed = (IAT) GetProcAddress(hUxTheme, "IsAppThemed");

      pOpenThemeData = (OTD) GetProcAddress(hUxTheme, "OpenThemeData");

etc...



Et que l'application int&#232;gre ou non un manifest, les richedits se dessinent avec le style XP...

cs_DARKSIDIOUS · Answer

Oui, c'est ce que je dit : sans manifest, ton application utilise quand
m&#234;me les th&#232;mes ne serait-ce que pour la barre de titre de la fen&#234;tre !
Maintenant, si les richedits utilise les API de l'uxtheme.dll pour se
tracer, forc&#233;ment, il se tracera au look XP si le th&#232;me est actif, m&#234;me
si l'application n'utilise pas de manifest !

DarK Sidious

[Administrateur et responsable VB/API du site  ProgOtoP]

cs_Nebula · Answer

Bon, on va tout r&#233;capituler depuis le d&#233;but...



Avec manifest : http://athanatos.free.fr/temp/RichXP/avec.gif

Sans manifest : http://athanatos.free.fr/temp/RichXP/sans.gif



Ces deux applications utilisent le code que j'ai donn&#233; plus
haut, la seule diff&#233;rence concerne la pr&#233;sence ou l'absence du manifest
dans les ressources. Et ce que je voudrais, c'est savoir comment m'y
prendre pour d&#233;tecter si je dois tracer les richedits avec ou sans les
th&#232;mes XP, de mani&#232;re &#224; assortir leur apparence aux autres composants
(comme le montrent les deux screens) que les th&#232;mes soient activ&#233;s ou
non (en fonction des param&#232;tres de l'application et non de Windows).
C'est en cela que je pensais utiliser IsThemeActive (global) et
IsAppThemed (local), mais &#231;&#224; foire...



Pour le moment, j'utilise uxtheme uniquement si les th&#232;mes XP sont
activ&#233;s, sinon je laisse le richedit faire sa bordure par d&#233;faut. Cela
fonctionne tr&#232;s bien si l'utilisateur a d&#233;sactiv&#233; les th&#232;mes XP, mais
lorsqu'ils sont activ&#233;s cela ne prend pas en compte le manifest, et
voil&#224; tout le probl&#232;me (sans compter qu'on peut forcer la d&#233;sactivation
des th&#232;mes XP dans le raccourci de l'application, je n'ai pas encore
test&#233; &#231;&#224;).



D&#233;sol&#233; si je te semble agressif, mais &#231;&#224; commence &#224; m'&#233;nerver quelque peu de tourner en rond

cs_DARKSIDIOUS · Answer

Lol, je te comprends !



As-tu essay&#233; la fonction GetWindowTheme ? Car appliqu&#233; &#224; ton
richtextbox, peut-&#234;tre qu'il pourrait te donner l'information
cherch&#233;e...



Sache en plus que le richtextbox n'est pas le seul dans ce cas l&#224; : le
listbox par exemple ou le textbox classique affichent leurs scrollbar
en th&#232;me XP alors que leur bordure reste &#224; la norme Win98 ! Et l&#224;, ca
fait encore plus louche ;)


DarK Sidious

[Administrateur et responsable VB/API du site  ProgOtoP]

cs_Nebula · Answer

Hum je ne pense pas que 
GetWindowTheme
puisse grand chose pour moi, je stocke d&#233;j&#224; le HTHEME dans une variable
statique pour conserver le retour de OpenThemeData. D'ailleurs c'&#233;tait
sur cette fonction que je me basais avant pour savoir si les th&#232;mes
&#233;taient actifs : elle retourne NULL s'ils ne le sont pas, sauf dans le
cas d'un manifest (encore lui)...



Quand aux listbox/textbox, ils prennent les styles XP lorsque j'inclus
un manifest, seuls les richedits (toutes versions) semblent n'en faire
qu'&#224; leur t&#234;te

cs_Nebula · Answer

Bon j'ai essay&#233; GetWindowTheme, rien de probant...



J'ai &#233;galement test&#233; IsThemeActive, IsAppThemed et GetThemeAppProperties, ainsi :

    if (pIsThemeActive() != 0

     && pIsAppThemed() != 0

     && (pGetThemeAppProperties() & STAP_ALLOW_NONCLIENT) != 0

     && (pGetThemeAppProperties() & STAP_ALLOW_CONTROLS) != 0

    ) {

      /* mode XP */

      hTheme = pOpenThemeData(hWnd, L"EDIT");

    } else {

      /* mode classique */

      hTheme = NULL;

    }



Mais rien n'y fait, les richedits sont toujours dessin&#233;s avec le style XP malgr&#233; l'absence d'un manifest... C'est d&#233;primant

Gestion des thèmes XP

12 réponses

Votre réponse

Discussions similaires