#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <IE.au3>

$IE = _IECreateEmbedded ()

#Region ### START Koda GUI section ### Form=C:\Users\Patrick\Documents\browser.kxf
$GUI_Main = GUICreate("zSoft Webbrowser", 1022, 490, 52, 25)
$GUI_addresszeile = GUICtrlCreateInput("http://www.google.com", 112, 16, 353, 21)
$Label1 = GUICtrlCreateLabel("Addresse :", 24, 16, 80, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUICtrlSetTip(-1, "12")
$GUI_send = GUICtrlCreateButton("Los!", 496, 16, 105, 25, 0)
$browser = GUICtrlCreateObj($IE,8, 50, 1000, 401)
$GUI_home = GUICtrlCreateButton("Home", 808, 16, 105, 25, 0)
$MenuItem1 = GUICtrlCreateMenu("&Datei")
$GUI_men_einstellungen = GUICtrlCreateMenuItem("Einstellungen", $MenuItem1)
$GUI_Men = GUICtrlCreateMenuItem("Beenden", $MenuItem1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

_IENavigate($IE, "http://www.google.com")


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

Case $GUI_men_einstellungen
   MsgBox(0, "Einstellungen", "Hier sind normalerweise die Einstellungen", 5)
Case $GUI_Men
   Exit
Case $GUI_send
   $html = GUICtrlRead($GUI_addresszeile)
   _IENavigate($IE,$html)
Case $GUI_home
EndSwitch
WEnd