Forecolor d'un button (command) avec un seul ligne de code! lol

Soyez le premier à donner votre avis sur cette source.

Snippet vu 3 478 fois - Téléchargée 36 fois

Contenu du snippet

C?est vraiment très conne et très simple, mais répond au problème d?un mec du chat au salon « programmation ». Je le mets ici, car j?étais banni du salon après ?;-(. J?espère que ce mec va tomber sur ce message!. En fait, il n?aime pas utiliser les api (normal débutant :-p). Alors voici une simple solution très conne pour lui et pour des autres. ;-)
T?ajoutes un check Box ou un Option Box, tu modifie la propriété style en graphique (1), tu changes la couleur 2 ForeColor comme tu veux, ensuite t?ajoute à l?événement click : check1.value = false ou Option1.value = false (pour les option box). Plus exactement :
Private sub Check1_Click ()
Check1.value = false
? Puis tu mets le code à exécuter pour ton bouton
end sub
T?utilises les autres événements du check comme pour un command exactement.
(Le check Box répond plus rapidement au Click par rapport au Option Box)

Franchement ça me fait rire de mettre ça ici, mais quand je me rappel comment j?ai cassé ma tète avec les api pour arriver à colorer le texte d?un bouton sans le redessiner en utilisant l?api SendMessage?, alors j?aime pas que les autres s?embete aussi d?un truc impossible a faire et personne n?arrivera a le faire !! C?est garantit. :-p

Hey!!, ne mettez rien comme note svp, lol je sais bien ma note, dommage qu?il n?existe pas le zéroooooo ou les ? 0 ;-) :p

A voir également

Ajouter un commentaire

Commentaires

davidauche
Messages postés
150
Date d'inscription
jeudi 20 mars 2003
Statut
Membre
Dernière intervention
8 janvier 2008
-
ahh merci beaucoup, je connais tt ça, mais aussi on peut profiter de forecolor d'un bouton avec cette méthode, sera plus jolie ;-).
a+
Silmon
Messages postés
85
Date d'inscription
mardi 6 janvier 2004
Statut
Membre
Dernière intervention
7 mai 2007
-
Ma solution?

- En ce qui me concerne, j'evite antant que je peux les Ocx et les Api.
- Tu sais, dans mes premiers programmes, j'utilisais
les chekbox au style Grafique. Ce n'etait pas forcement pour le forecolor mais pour mettre un icone a gauche du caption.
- Aujourd'hui dans mes programmes persos, j'utilise le command normal et j'oublie le forecolor (solution 4)
- Mais pour les progs que je vends, j'ajoute au command
une image (Solution 5).

Je dessine l'image avec le paint. A gauche je met une image (genre un icon), a droite un texte. En outre, je specifie la couleur de fond dans la propriete MaskColor du bouton et je met true a UseMaskColor. Ainsi le fond de l'image apparait transparant comme un icon.

Mais si tu veux en savoir plus n'hesite pas a demander

;-)
davidauche
Messages postés
150
Date d'inscription
jeudi 20 mars 2003
Statut
Membre
Dernière intervention
8 janvier 2008
-
Et maintenant, tu préfere quelle solution Silmon? ;-)
Silmon
Messages postés
85
Date d'inscription
mardi 6 janvier 2004
Statut
Membre
Dernière intervention
7 mai 2007
-
Il n'y a pas de quoi.

Amicallement a+
davidauche
Messages postés
150
Date d'inscription
jeudi 20 mars 2003
Statut
Membre
Dernière intervention
8 janvier 2008
-
voila une tres simple solution silmon pour le problème de l'execution 2 fois la procédure.
t'ajoute au début

if check1.value = false then exit sub
'ton code a executer comme msgbox
'et en fin t'ajoute
check1.value = false

voila une autre ligne de code de + : pas trop vraiment!
Merci pour toi, je n'ai pas remarque ça au début ;)
salut a+

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.