OMBRER TOUT LES CONTROLES D'UNE FEUILLE EN DÉGRADÉ (MIS À JOUR)

cs_moustachu Messages postés 1079 Date d'inscription jeudi 14 novembre 2002 Statut Membre Dernière intervention 1 janvier 2012 - 22 avril 2004 à 09:48
Flocreate Messages postés 300 Date d'inscription lundi 17 juillet 2006 Statut Membre Dernière intervention 27 mai 2012 - 10 avril 2010 à 12:31
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/22163-ombrer-tout-les-controles-d-une-feuille-en-degrade-mis-a-jour

Flocreate Messages postés 300 Date d'inscription lundi 17 juillet 2006 Statut Membre Dernière intervention 27 mai 2012 3
10 avril 2010 à 12:31
Bonjour, 10/10
Pour ceux qui connaissent le jeux populous (3D), j'aime bien l'effet ombre sur composants en concidérent le curseur de la souris comme source de lumière.

Je vais essayer d'adapter ce code déjà fort bien fait pour permettre de définir optionnellement un point X,Y source de la lumière avec un taux de luminosité.
hectorticoli Messages postés 23 Date d'inscription mardi 24 février 2004 Statut Membre Dernière intervention 29 mars 2005
10 mars 2005 à 23:32
Je vais regarder cette source de plus prêt... pfiou... ca fait pas longtemps que j'utilise vbfrance, mais j'ai déjà 3 ou 4 sources de DarkSidious à me mettre sous la dent... et ca a l'air d'être du très bon... et en plus ca a l'air bien bien commenté...

Bon, j'anticipe un petit peu, mais bon, jva te mettre un 10/10, et de une parce que ta source a l'air bien sympa, et de 2 parce tu m'as pas mal aidé et conseillé aujourd'hui... et demain, je fais le tour de tes autres sources...

@ ciao, et bonne prog
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
23 avril 2004 à 13:31
Oui, ca je connaît, mais comment faire pour faire :

TypeOf(me.Controls(index)) = TypeOf(ControlExclude) par exemple ?

DarK Sidious
jmlucienvb Messages postés 129 Date d'inscription mercredi 24 septembre 2003 Statut Membre Dernière intervention 12 février 2009
23 avril 2004 à 13:20
propriété typeof :
If (TypeOf Me.Controls(indx) Is TextBox) Then...
JM
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
23 avril 2004 à 13:13
Re jean marc ;-)

Ben l'idéal, ce serait de se baser uniquement sur les propriétés des contrôles sans les modifier : si le programmeur utilise déjà le tag de ces contrôles, il ne faut pas y toucher pour distinguer les contrôles ombrés des contrôles non ombrés ! Il doit bien exister un moyen de connaître le type d'un contrôle tout de même !

DarK Sidious
jmlucienvb Messages postés 129 Date d'inscription mercredi 24 septembre 2003 Statut Membre Dernière intervention 12 février 2009
23 avril 2004 à 13:10
Y'a peut-être un moyen en gérant le paramètre de la propriété Tag.
Je sais pas si cette propriété existe sur tous les contrôles mais moi je m'en sers assez pour les textbox...
jm
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
23 avril 2004 à 12:15
Merci sirocoooo.

Pour l'instant, tu ne peux exclure que les contrôle que tu mentionne (voir le screenshot : les labels et les sliders ne sont pas ombrés), mais dans une prochaine mise à jour, j'essaierais de faire une propriété pour ne pas ombrer un type de contrôles (ou plusieurs) ;-)

DarK Sidious
Sirocooo Messages postés 412 Date d'inscription mercredi 19 décembre 2001 Statut Membre Dernière intervention 7 avril 2008 1
23 avril 2004 à 09:50
Super 10/10
Comment faire pour ne pas ombrer les contrôles
comme les labels les chekBox ?
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
23 avril 2004 à 08:55
Merci à vous Jean marc et tankian18 ;-)

DarK Sidious
tankian18 Messages postés 122 Date d'inscription lundi 21 juillet 2003 Statut Membre Dernière intervention 16 septembre 2014
23 avril 2004 à 08:50
Exelent ;)
jmlucienvb Messages postés 129 Date d'inscription mercredi 24 septembre 2003 Statut Membre Dernière intervention 12 février 2009
23 avril 2004 à 08:11
sacré Dark, tu es toujours au top...
Quel bonheur de suivre ce que tu fais...
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
22 avril 2004 à 18:25
Ca y est, je mets une mise à jour sur le site.

Cependant, elle n'est pas complète : je n'ai pas le temps de m'attarder plus pour développer les spécificités dont je mentionne un peu plus haut.

Lorsque j'aurais un peu plus de temps, je les intégrerais. Vous pouvez toujours me donner des idées pour de futurs développement de cette source, j'en prendrait compte, c'est promis ;-p

DarK Sidious
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
22 avril 2004 à 15:28
Bon, c'est décidé, je m'attaque à une mise à jour ! ;-) Je laisse de côté mes projets actuels pour passer un peu de temps sur cette source bande de veinards. lol

Voilà les nouvelles idées que j'ai eu entre temps :
- Exclusions de certains contrôles
- Largeur pouvant être différente de la hauteur de l'ombre
- Passage aux objets pour une utilisation plus facile et plus générale

Je vous rappelle que si vous avez des idées d'évolution, n'hésitez pas !

DarK Sidious
JMKPROD Messages postés 68 Date d'inscription samedi 31 mai 2003 Statut Membre Dernière intervention 15 septembre 2007
22 avril 2004 à 15:18
2 mots BRA VO!!!!!!!!!!!!!!!

