Je vous propose un code tout ce qu'il y a de plus simple ^^
qui permet d'appliquer un Skin a un TButton standart de la VCL ... eh oui ^^
rien à installer ... c'est une fonctionnalité de base Windows qui fonctionne depuis XP
contrairement à ce que dit la MSDN là dessus "Minimum supported client Windows Vista [desktop apps only]":O
en ce qui concerne les images ... c'est pareil la MSDN dit que la 6ème n'est utilisée que sur les tablettes :
"
enum PUSHBUTTONSTATES {
PBS_NORMAL = 1,
PBS_HOT = 2,
PBS_PRESSED = 3,
PBS_DISABLED = 4,
PBS_DEFAULTED = 5,
PBS_STYLUSHOT = 6,
};
Note that PBS_STYLUSHOT is used only on tablet computers.
"
c'est pas vrai, la 6ème image est utilisée pour l'animation du bouton quand il a le focus ou pour
signaler un bouton par défaut.
D'ailleurs les plus attentifs auront remarqué qu'il n'y a que 5 images dans le répertoire "IMG" ...
la sixième n'est qu'une copie de la deuxième.
voilà ... le code étant très simple il n'y a pas commentaire
si toute fois vous avez des questions ... vous connaissez la marche à suivre
les unités:
crSkinBtn --> contient les déclarations manquantes + un appel à l'unité VistaAltFixUnit.pas
ce qui règle le problème de la touche Alt quand les thèmes sont activés
+ un appel à XPMan.pas
crHQBitmap --> est juste là pour avoir une meilleur qualité de bitmap lors d'un resize
J'espère que cela vous plaira ;)
@++
Cirec.