#include "Extras\HelpFileInternals.au3"

#include <GUIConstantsEx.au3>
#include <GuiMonthCal.au3>
#include <WindowsStylesConstants.au3>

Example()

Func Example()
    Local $idMonthCal

    ; Erstellt eine GUI
    GUICreate("MonthCal:", 400, 300)
    $idMonthCal = GUICtrlCreateMonthCal("", 4, 4, -1, -1, $WS_BORDER, 0x00000000)

    ; Erstellt ein Memo Control
    _MemoCreate(4, 168, 392, 128, 0)
    GUISetState(@SW_SHOW)

    ; Ermittelt/Setzt die Größe des Randes in Pixel
    _MemoWrite("Größe des Randes in Pixel: " & _GUICtrlMonthCal_GetCalendarBorder($idMonthCal))
    Sleep(3000)
    GUISetState(@SW_LOCK)
    _GUICtrlMonthCal_SetCalendarBorder($idMonthCal, 2)
    _MemoWrite("Größe des Randes in Pixel: " & _GUICtrlMonthCal_GetCalendarBorder($idMonthCal))
    GUISetState(@SW_UNLOCK)
    Sleep(3000)
    GUISetState(@SW_LOCK)
    _GUICtrlMonthCal_SetCalendarBorder($idMonthCal, 0, False)
    _MemoWrite("Größe des Randes in Pixel: " & _GUICtrlMonthCal_GetCalendarBorder($idMonthCal))
    GUISetState(@SW_UNLOCK)

    ; Die Schleife wiederholt sich, bis der Benutzer die Beenden-Aktion der GUI auslöst.
    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE
    GUIDelete()
EndFunc   ;==>Example