Opt("GUIOnEventMode", 1)

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <SliderConstants.au3>
#include <GuiSlider.au3>
;~ #include <DateTimeConstants.au3>
;~ #include <Inet.au3>
#include <IE.au3>
#include <WinAPI.au3>
#include <GuiTab.au3>

Local $GUI_EVENT_CLOSE, $nMsg
Global $webbrowser, $progress, $url, $options, $refresh, $oIE, $GUIActiveX, $starturl, $starturllabel, $starturlyes
Global $updatesbutton, $updateslabel, $okay, $webbrowseroptionen, $GUI_DISABLE, $GUI_CHECKED, $GUI_ENABLE
Global $ver = "0.1"

$oIE = _IECreateEmbedded()

$webbrowser = GUICreate("Webrowser", 700, 500, -1, -1, -1, -1)
GUISetBkColor(0xEEEEEE, $webbrowser)

$progress = GUICtrlCreateProgress(3, 473, 694, 23, -1, -1)
$url = GUICtrlCreateInput("Bitte geben sie eine URL ein", 246, 4, 450, 20, -1, 512)
GUICtrlSetColor(-1, "0xC0C0C0")
$options = GUICtrlCreateButton("Einstellungen", 4, 3, 107, 23, -1, -1)
$refresh = GUICtrlCreateButton("Aktualisieren", 120, 3, 107, 23, -1, -1)

$GUIActiveX = GUICtrlCreateObj($oIE, 10, 40, 680, 425)
GUISetState(@SW_SHOW, $webbrowser)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
WEnd