problème avec un scrollbar

Version imprimable

14/03/2011, 18h32
gryffondor8392

problème avec un scrollbar

J'aimerais savoir s'il existe un control scrollbar dont la valeur max peut être supérieur à 32 767. Valeur que l'on ne peu pas dépasser avec un scrollbar habituel sinon ca cause une erreur.
14/03/2011, 19h23
ProgElecT

Slider: composant contenu dans MSComctlLib (Microsoft Windows Common Controls 6.0
Property Value As Long ----> (plage -2 147 483 648 à 2 147 483 647)

Mais .... essais un ScrollBar .Max = 32767 prenant la largeur maximal de l'écran et de bouger son curseur ...

En général on utilise .Value multiplié ou divisé par X, ou encore -X ou encore + X, c'est pourquoi 32 767 est souvent largement suffisant.
14/03/2011, 19h26
gryffondor8392

Citation:

Envoyé par ProgElecT

Slider: composant contenu dans MSComctlLib (Microsoft Windows Common Controls 6.0
Property Value As Long ----> (plage -2 147 483 648 à 2 147 483 647)

Mais .... essais un ScrollBar .Max = 32767 prenant la largeur maximal de l'écran et de bouger son curseur ...

En général on utilise .Value multiplié ou divisé par X, ou encore -X ou encore + X, c'est pourquoi 32 767 est souvent largement suffisant.

Dsl mais je ne comprends pas ce que tu veux dire.

Sur un Form, 5 Labels (Autoseize = true) et un HScroll

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub HScroll1_Change()
'affichage de 0 à 327670 par pas de 10
Label1 = CLng(HScroll1.Value) * 10
'affichage de 0,0 à 3276,7 par pas de 0,1
Label2.Caption = CLng(HScroll1.Value) / 10
'affichage de 1000 à 33767 par pas de 1
Label3.Caption = CLng(HScroll1.Value) + 1000
'affichage de -1000 à 31767 par pas de 1
Label4.Caption = CLng(HScroll1.Value) - 1000
'affichage de 1000 à -31767 par pas de 1
Label5.Caption = 1000 - HScroll1.Value
End Sub
Private Sub HScroll1_Scroll()
HScroll1_Change
End Sub

14/03/2011, 20h38
gryffondor8392

voila le code que j'ai :

Private Sub VScroll1_Change()

Picture5.Top = -VScroll1.Value

End Sub

mais une fois que la valeur max est attente ca ne va pas plus loin et la je ne vois pas comment faire pour que mon défillement puisse continuer
14/03/2011, 22h12
ProgElecT

Une chose qui n'a pas à voire avec un scrollbar (sa capacité .value en Integer) mais qui pourra surement te débloquer.
Mes le conteneur ou est placer le PictureBox en ScaleMode = VBpixels (3)
Un twips = 15 pixels, si tu es en conteneur Pixels (max value du ScrollBar = 32670)*15) = 490050 pixels, donc un solution possible pour ton besoin de déplacement .Top du PictureBox
15/03/2011, 00h13
gryffondor8392

Merci beaucoup, je ne savais pas du tout que l'on pouvait gérer les distances en pixels et autrement.