Détecter l'appariation des scrollbars dans un scrollablecontrol et transformation en slider

Soyez le premier à donner votre avis sur cette source.

Vue 4 959 fois - Téléchargée 416 fois

Description

Ce code permet de détecter l'apparition des scrollbars dans un ScrollableControl lorsque son contenu change de taille. Il permet aussi de transformer le comportement des scrollbars en slider afin de déplacer l'affichage à l'endroit du clic dans la zone de déplacement de l'ascenseur.

Ce code utilise la file de message (NativeWindow) du ScrollableControl. Il expose aussi l'utilisation des API de manipulation des scrollbars

L'application de test fournit deux cases à cocher pour changer le comportement des scrollbars. Un listbox trace les changements d'état de scrollbars. L'image verte est zoomable avec la roulette de la souris et déplaçable par drag and drop.

Conclusion :


N'hésitez pas à commenter et à noter !

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
2676
Date d'inscription
vendredi 28 juin 2002
Statut
Membre
Dernière intervention
13 janvier 2016
16
salut,

Quand tu zoomes l'image verte avec la roulette de la souris, cela fait apparaitre où disparaitre les scrollbars et une ligne indiquant l'apparition ou disparition des scrollbars apparait dans la listbox...

Les deux cases à cocher permettent de changer le comportement des scrollbars vers un comportement Slider : quand tu cliques sur la scrollbar verticale et que la case à cocher "verticale" est cochée, alors l'ascenceur de défilement se place à là où tu as cliqué (au lieu de faire un PageUP ou PageDown)...

ShareVB
Messages postés
12
Date d'inscription
lundi 24 juillet 2006
Statut
Membre
Dernière intervention
14 novembre 2009

c'est bien mais il manque des commentaire,
code très utile mais il y a trop de manip à déchiffrer, il ne ce passe rien si j'active les checkcases,
merci pour ce code.
Messages postés
2676
Date d'inscription
vendredi 28 juin 2002
Statut
Membre
Dernière intervention
13 janvier 2016
16
salut,

normalement, il y a quelque chose qui s'affiche dans la listbox quand tu cliques sur le + et que les scrollbars apparaissent autour de la zone verte. Après il y a aussi, si tu coches les cases, alors les scrollbars se comportent comme des sliders.

Pour utiliser le composant ScrollableCOntroller, il faut que tu les déposes sur une forme, et que tu associes dans sa propriété Control, le contrôle dont tu veux détecter le changement de visibilité de scrollbars.

ShareVB
Messages postés
129
Date d'inscription
mardi 20 juillet 2004
Statut
Membre
Dernière intervention
6 juin 2009

Quand on active un Slider Vertical ou Horizontal, c'est sensé faire quelque chose ? Chez moi cela ne fait rien ...
Mais 7 quand même car ce code me sera fort utile pour la suite.
Merci.

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.