Voilà, en fait c'est un équivalent de CheckBox mais dérivé de TGraphicControl il permet d'avoir la transparence sur les cases, sur le texte...
Ceci est bien pratique lorsqu'on utilise des images par exemple.
Plusieurs choses sont paramétrables, comme la couleur de la case, du Stick, la position de la case, la forme du stick ( croix, rond, normal ) ...
Attention ce n'est pas un véritable Checkbox donc il ne comporte pas toutes les fonctions, c'est à dire par exemple la fonction Checked est présente pour faciliter les enregistrements dans les fichiers ini, mais elle est remplacée par la propriété State comportant cbChecked,cbUnchecked et cbGrayed en mode AllowGrayed.
Avec ce composant il y a un exemple qui vous parlera peut-être plus !
Mise à jour :
-Petites modifications rapide suite aux commentaires, oui ca fait longtemp :-p
-Modifications pour le passage à l'unicode.
-Ajout de quelques fonctionnalitées...
-Plus besoin d'installer le composant pour faire des tests ;-)
Conclusion :
Réalisé sous delphi7 et testé sous windows 98,XP.
Voili, Voilou en espérant que ce composant vous sera utile.
Bonne Prog à tous. ;-)
Yanb.
17 août 2012 à 10:00
@Cirec : complétement d'accord avec toi sur la gestion de l'unicode, c'est une salle habitude que j'ai pris au passage de l'unicode et qui me colle encore un peu à la peau :-P
@Eli42 : Si le résultat te convient parfait ;-)
@++
19 juil. 2012 à 13:06
Salut
Du retard? ça fais que 4 ans, ça valait le coup d'attendre vu le résultat
Beau Temps Belle Mer
19 juil. 2012 à 12:25
@YANB:
juste une petite chose au passage ...
ta gestion de l'Unicode n'est pas utile, il suffit d'utiliser les types génériques à la place des types natifs.
Les types Natifs:
- AnsiChar, AnsiString, PAnsiString
- WideChar, WideString, PWideString
Les types Génériques:
- Char, string, PChar
Ainsi on peut aisément remplacer ceci:
{$IFDEF UNICODE}
DrawText(Canvas.Handle, PWideChar(Caption), -1, Rect2, 0);
{$ELSE}
DrawText(Canvas.Handle, PAnsiChar(Caption), -1, Rectangle2, 0);
{$ENDIF UNICODE}
par:
DrawText(Canvas.Handle, PChar(Caption), -1, Rect2, 0);
En utilisant les types génériques c'est le compilateur qui fait le choix en fonction de la version de Delphi par le biais des déclarations dans la RTL/VCL
@++
18 juil. 2012 à 09:01
@ELI42 : Suite à ton commentaire les modifications sont faites, ouhai, bon, j'ai un petit peu de retard ;-)
@... : J'ai apporté quelques modifications rapide, passage à l'unicode, ajout de nouvelles propriétés, gestion du passage de la souris, légère amélioration du code etc...
@+
28 juin 2008 à 02:32
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.