Slider Bereich Problem

1. offizieller Beitrag

    Hallöchen ^^

    Ich würde gerne den Wert eines Sliders von links nach rechts sinken lassen. Der Bereich geht dabei von 300 (ganz links) gegen 0 (ganz rechts).
    Wie bekomme ich das Sinken hin? :)

    Liebe Grüße
    Elodie

    Einmal editiert, zuletzt von Elodie (14. Juli 2009 um 20:53)

    So hir ma ein beispiel mit 0 bis 255
    255 lings 0 rechts

    Spoiler anzeigen
    [autoit]


    #include
    #include

    [/autoit] [autoit][/autoit] [autoit]

    $Form1 = GUICreate("TransGui", 270, 65)
    $Slider1 = GUICtrlCreateSlider(10, 10, 250, 45, BitOR($TBS_TOOLTIPS, $TBS_AUTOTICKS))
    GUICtrlSetLimit(-1, 0, -255) ; Limit verändert, damit man die Chance hat den Slider "anzufassen"
    GUISetState(@SW_SHOW)
    WinSetTrans($Form1, "", 100) ; Anfangswert setzen

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Slider1
    $Read = GUICtrlRead($Slider1) ; Ließt den aktuellen wert des Sliders aus.
    WinSetTrans($Form1, "", $Read) ; Setzt die Transparenz eines Fensters
    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $progress = GUICtrlCreateProgress(10, 10, 200, 20)
    GUICtrlSetData($progress, 100) ;setzt die Progressbar auf z.B. 100%

    [/autoit] [autoit][/autoit] [autoit][/autoit]

    Einmal editiert, zuletzt von FunH@cker (14. Juli 2009 um 18:00)

    • Offizieller Beitrag

    Meinst Du so:

    Spoiler anzeigen
    [autoit]


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

    [/autoit] [autoit][/autoit] [autoit]

    $hGui = GUICreate('Test', 400, 300)
    $hSlider = GUICtrlCreateSlider(10, 10, 380, 30, $TBS_AUTOTICKS)
    GUICtrlSetLimit(-1, 300, 0)
    GUISetState()
    GUIRegisterMsg($WM_HSCROLL, '_MY_WM_HSCROLL')

    [/autoit] [autoit][/autoit] [autoit]

    While True
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    Exit
    Case $hSlider
    ToolTip('')
    MsgBox(0, 0, 300 - GUICtrlRead($hSlider))
    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func _MY_WM_HSCROLL($hWnd, $Msg, $wParam, $lParam)
    ToolTip(300 - GUICtrlRead($hSlider))
    Return $GUI_RUNDEFMSG
    EndFunc

    [/autoit]