Page 1 sur 1
[R] Besoin d'aide pour une Scrollbar
Posté : lun. 02 févr. 2015 18:31
par Bayo
Bonjour,
J'ai besoin d'un peu d'aide pour réaliser une ScrollBar
Voici le code :
► Afficher le texte
Code : Tout sélectionner
#include <GUIConstantsEx.au3>
Global $creationetape2 = GUICreate("Classement", 800, 600)
Global $labelclass = GUICtrlCreateLabel("Classement", 410, 40)
Global $suivant2 = GUICtrlCreateButton("Suivant >", 300, 550, 200)
GUISetState(@SW_HIDE)
$nbparticipant = 10
$ajoutclassement = 150
For $i = 1 To $nbparticipant
Assign("labelclassement" & $i, GUICtrlCreateLabel($i, 150, $ajoutclassement + 2, 20))
Assign("classement" & $i, GUICtrlCreateInput("" & $i, 180, $ajoutclassement, 150))
$ajoutclassement = $ajoutclassement + 40
Next
GUISetState(@SW_SHOW, $creationetape2)
While 1
$aMsg = GUIGetMsg(1)
Switch $aMsg[1]
Case $creationetape2
Switch $aMsg[0]
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
EndSwitch
WEnd
Mon soucis, c'est que si $nbparticipant est plus grand comme 15 ou 25, ça ne fonctionne plus, j'aurai voulu faire une scrollbar soit sur la fenêtre et encore mieux que sur la zone des Input. Quand j'en fait une, ça ne défile pas.
Merci d'avance
Re: [..]Besoin d'aide pour une Scrollbar
Posté : lun. 02 févr. 2015 19:04
par orax
Est-ce que t'avais regardé les fonctions _GUIScrollBars* ? Elles devraient faire ce que tu cherches.
Re: [..]Besoin d'aide pour une Scrollbar
Posté : mar. 03 févr. 2015 09:12
par Bayo
J'avais essayé une autre solution, je viens d'essayer celle-ci. J'arrive bien à afficher la scrollbar mais elle ne fonctionne pas non plus.
j'ai rajouté ça _GUIScrollBars_Init($creationetape2) à la fin de la création de la GUI.
et ça après avoir générer les inputs _GUIScrollBars_ShowScrollBar($creationetape2, $SB_VERT)
mais j'ai beau mettre 25 input, la scrollbar ne fonctionne pas.
Merci de ton aide
Re: [..]Besoin d'aide pour une Scrollbar
Posté : mar. 03 févr. 2015 14:01
par mikell
Perso j'utilise (encore, parce que c'est vieux...) cette udf :
Exemple de script :
► Afficher le texte
Code : Tout sélectionner
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include "GUIScrollbars_Ex.au3"
$hGUI = GUICreate("Test", 500, 500)
$header = GUICtrlCreateLabel("header", 0, 0, 500, 100)
GUISetState()
$hGUI2 = GUICreate("Test2", 500, 400, 0, 100, $WS_CHILD, -1, $hGUI)
GUICtrlCreateLabel("", 0, 0, 500, 2000)
GUICtrlSetBkColor(-1, 0xffFFff)
For $i = 0 To 10
GUICtrlCreateLabel($i, 10, $i * 50+10, 300, 45)
GUICtrlSetBkColor(-1, 0xFF8080)
Next
GUISetState()
; Generate scrollbars
_GUIScrollbars_Generate($hGUI2, 0, 2000)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Re: [..]Besoin d'aide pour une Scrollbar
Posté : mar. 03 févr. 2015 15:03
par Bayo
OK merci pour ton aide, ça fonctionne
