Jump to content

GUI with a vertical scroll bar


Recommended Posts

I would like to program a gui with a vertical scroll bar. The gui has a lot oft buttons. Half of the buttons are visible. By scrolling down I want that the buttons above are not visible and the following buttons will be seen.

My UDFs:- _RegEnumKey
Link to comment
Share on other sites

This is my script:

Opt("GUIOnEventMode", 1)
#include <GUIConstants.au3>
GUICreate("GUI-Scrollbar", 140, 200, -1, -1, $WS_CAPTION + $WS_MINIMIZEBOX + $WS_SYSMENU + $WS_VSCROLL)
GUISetOnEvent($GUI_EVENT_CLOSE, "_close")
GUICtrlCreateButton("Button 1", 20, 20, 80, 30)
GUICtrlCreateButton("Button 2", 20, 70, 80, 30)
GUICtrlCreateButton("Button 3", 20, 120, 80, 30)
GUICtrlCreateButton("Button 4", 20, 170, 80, 30)
GUICtrlCreateButton("Button 5", 20, 220, 80, 30)
GUICtrlCreateButton("Button 6", 20, 270, 80, 30)
GUICtrlCreateButton("Button 7", 20, 320, 80, 30)
GUICtrlCreateButton("Button 8", 20, 370, 80, 30)
GUICtrlCreateButton("Button 9", 20, 420, 80, 30)
GUICtrlCreateButton("Button 10", 20, 470, 80, 30)
GUISetState(@SW_SHOW)
Func _close()
    Exit
EndFunc   ;==>_close
While 1 
    sleep(500)
WEnd
My UDFs:- _RegEnumKey
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...