#Include <APIConstants.au3>
#Include <WinAPIEx.au3>
Global $hGui = GUICreate('', 200, 60)
Global $iEdit = GUICtrlCreateEdit( "0", 5, 5, 190, 18, 1 )
Global $hSlider = GUICtrlGetHandle( GUICtrlCreateSlider( 5, 25, 190, 30 ) )
GUICtrlSetLimit( -1, 100 )
GUIRegisterMsg( $WM_NOTIFY, "_GuiProc" )
GUISetState()
Do
Until GUIGetMsg() = -3
Func _GuiProc( $hWnd, $iMsg, $wParam, $lParam )
Switch $hWnd
Case $hGui
Switch $iMsg
Case $WM_NOTIFY
Local $tNMHD
; *
$tNMHDR = DllStructCreate( $tagNMHDR, $lParam )
Switch $tNMHDR.hWndFrom
Case $hSlider
Switch $tNMHDR.Code
Case $NM_RELEASEDCAPTURE
GUICtrlSetData( $iEdit, _SendMessage($hSlider, $TBM_GETPOS) )
EndSwitch
EndSwitch
EndSwitch
EndSwitch
Return 'GUI_RUNDEFMSG'
EndFunc