c'est pas faisable et pourtant ce serait bien pratique dans certains cas! on peut imaginer ca avec get/setgadgetattribute et deux nouvelles constantes...
Dri
changer le min/max d'un trackbar/progressbar/spingadget
changer le min/max d'un trackbar/progressbar/spingadget
Dernière modification par Dr. Dri le lun. 22/août/2005 16:36, modifié 1 fois.
-
- Messages : 1500
- Inscription : jeu. 25/mars/2004 11:23
- Localisation : Sophia Antipolis (Nice)
- Contact :
ya pas moyen par l'API ? 

Webmestre de Basic-univers
Participez à son extension: ajouter vos programmes et partagez vos codes !
Participez à son extension: ajouter vos programmes et partagez vos codes !
-
- Messages : 1500
- Inscription : jeu. 25/mars/2004 11:23
- Localisation : Sophia Antipolis (Nice)
- Contact :
Code : Tout sélectionner
Enumeration
#WIN
#TRACK
#BUTTON
EndEnumeration
If OpenWindow(#WIN,0,0,320,200,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"CheckBoxGadget") And CreateGadgetList(WindowID())
TrackBarGadget(#TRACK, 10, 40,250, 20,0,10000)
ButtonGadget(#BUTTON, 10,80, 80,20,"Change max")
SetGadgetState(#TRACK, 99)
curPos.Point
Repeat
EventID = WaitWindowEvent()
If EventID = #PB_Event_Gadget
Select EventGadgetID()
Case #BUTTON
Debug SendMessage_(GadgetID(#TRACK), #TBM_GETRANGEMAX, 0, 0)
SendMessage_(GadgetID(#TRACK), #TBM_SETRANGEMAX, 0, 100)
Debug SendMessage_(GadgetID(#TRACK), #TBM_GETRANGEMAX, 0, 0)
; MAJ pos curseur
SendMessage_(GadgetID(#TRACK), #WM_LBUTTONDOWN, 0, 0)
SendMessage_(GadgetID(#TRACK), #WM_LBUTTONUP, 0, 0)
; autre constante : #TBM_SETRANGEMIN
;EndCase
EndSelect
EndIf
Until EventID=#PB_Event_CloseWindow
EndIf
Webmestre de Basic-univers
Participez à son extension: ajouter vos programmes et partagez vos codes !
Participez à son extension: ajouter vos programmes et partagez vos codes !