#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <WinAPI.au3>
#include "GUIScroll.au3"

Dim $VS = _WinAPI_GetSystemMetrics(2) ; SM_CXVSCROLL
Dim $HS = _WinAPI_GetSystemMetrics(3) ; SM_CYHSCROLL
Dim $CW = 400
Dim $CH = 400
Dim $GW = $CW + $VS
Dim $GH = $CH + $HS

Opt("GUICoordMode", 2)
Dim $hGUI = GUICreate("Scroll Example", $GW, $GH, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_HSCROLL, $WS_VSCROLL))
GUISetBkColor(0x88AABB)
GUISetCoord(10, 10)
Dim $I = 1
GUICtrlCreateLabel("Edit " & $I, -1, -1, 380, 20, $SS_CENTERIMAGE)
GUICtrlCreateInput("", -1, 0)
For $I = 2 To 20
    GUICtrlCreateLabel("Edit " & $I, -1, 0, -1, -1, $SS_CENTERIMAGE)
    GUICtrlCreateInput("", -1, 0)
Next
GUISetCoord(410, 10)
$I = 21
GUICtrlCreateLabel("Edit " & $I, -1, -1, 380, 20, $SS_CENTERIMAGE)
GUICtrlCreateInput("", -1, 0)
For $I = 22 To 40
    GUICtrlCreateLabel("Edit " & $I, -1, 0, -1, -1, $SS_CENTERIMAGE)
    GUICtrlCreateInput("", -1, 0)
Next

GUISetState()

_GUIScroll_Init($hGUI, 0) ; SB_HORZ
_GUIScroll_Init($hGUI, 1, 1) ; SB_VERT

While True
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            ExitLoop
    EndSwitch
WEnd

Exit