C'est beau, c'est commenté pour les débutants comme moi, 20/10
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
22 avril 2004 à 14:01
Oui, je ne pensais pas faire de mise à jour de cette source vu que je pensais que ca n'interresserai pas grand monde, mais finalement, il semblerait que je me sois trompé ;-)

Donc, du coup, je vous demande toutes les idées qui peuvent vous passer par la tête pour rendre cette source plus intéressante !

Voici ce qui est retenu pour le moment :
- Position de l'ombre par rapport au contrôle
- Couleur de départ de l'ombre (à dégradé pour arriver à la couleur de la feuille).
- Ombre plus arrondie pour la rendre plus esthétique
- Ombre qui tient compte de la couleur du fond de fenêtre, ainsi Mlle hqv0 pourra utiliser cette source avec les siennes :o) lol
- et pourquoi pas faire même un dégradé non linéaire pour un effet de lumière... va falloir que je planche cà !

Si vous avez d'autres idées, n'hésitez pas ;-)

Cependant, la mise à jour risque d'être un peu longue, n'ayant pas beaucoup de temps en ce moment... comme d'habitude dirons certains... donc patience ;-)

DarK Sidious
cs_moustachu Messages postés 1079 Date d'inscription jeudi 14 novembre 2002 Statut Membre Dernière intervention 1 janvier 2012
22 avril 2004 à 13:46
Oui, une couleur définissable et puis l'angle, tant qu'on y est. :o)

Et pourquoi pas une "véritable" ombre, histoire que cela puisse s'utiliser avec les fonds de fenêtres chamarés de Mlle hqv0 :o)...

Mais il y aura un pb... tu avais écris "je ne pense pas faire de mise à jour non plus"...
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
22 avril 2004 à 13:27
Et bien, j'étais loin d'imaginer qu'une source partant d'une idée aussi simple enthousiasme autant les membres de VBFrance !

Je te remercie bilaloch, cela m'encourage à pousser un peu plus loin le concept si j'ai le temps pour rendre l'ombre un peu plus jolie et peut-être même avec une couleur définissable !

DarK Sidious
bilaloch Messages postés 556 Date d'inscription lundi 6 octobre 2003 Statut Membre Dernière intervention 31 octobre 2019 1
22 avril 2004 à 13:22
Rien a dire!!!C'est l'une des sources qui merite bien plus que 10/10
J'aurais mis 20/10 mé y a pas!!!
Merci pour cette source DarKSidiouS
hqv0 Messages postés 54 Date d'inscription samedi 22 novembre 2003 Statut Membre Dernière intervention 12 juin 2004
22 avril 2004 à 12:59
Rejoins moi , on sera deux, (c'est le debut d'une assos) mais aussi je bataille à mon niveau pour la Non normalisation des apllications en VB , moi je joue sur les formes, les couleurs , les images... enfin, je tente de faire du 'different', du plus personnalisé.
VB est plein de ressources qui sont pour moi à decouvrir mais je prend du temps pour le visuel, et pour cela, je me prend plein de reflexion par certaines 'grosses tetes' de VB .


UnE FilLe QuI Se PrEnD PaS La TeTe Et Qui VoUs DoNnE Un BiSoU SuR Le nEz
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
22 avril 2004 à 12:39
Merci à toi hqv0 !

Vu que j'en ai un peu assez des interfaces un peu trop standardisée de Windows (que ce soit 95 ou XP), j'essaie de trouver des trucs pour les embellir un peu ;-p

A suivre peut-être une autre source pour embellir les interfaces...

DarK Sidious
hqv0 Messages postés 54 Date d'inscription samedi 22 novembre 2003 Statut Membre Dernière intervention 12 juin 2004
22 avril 2004 à 11:25
Bon Pour moi, rien de mieux que quelqu'un qui recherche des trucs et astuces pour embellir les interfaces. code clair, propre, bien commenté, sans probleme Bref, ton a travail a tout pour me faire craquer. je te donne 10 car c'est la limite autorisé, mais c'est un minimum


UnE FilLe QuI Se PrEnD PaS La TeTe Et Qui VoUs DoNnE Un BiSoU SuR Le nEz
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
22 avril 2004 à 11:23
merci beaucoup wallon14 !

DarK Sidious
wallon14 Messages postés 56 Date d'inscription vendredi 17 octobre 2003 Statut Membre Dernière intervention 3 juillet 2005
22 avril 2004 à 11:13
J'ai mit 2/10 parceque c'est vraiement nul...

NAN J'DECONNE ! Le truc est super bien fait ! 10/10 direct !!!

GG
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
22 avril 2004 à 10:19
Merci moustachu pour ces commentaires !

En fait, je déclare obj_for1 et tant qu'objet par habitude, mais je pense que ca doit très bien marché en le déclarant de type control aussi !

DarK Sidious
cs_moustachu Messages postés 1079 Date d'inscription jeudi 14 novembre 2002 Statut Membre Dernière intervention 1 janvier 2012
22 avril 2004 à 09:48
Jôôôôôôliiiiii !! En plus c'est bien commenté ! Je dois avouer que je n'ai pas encore testé mais c'est déjà dans mes favoris.

Juste une question pour ma culture perso tu déclares :
>Dim OBJ_For1 As Object

Ensuite, tu boucles sur tous les contrôles de FRM_PRINCIPALE
>For Each OBJ_For1 In FRM_PRINCIPALE.Controls

Pourquoi ne pas déclarer OBJ_For1 en tant que Control ? Il y a une raison ou peut-on faire les deux ?

Merci

++
Moustachu

9/10
Rejoignez-nous