TButton avec Skin

Description

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.

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.