Slider Help

[Justforfun]

Hello,

I've been trying to make a slider with min\max values from 0 to 100000 but I cant set it above 30000 without it freezing at 0 so my question is if there is no way to set it to 100000 then is there a way to set the guictrlsetlimit to use 0% to 100% where every 1% = 1000 Iwa doing this

$Max = 100000 $Slider1 = GUICtrlCreateSlider(96, 152, 465, 73, BitOR($TBS_TOOLTIPS, $TBS_AUTOTICKS))
GUICtrlSetLimit($Slider1, $max, 0)

How would I change this to % but still get output value of 100000 or is the away to get pass the 30000 limit I hop I was able to explain this well enough. Edited July 16, 2010 by Justforfun

[Melba23]

Justforfun,

Here you go!

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

$hGUI = GUICreate("Test", 500, 500)

$hSlider = GUICtrlCreateSlider(10, 10, 480, 30)
$hSlider_Handle = GUICtrlGetHandle($hSlider)
GUICtrlSetLimit($hSlider, 1000, 0) ; 0-1000 here <<<<<<<<<<<<<<<<<<<<<<

$hLabel = GUICtrlCreateLabel("", 10, 100, 200, 20)

GUISetState()

GUIRegisterMsg($WM_HSCROLL, "_Slider_Movement")

While 1

    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch

WEnd

Func _Slider_Movement($hWnd, $iMsg, $wParam, $lParam)

    #forceref $hWnd, $iMsg, $wParam
    If $lParam = $hSlider_Handle Then
        ; Calculate value
        Local $iValue = 100 * GUICtrlRead($hSlider) ; So multiply by 100 here <<<<<<<<<<<<<<<<
        ; Change label
        GUICtrlSetData($hLabel, $iValue)
    EndIf
    Return $GUI_RUNDEFMSG

EndFunc

You can obviously change the Max value and the factor to your own choices.

Ask if anything is unclear.

M23

[Justforfun]

Justforfun,

Here you go!

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

$hGUI = GUICreate("Test", 500, 500)

$hSlider = GUICtrlCreateSlider(10, 10, 480, 30)
$hSlider_Handle = GUICtrlGetHandle($hSlider)
GUICtrlSetLimit($hSlider, 1000, 0) ; 0-1000 here <<<<<<<<<<<<<<<<<<<<<<

$hLabel = GUICtrlCreateLabel("", 10, 100, 200, 20)

GUISetState()

GUIRegisterMsg($WM_HSCROLL, "_Slider_Movement")

While 1

    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch

WEnd

Func _Slider_Movement($hWnd, $iMsg, $wParam, $lParam)

    #forceref $hWnd, $iMsg, $wParam
    If $lParam = $hSlider_Handle Then
        ; Calculate value
        Local $iValue = 100 * GUICtrlRead($hSlider) ; So multiply by 100 here <<<<<<<<<<<<<<<<
        ; Change label
        GUICtrlSetData($hLabel, $iValue)
    EndIf
    Return $GUI_RUNDEFMSG

EndFunc

You can obviously change the Max value and the factor to your own choices.

Ask if anything is unclear.

M23

You are awesome thanks so very much

[PsaltyDS]

Both the min and max values are packed into a single 32 bit parameter in the message that does the work. So each value is a signed 16-bit integer. That limits you to 32K - 1 for max. The percentage thing is just a little math:

#include <GUIConstantsEx.au3>
#include <SliderConstants.au3>


Global $slider1, $button, $msg, $Max = 2^15 - 1

GUICreate("slider", 400, 300)

$slider1 = GUICtrlCreateSlider(20, 25, 360, 50, BitOR($TBS_TOOLTIPS, $TBS_AUTOTICKS))
GUICtrlSetLimit($slider1, $Max, 0)

$slider2 = GUICtrlCreateSlider(20, 100, 360, 50, BitOR($TBS_TOOLTIPS, $TBS_AUTOTICKS))
GUICtrlSetLimit($slider2, $Max + 1, 0)

$slider3 = GUICtrlCreateSlider(20, 175, 360, 50, BitOR($TBS_TOOLTIPS, $TBS_AUTOTICKS))
GUICtrlSetLimit($slider3, 100, 0)

$button = GUICtrlCreateButton("Value?", 150, 250, 100, 30)
GUISetState()

Do
    $msg = GUIGetMsg()

    If $msg = $button Then
        MsgBox(0, "sliders", "Slider1: " & GUICtrlRead($slider1) & @CRLF & _
                "Slider2: " & GUICtrlRead($slider2) & @CRLF & _
                "Slider3: " & GUICtrlRead($slider3) & "% = " & GUICtrlRead($slider3) * 100000 / 100, 5)
    EndIf
Until $msg = $GUI_EVENT_CLOSE

Edit: Too slow for the whirly-bird!

Edited July 16, 2010 by PsaltyDS

[Melba23]

PsaltyDS,

Thanks for that little bit of info.

M23

[Raik]

in $wParam is all needed info:

BitAND($wParam, 0x0000FFFF) will give you the state of the mouse:

while scrolling the slider:

$wParam = 0x001D0005

state: 5

on releasing the mouse:

$wParam = 0x00000008

state: 8

but the first part ("0x001D") contains the value of the slider and thats my question:

how to calculate this value from $wParam to a dec value?

EDIT:

have found the answer by myself:

BitShift($wParam, 16) will give the slider-value.

Edited October 26, 2010 by Raik