Jump to content

Edit Boxes And Slides


Misha
 Share

Recommended Posts

#include <GuiConstants.au3>

GUICreate("MyGUI", 392, 323)

$temp = 50

$Input_1 = GUICtrlCreateInput($temp, 40, 20, 140, 20)

$Slider_2 = GUICtrlCreateSlider(40, 50, 140, 30)
GUICtrlSetLimit($Slider_2, 100, 0)
GUICtrlSetData($Slider_2, $temp)

GUISetState()

While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            ExitLoop
        Case Else
            If $temp <> GUICtrlRead($Slider_2) Then
                $temp = GUICtrlRead($Slider_2)
                GUICtrlSetData($Input_1, $temp)
            EndIf
    EndSelect
WEnd
Exit

SciTE for AutoItDirections for Submitting Standard UDFs

 

Don't argue with an idiot; people watching may not be able to tell the difference.

 

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...