Statusbar wird nicht angezeigt

  • Meine Skriptausschnitte:

    Spoiler anzeigen
    [autoit]

    Local $aParts[3] = [124, 124, 124]

    [/autoit][autoit]

    $Statusbar = _GUICtrlStatusBar_Create($frmHaupt)_GUICtrlStatusBar_SetParts ($Statusbar, $aParts)$Datum = _GUICtrlStatusBar_SetText($Statusbar, @MDAY & "." & @MON & "." & @YEAR, 1)$Zeit = _GUICtrlStatusBar_SetText($Statusbar, @HOUR & ":" & @MIN & ":" & @SEC, 2)

    [/autoit][autoit]

    AdlibRegister("_UpdateZeit", 1000)AdlibRegister("_UpdateAkku", 5000)

    [/autoit][autoit]

    Func _UpdateAkku()_GUICtrlStatusBar_SetText($Statusbar, "Ladezustand: " & $Akku & "%")EndFunc
    Func _UpdateZeit()_GUICtrlStatusBar_SetText($Statusbar, @HOUR & ":" & @MIN & ":" & @SEC, 2)EndFunc

    [/autoit]




    Mein Problem: Die Statusbar wird nicht angezeigt!
    Das gesamte Skript ist im Anhang falls ihr es braucht.

    Einmal editiert, zuletzt von Pad385 (20. Mai 2014 um 20:43) aus folgendem Grund: gelöst..

  • Setz das

    [autoit]

    GUISetState(@SW_SHOW)

    [/autoit]


    direkt hinter dein _GUICtrlStatusBar_Create

    Auserdem ist das

    [autoit]

    Local $aParts[3] = [124, 124, 124]

    [/autoit]


    ganz falsch

    Wenn du jeweils eine breite von 124 haben willst musst du das aufaddieren ;)

    [autoit]

    Local $aParts[3] = [124, 248, 372]

    [/autoit]
  • Hi,
    Deine Menüleiste schiebt die Statusbar zu weit nach unten.

    Spoiler anzeigen
    [autoit]


    #cs ----------------------------------------------------------------------------

    [/autoit] [autoit][/autoit] [autoit]

    AutoIt Version: 3.3.10.2
    Author: Pad

    [/autoit] [autoit][/autoit] [autoit]

    Script:
    -Lautstärkeregler (wird vermutlich nicht funktionieren)
    -Statusbar (Uhrzeit,Akku,Akku lädt?)

    [/autoit] [autoit][/autoit] [autoit]

    #ce ----------------------------------------------------------------------------
    #include <ButtonConstants.au3>
    #include <DateTimeConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <MsgBoxConstants.au3>
    #include <GuiStatusBar.au3>
    #include <Date.au3>
    #include <SliderConstants.au3>
    #include <TreeViewConstants.au3>
    #include <GDIPlus.au3>
    #include <ScreenCapture.au3>
    #include <GuiStatusBar.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Global $aParts[3] = [124, 124, 124]

    [/autoit] [autoit][/autoit] [autoit]

    Global $hBitmap, $hImage, $hGraphic, $hFamily, $hFont, $tLayout, $hFormat, $aInfo, $hBrush1, $hBrush2, $iWidth, $iHeight, $hPen ;Screenshotvariablen
    Global $sString = " Created with AutoIt "

    [/autoit] [autoit][/autoit] [autoit]

    Global $SYSTEM_POWER_STATUS = DllStructCreate("byte;byte;byte;byte;int;int") ;Akkuzustand
    Global $test = DllCall("kernel32.dll", "int", "GetSystemPowerStatus", _
    "ptr", DllStructGetPtr($SYSTEM_POWER_STATUS))
    If $test[0] Then
    Global $Akku = DllStructGetData($SYSTEM_POWER_STATUS, 3)
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    $v1 = InputBox("Security", "Enter password:", "", "*", 300, 150) ;Securitycheck
    If $v1 = ("TakeOff") Then

    [/autoit] [autoit][/autoit] [autoit]

    $frmSplash = GUICreate("", 300, 150, -1, -1, BitOR($WS_SYSMENU, $WS_POPUP), 0) ;PopUp Checking password...
    $proSplash = GUICtrlCreateProgress(56, 104, 193, 9)
    GUICtrlCreateLabel("Checking password...", 97, 50)
    GUISetState(@SW_SHOW, $frmSplash)

    [/autoit] [autoit][/autoit] [autoit]

    For $i = 1 To 99 Step 9 ;Anhang Prozessbar
    GUICtrlSetData($proSplash, $i)
    Sleep(75)
    Next
    GUISetState(@SW_HIDE, $frmSplash)

    [/autoit] [autoit][/autoit] [autoit]

    #Region ;Hauptform
    $frmHaupt = GUICreate("Help Panel", 455, 471, -1, -1)
    ;
    ;~ $Start = GUICtrlCreateMenu("&Start")
    ;~ $Exit = GUICtrlCreateMenuItem("Exit", $Start)
    ;~ ;
    ;~ $Hilfe = GUICtrlCreateMenu("&Hilfe")
    ;~ $Google = GUICtrlCreateMenuItem("???", $Hilfe)
    ;~ GUISetIcon("C:\Program Files (x86)\TERA\tera-launcher.exe", -1)
    ;~ GUISetBkColor(0x0066CC)
    ;
    $Button1 = GUICtrlCreateButton("Facebook", 10, 10, 105, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Palatino Linotype")
    $Button2 = GUICtrlCreateButton("Payday 2", 130, 10, 105, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Palatino Linotype")
    $Button3 = GUICtrlCreateButton("Notepad++", 10, 45, 105, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Palatino Linotype")
    $Button4 = GUICtrlCreateButton("DC Universe Online", 130, 45, 105, 30)
    GUICtrlSetFont(-1, 8, 400, 0, "Palatino Linotype")
    $Input1 = GUICtrlCreateInput("", 15, 150, 200, 21)
    $YouTubeLabel = GUICtrlCreateLabel("YouTube Suche:", 15, 125, 85, 17)
    $Button5 = GUICtrlCreateButton("Los!", 240, 150, 80, 20)
    GUICtrlSetFont(-1, 12, 400, 0, "Palatino Linotype")
    $Input2 = GUICtrlCreateInput("", 15, 210, 200, 21)
    $GoogleLabel = GUICtrlCreateLabel("Google Suche:", 15, 185, 75, 17)
    $Button6 = GUICtrlCreateButton("Los!", 240, 210, 80, 20)
    GUICtrlSetFont(-1, 12, 400, 0, "Palatino Linotype")
    $Button7 = GUICtrlCreateButton("Opera-Browser", 10, 80, 105, 30)
    GUICtrlSetFont(-1, 11, 400, 0, "Palatino Linotype")
    $Button8 = GUICtrlCreateButton("Skype", 130, 80, 105, 30)
    GUICtrlSetFont(-1, 12, 400, 0, "Palatino Linotype")
    $Button11 = GUICtrlCreateButton("Favoriten", 335, 206, 105, 30, $WS_GROUP)
    GUICtrlSetFont(-1, 12, 400, 0, "Palatino Linotype")
    $Button13 = GUICtrlCreateButton("TV-Programm", 250, 10, 105, 30)
    GUICtrlSetFont(-1, 11, 400, 0, "Palatino Linotype")
    $ButtonScreenshot = GUICtrlCreateButton("Screenshot", 335, 145, 105, 30)
    GUICtrlSetFont(-1, 11, 400, 0, "Palatino Linotype")
    $MonthCal1 = GUICtrlCreateMonthCal("", 240, 250, 200, 164)
    $Akkuzustand = GUICtrlCreateLabel("Ladezustand: " & $Akku & "%", 337, 180, 110, 25)
    GUICtrlSetFont(-1, 9, 400, 0, "Palatino Linotype")
    $Note = GUICtrlCreateEdit("", 15, 250, 200, 164)
    GUICtrlSetFont(-1, 20, 400, 0, "Script")
    GUICtrlSetColor(-1, 0x0000FF)
    GUICtrlSetBkColor(-1, 0xC0C0C0)
    GUICtrlSetCursor(-1, 5)
    $Statusbar = _GUICtrlStatusBar_Create($frmHaupt)
    _GUICtrlStatusBar_SetParts($Statusbar, $aParts)
    $Datum = _GUICtrlStatusBar_SetText($Statusbar, @MDAY & "." & @MON & "." & @YEAR, 1)
    $Zeit = _GUICtrlStatusBar_SetText($Statusbar, @HOUR & ":" & @MIN & ":" & @SEC, 2)
    ;~ $VolumeSlider = GUICtrlCreateSlider(414, 30, 25, 113, BitOR($GUI_SS_DEFAULT_SLIDER,$TBS_VERT,$TBS_TOP,$TBS_LEFT,$TBS_BOTH,$TBS_NOTICKS,$TBS_FIXEDLENGTH))
    ;~ GUICtrlSetLimit(-1, 100, 0)
    ;~ GUICtrlSetCursor (-1, 2)
    ;~ GUICtrlSetBkColor(-1,0x0066CC)
    ;~ $VolumeLabel = GUICtrlCreateLabel($VolumeSlider, 415, 11, 22, 17, $SS_CENTER)
    GUISetState(@SW_SHOW, $frmHaupt)
    #EndRegion ;Hauptform

    [/autoit] [autoit][/autoit] [autoit]

    AdlibRegister("_UpdateZeit", 1000)
    AdlibRegister("_UpdateAkku", 5000)

    [/autoit] [autoit][/autoit] [autoit]

    Else ;password falsch dann..
    $frmSplash = GUICreate("", 300, 150, -1, -1, BitOR($WS_SYSMENU, $WS_POPUP), 0) ;PopUp Checking password...
    $proSplash = GUICtrlCreateProgress(56, 104, 193, 9)
    GUICtrlCreateLabel("Checking password...", 97, 50)
    GUISetState(@SW_SHOW, $frmSplash)

    [/autoit] [autoit][/autoit] [autoit]

    For $i = 1 To 99 Step 9 ;Anhang Prozessbar
    GUICtrlSetData($proSplash, $i)
    Sleep(75)
    Next
    GUISetState(@SW_HIDE, $frmSplash)
    MsgBox(64, "Alert", "Wrong password!")
    Exit
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    #Region ;Youtube Playlist Form
    $frmYoutube = GUICreate("Youtube", 372, 403, -1, -1)
    GUISetIcon("C:\Program Files (x86)\TERA\tera-launcher.exe", -1)
    $Label1 = GUICtrlCreateLabel("Beats", 15, 10, 40, 26)
    GUICtrlSetFont(-1, 12, 400, 0, "Palatino Linotype")
    GUICtrlSetCursor(-1, 0)
    $Label2 = GUICtrlCreateLabel("Chiller", 205, 10, 49, 26)
    GUICtrlSetFont(-1, 12, 400, 0, "Palatino Linotype")
    GUICtrlSetCursor(-1, 0)
    $List1 = GUICtrlCreateList("", 8, 40, 161, 276)
    GUICtrlSetData(-1, "6AM (Aidan Dao & Anthony Taratsas Remix) - Shameless|Call The Police (Original Mix) - Giuseppe Visciano|Cigarette (Original Mix) - Giuseppe Visciano|Crack (Original Mix) - Gee G|De Ja Vu - Keesh & Scotty Lee|Drugs - Matty Lincoln|Ecstasy - Maguta|Ghost (Jakobs Whoomp Booty) - Alex Zand|I Dont Have A Job (Original Mix) - Mandragora|I Surrender (Original Mix) - Matty Lincoln|JetFuel (Original Mix) - Uberjakd & Joel Fletcher|Minimal Feeling - Luigi Peretti|Noises (Uberjakd VIP Mix) - Uberjakd ft Sarah Bodle|Pop Dat (Original Mix) - Ish Kariuki|The Octopuss - Johannes Heil & Len Faki|Two Faced (Original Mix) - Djuro|Ultra Dope (Original Mix) - Abel Nesian|What (Original mix) - Giuseppe Visciano|When The Bass Go - SCNDL|White Vox (Anthony Taratsas Remix) - Dont Stop|Yep! (Original Mix) - Daniel Healey")
    GUICtrlSetFont(-1, 10, 400, 0, "Palatino Linotype")
    GUICtrlSetBkColor(-1, 0xBFCDDB)
    GUICtrlSetCursor(-1, 0)
    $List2 = GUICtrlCreateList("", 200, 40, 161, 276)
    GUICtrlSetData(-1, "Abu Dhabi - Krizz Kaliko feat 816 Boyz|B.I.T.C.H. - Tech N9ne feat. T-Pain|Chin Check - N.W.A. feat. Snoop Dogg|Damn It Feels Good To Be A Taylor - Wiz Khalifa|Gin & Juice - Snoop Dogg|Girls like that - Krizz Kaliko feat. Bizzy|Grave Digga - Stevie Stone|I been Dope - Kutt Calhoun feat. Tech N9ne|Im SwizZzle Bitch - SwizZz (Rack City Remix)|Playback - Collie Buddz|Red Nose - Tech N9ne|Smoke the weed - Snoop Lion ft. Collie Buddz|So dope - Tech N9ne feat. Wrekonize, Twisted Insane & Snow Tha Product|Still D.R.E - Dr Dre feat. Snoop Dogg|STU - Wiz Khalifa|Switch Lanes - Tyga feat. The Game|Thats All She Wrote - T.I. feat. Eminem|The Kid Frankie - Wiz Khalifa|The tweak is heavy - Wiz Khalifa|Till Im Gone - Tinie Tempah feat. Wiz Khalifa|Whats my name - Snoop Dogg|Work Hard Play Hard - Wiz Khalifa")
    GUICtrlSetFont(-1, 10, 400, 0, "Palatino Linotype")
    GUICtrlSetBkColor(-1, 0xBFCDDB)
    GUICtrlSetCursor(-1, 0)
    $Button9 = GUICtrlCreateButton("Los!", 50, 326, 75, 25)
    $Button10 = GUICtrlCreateButton("Los!", 244, 326, 75, 25)
    $Button12 = GUICtrlCreateButton("Exit", 244, 370, 75, 25)
    $Button14 = GUICtrlCreateButton("Zurück", 50, 370, 75, 25)
    #EndRegion ;Youtube Playlist Form

    [/autoit] [autoit][/autoit] [autoit]

    #Region ;Internetseiten Form
    $Internetseiten = GUICreate("Internet - Favoriten", 260, 470, 200, 300)
    GUISetIcon("C:\Program Files (x86)\TERA\tera-launcher.exe", -1)
    $Button16 = GUICtrlCreateButton("Exit", 93, 440, 75, 25)
    GUICtrlSetFont(-1, 12, 400, 0, "Palatino Linotype")
    $Button15 = GUICtrlCreateButton("Playlist", 30, 25, 75, 25, $BS_CENTER)
    GUICtrlSetFont(-1, 12, 400, 0, "Palatino Linotype")
    $TreeView = GUICtrlCreateTreeView(30, 80, 200, 350, BitOR($GUI_SS_DEFAULT_TREEVIEW, $TVS_NOTOOLTIPS), $WS_EX_CLIENTEDGE)
    $TreeView_0 = GUICtrlCreateTreeViewItem("Google", $TreeView)
    $TreeView_1 = GUICtrlCreateTreeViewItem("Google Bilder", $TreeView_0)
    $TreeView_2 = GUICtrlCreateTreeViewItem("Google Übersetzer", $TreeView_0)
    $TreeView_3 = GUICtrlCreateTreeViewItem("Google Maps", $TreeView_0)
    $TreeView_4 = GUICtrlCreateTreeViewItem("Youtube", $TreeView)
    $TreeView_5 = GUICtrlCreateTreeViewItem("Facebook", $TreeView)
    $TreeView_6 = GUICtrlCreateTreeViewItem("AutoIT", $TreeView)
    $TreeView_7 = GUICtrlCreateTreeViewItem("Elitepvpers", $TreeView)
    $TreeView_8 = GUICtrlCreateTreeViewItem("Pirate Perfection", $TreeView)
    #EndRegion ;Internetseiten Form

    [/autoit] [autoit][/autoit] [autoit]

    #Region
    $frmScreenshot = GUICreate("Screenshot", 100, 61, 302, 218, $WS_MINIMIZEBOX)
    GUISetIcon("C:\Program Files (x86)\TERA\tera-launcher.exe", -1)
    $ButtonScreen = GUICtrlCreateButton("Screen!", 30, 3, 75, 25)
    GUICtrlSetFont(-1, 12, 400, 0, "Palatino Linotype")
    #EndRegion

    [/autoit] [autoit][/autoit] [autoit]

    GUISwitch($frmHaupt)

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $ButtonScreenshot
    GUISetState(@SW_SHOW, $frmScreenshot)
    GUISetState(@SW_HIDE, $frmHaupt)
    Case $Button14 ;Zurückbutton
    GUISetState(@SW_HIDE, $frmYoutube)
    GUISetState(@SW_SHOW, $frmHaupt)
    GUISetState(@SW_SHOW, $Internetseiten)
    Case $Button11 ;Favoritenbutton
    GUISetState(@SW_SHOW, $frmHaupt)
    GUISetState(@SW_SHOW, $Internetseiten)
    GUISwitch($frmHaupt, $Internetseiten)
    Case $Button12 ;Exitbutton
    GUISetState(@SW_SHOW, $frmHaupt)
    GUISetState(@SW_HIDE, $frmYoutube)
    GUISetState(@SW_HIDE, $Internetseiten)
    GUISwitch($frmHaupt)
    Case $Button15 ;Playlistbutton
    GUISetState(@SW_HIDE, $frmHaupt)
    GUISetState(@SW_HIDE, $Internetseiten)
    GUISetState(@SW_SHOW, $frmYoutube)
    Case $Button16 ;Exitbutton
    GUISetState(@SW_HIDE, $Internetseiten)
    Case $Button1 ;Facebookbutton
    _Func1()
    Case $Button2 ;Payday2 - Button
    _Func2()
    Case $Button3 ;Notepad++ - Button
    _Func3()
    Case $Button4 ;DC Universe Online - Button
    _Func4()
    Case $Button5 ;Losbutton Youtubesuche
    _Func5()
    Case $Button6 ;Losbutton Googlesuche
    _Func6()
    Case $Button7 ;Operabrowser - Button
    _Func7()
    Case $Button8 ;Skype - Button
    _Func8()
    Case $Button9 ;Losbutton Youtubeplaylist Beats
    _Func9()
    Case $Button10 ;Losbutton Youtubeplaylist Chiller
    _Func10()
    Case $Button13 ;TV-Programm - Button
    _Func13()
    Case $ButtonScreen
    _FuncScreen() ;Screenshot - Button
    ;~ Case $Exit
    ;~ _FuncExit()
    ;~ Case $Google
    ;~ _FuncGoogle()
    ;~ Case $VolumeSlider <===============================================================
    ;~ _FuncVolume()
    Case $TreeView_0
    _TreeView_Google()
    Case $TreeView_1
    _TreeView_GoogleBilder()
    Case $TreeView_2
    _TreeView_GoogleUEbersetzer()
    Case $TreeView_3
    _TreeView_GoogleMaps()
    Case $TreeView_4
    _TreeView_Youtube()
    Case $TreeView_5
    _TreeView_Facebook()
    Case $TreeView_6
    _TreeView_AutoIT()
    Case $TreeView_7
    _TreeView_Elitepvpers()
    Case $TreeView_8
    _TreeView_PiratePerfection()
    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func _UpdateAkku() ;Update Akku
    Global $SYSTEM_POWER_STATUS = DllStructCreate("byte;byte;byte;byte;int;int")
    Global $test = DllCall("kernel32.dll", "int", "GetSystemPowerStatus", _
    "ptr", DllStructGetPtr($SYSTEM_POWER_STATUS))
    If $test[0] Then
    Global $Akku = DllStructGetData($SYSTEM_POWER_STATUS, 3)
    EndIf
    GUICtrlSetData($Akkuzustand, "Ladezustand: " & $Akku & "%")
    _GUICtrlStatusBar_SetText($Statusbar, "Ladezustand: " & $Akku & "%")
    EndFunc ;==>_UpdateAkku

    [/autoit] [autoit][/autoit] [autoit]

    Func _UpdateZeit() ;Update Uhrzeit
    _GUICtrlStatusBar_SetText($Statusbar, @HOUR & ":" & @MIN & ":" & @SEC, 2)
    EndFunc ;==>_UpdateZeit

    [/autoit] [autoit][/autoit] [autoit]

    Func _Func1() ;Facebook starten
    MouseClick("", 0, 900)
    MouseClick("", 555, 353)
    EndFunc ;==>_Func1

    [/autoit] [autoit][/autoit] [autoit]

    Func _Func2() ;Payday 2 starten
    MouseClick("", 0, 900)
    MouseClick("", 1100, 231)
    EndFunc ;==>_Func2

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Func _Func3() ;Notepad++ starten
    Run("C:\Program Files (x86)\Notepad++\notepad++.exe")
    EndFunc ;==>_Func3

    [/autoit] [autoit][/autoit] [autoit]

    Func _Func4() ;DC Universe Online starten
    Run("C:\Users\Public\Sony Online Entertainment\Installed Games\DC Universe Online\LaunchPad.exe")
    EndFunc ;==>_Func4

    [/autoit] [autoit][/autoit] [autoit]

    Func _Func5() ;Youtubesuche starten
    Run("C:\Program Files (x86)\Opera\launcher.exe")
    WinWaitActive("Schnellwahl - Opera")
    Send("www.youtube.com")
    Send("{ENTER}")
    Sleep(6000)
    Send(GUICtrlRead($Input1))
    Send("{ENTER}")
    EndFunc ;==>_Func5

    [/autoit] [autoit][/autoit] [autoit]

    Func _Func6() ;Googlesuche starten
    Run("C:\Program Files (x86)\Opera\launcher.exe")
    WinWaitActive("Schnellwahl - Opera")
    Sleep(500)
    Send(GUICtrlRead($Input2))
    Send("{ENTER}")
    EndFunc ;==>_Func6

    [/autoit] [autoit][/autoit] [autoit]

    Func _Func7() ;Opera starten
    Run("C:\Program Files (x86)\Opera\launcher.exe")
    EndFunc ;==>_Func7

    [/autoit] [autoit][/autoit] [autoit]

    Func _Func8() ;Skype starten
    MouseClick("", 0, 900)
    MouseClick("", 264, 618)
    EndFunc ;==>_Func8

    [/autoit] [autoit][/autoit] [autoit]

    Func _Func9() ;Youtubeplaylist Beats
    Run("C:\Program Files (x86)\Opera\launcher.exe")
    WinWaitActive("Schnellwahl - Opera")
    Send("www.youtube.com")
    Send("{ENTER}")
    Sleep(5500)
    Send(GUICtrlRead($List1))
    Send("{ENTER}")
    Sleep(2000)
    MouseClick("", 689, 235)
    EndFunc ;==>_Func9

    [/autoit] [autoit][/autoit] [autoit]

    Func _Func10() ;Youtubeplaylist Chiller
    Run("C:\Program Files (x86)\Opera\launcher.exe")
    WinWaitActive("Schnellwahl - Opera")
    Send("www.youtube.com")
    Send("{ENTER}")
    Sleep(5500)
    Send(GUICtrlRead($List2))
    Send("{ENTER}")
    Sleep(2000)
    MouseClick("", 689, 235)
    EndFunc ;==>_Func10

    [/autoit] [autoit][/autoit] [autoit]

    Func _Func13() ;TV-Programm starten
    MouseClick("", 0, 900)
    MouseClick("", 560, 606)
    Sleep(1500)
    MouseClick("", 210, 242)
    EndFunc ;==>_Func13

    [/autoit] [autoit][/autoit] [autoit]

    Func _FuncExit() ;Menü, Start,Exit
    Exit
    EndFunc ;==>_FuncExit

    [/autoit] [autoit][/autoit] [autoit]

    Func _FuncGoogle() ;Menü, Hilfe,???
    Run("C:\Program Files (x86)\Opera\launcher.exe")
    WinWaitActive("Schnellwahl - Opera")
    Sleep(500)
    Send("www.google.de")
    Send("{ENTER}")
    EndFunc ;==>_FuncGoogle

    [/autoit] [autoit][/autoit] [autoit]

    ;~ Func _FuncVolume() ;Lautstärkenregler <== muss überarbeitet werden
    ;~ $SetVolume = GUICtrlRead($VolumeSlider)
    ;~ GUICtrlSetData($VolumeLabel,GUICtrlRead($VolumeSlider))
    ;~ Sleep(500)
    ;~ SoundSetWaveVolume($SetVolume)
    ;~ EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func _TreeView_Google() ;TreeView Google
    Run("C:\Program Files (x86)\Opera\launcher.exe")
    WinWaitActive("Schnellwahl - Opera")
    Sleep(500)
    Send("www.google.de")
    Send("{ENTER}")
    EndFunc ;==>_TreeView_Google

    [/autoit] [autoit][/autoit] [autoit]

    Func _TreeView_GoogleBilder() ;TreeView GoogleBilder
    Run("C:\Program Files (x86)\Opera\launcher.exe")
    WinWaitActive("Schnellwahl - Opera")
    Sleep(500)
    Send("http://www.google.de/imghp?hl=de&tab=wi&ei=wgB1U83GKYTe4QSt8YHIDg&ved=0CAQQqi4oAg")
    Send("{ENTER}")
    EndFunc ;==>_TreeView_GoogleBilder

    [/autoit] [autoit][/autoit] [autoit]

    Func _TreeView_GoogleUEbersetzer() ;TreeView GoogleÜbersetzer
    Run("C:\Program Files (x86)\Opera\launcher.exe")
    WinWaitActive("Schnellwahl - Opera")
    Sleep(500)
    Send("https://translate.google.de/?hl=de")
    Send("{ENTER}")
    EndFunc ;==>_TreeView_GoogleUEbersetzer

    [/autoit] [autoit][/autoit] [autoit]

    Func _TreeView_GoogleMaps() ;TreeView GoogleMaps
    Run("C:\Program Files (x86)\Opera\launcher.exe")
    WinWaitActive("Schnellwahl - Opera")
    Sleep(500)
    Send("https://www.google.de/maps/@48.6618471,9.0036649,8z?hl=de")
    Send("{ENTER}")
    EndFunc ;==>_TreeView_GoogleMaps

    [/autoit] [autoit][/autoit] [autoit]

    Func _TreeView_Youtube() ;TreeView Youtube
    Run("C:\Program Files (x86)\Opera\launcher.exe")
    WinWaitActive("Schnellwahl - Opera")
    Sleep(500)
    Send("http://www.youtube.com")
    Send("{ENTER}")
    EndFunc ;==>_TreeView_Youtube

    [/autoit] [autoit][/autoit] [autoit]

    Func _TreeView_Facebook() ;TreeView Facebook
    Run("C:\Program Files (x86)\Opera\launcher.exe")
    WinWaitActive("Schnellwahl - Opera")
    Sleep(500)
    Send("www.facebook.de")
    Send("{ENTER}")
    EndFunc ;==>_TreeView_Facebook

    [/autoit] [autoit][/autoit] [autoit]

    Func _TreeView_AutoIT() ;TreeView AutoIT
    Run("C:\Program Files (x86)\Opera\launcher.exe")
    WinWaitActive("Schnellwahl - Opera")
    Sleep(500)
    Send("www.autoit.de")
    Send("{ENTER}")
    EndFunc ;==>_TreeView_AutoIT

    [/autoit] [autoit][/autoit] [autoit]

    Func _TreeView_Elitepvpers() ;TreeView Elitepvpers
    Run("C:\Program Files (x86)\Opera\launcher.exe")
    WinWaitActive("Schnellwahl - Opera")
    Sleep(500)
    Send("www.elitepvpers.com")
    Send("{ENTER}")
    EndFunc ;==>_TreeView_Elitepvpers

    [/autoit] [autoit][/autoit] [autoit]

    Func _TreeView_PiratePerfection() ;TreeView PiratePerfection
    Run("C:\Program Files (x86)\Opera\launcher.exe")
    WinWaitActive("Schnellwahl - Opera")
    Sleep(500)
    Send("www.pirateperfection.com")
    Send("{ENTER}")
    EndFunc ;==>_TreeView_PiratePerfection

    [/autoit] [autoit][/autoit] [autoit]

    Func _FuncScreen() ;Take Screenshot
    ; Initialize GDI+ library
    _GDIPlus_Startup()

    [/autoit] [autoit][/autoit] [autoit]

    ; Capture screen
    $hBitmap = _ScreenCapture_Capture(@MyDocumentsDir & '\AutoItImage.bmp')

    [/autoit] [autoit][/autoit] [autoit]

    ; Load image and emboss text
    $hImage = _GDIPlus_ImageLoadFromFile(@MyDocumentsDir & '\AutoItImage.bmp')
    $hGraphic = _GDIPlus_ImageGetGraphicsContext($hImage)
    $hFamily = _GDIPlus_FontFamilyCreate("Arial")
    $hFont = _GDIPlus_FontCreate($hFamily, 16, 1)
    $tLayout = _GDIPlus_RectFCreate(0, 0)
    $hFormat = _GDIPlus_StringFormatCreate(2)
    $hBrush1 = _GDIPlus_BrushCreateSolid(0xA2FFFFFF)
    $hBrush2 = _GDIPlus_BrushCreateSolid(0xC4FF0000)
    $hPen = _GDIPlus_PenCreate(0xC4000000, 2)
    $aInfo = _GDIPlus_GraphicsMeasureString($hGraphic, $sString, $hFont, $tLayout, $hFormat)
    $iWidth = DllStructGetData($aInfo[0], "Width")
    $iHeight = DllStructGetData($aInfo[0], "Height")

    [/autoit] [autoit][/autoit] [autoit]

    _GDIPlus_GraphicsFillRect($hGraphic, 0, 0, $iWidth, $iHeight, $hBrush1)
    _GDIPlus_GraphicsDrawRect($hGraphic, 1, 1, $iWidth, $iHeight, $hPen)
    _GDIPlus_GraphicsDrawStringEx($hGraphic, $sString, $hFont, $aInfo[0], $hFormat, $hBrush2)

    [/autoit] [autoit][/autoit] [autoit]

    ; Save image
    _GDIPlus_ImageSaveToFile($hImage, @MyDocumentsDir & '\AutoItImage2.bmp')

    [/autoit] [autoit][/autoit] [autoit]

    ; Free resources
    _GDIPlus_PenDispose($hPen)
    _GDIPlus_BrushDispose($hBrush1)
    _GDIPlus_BrushDispose($hBrush2)
    _GDIPlus_StringFormatDispose($hFormat)
    _GDIPlus_FontDispose($hFont)
    _GDIPlus_FontFamilyDispose($hFamily)
    _GDIPlus_GraphicsDispose($hGraphic)
    _GDIPlus_ImageDispose($hImage)
    _GDIPlus_Shutdown()

    [/autoit] [autoit][/autoit] [autoit]

    ; Show image
    Run("MSPaint.exe " & '"' & @MyDocumentsDir & '\AutoItImage2.bmp"')

    [/autoit] [autoit][/autoit] [autoit]

    GUISetState(@SW_SHOW, $frmHaupt)
    GUISetState(@SW_HIDE, $frmScreenshot)
    EndFunc ;==>_FuncScreen

    [/autoit]

    Hier noch ein Beispiel:

    Spoiler anzeigen
    [autoit]


    #include <Date.au3>
    #include <GuiStatusBar.au3>

    [/autoit] [autoit][/autoit] [autoit]

    #region ### START GUI section ###
    $hGui = GUICreate("StatusBar", 585, 215, 418, 155)
    $Button1 = GUICtrlCreateButton("Button1", 56, 20, 200, 35)
    $Button2 = GUICtrlCreateButton("Button2", 56, 65, 200, 35)

    [/autoit] [autoit][/autoit] [autoit]

    $tatusBar = _GUICtrlStatusBar_Create($hGui)
    Global $tatusBar_PartsWidth[2] = [500, -1]
    _GUICtrlStatusBar_SetParts($tatusBar, $tatusBar_PartsWidth)
    _GUICtrlStatusBar_SetText($tatusBar, "hallo", 0)
    ;~ _GUICtrlStatusBar_SetText($tatusBar, @TAB & @TAB & "welt", 1)
    _GUICtrlStatusBar_SetMinHeight($tatusBar, 20)
    GUISetState(@SW_SHOW)
    #endregion ### END GUI section ###

    [/autoit] [autoit][/autoit] [autoit]

    ;~ _zeit()
    AdlibRegister("_zeit", 1000)

    [/autoit] [autoit][/autoit] [autoit]

    While True
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case -3 ;$GUI_EVENT_CLOSE
    Exit
    Case $Button1
    $txt = InputBox('Eingabe', 'Gib was ein....')
    _GUICtrlStatusBar_SetText($tatusBar, $txt, 0)
    Case $Button2
    $txt = _GUICtrlStatusBar_GetText($tatusBar, 0)
    MsgBox(64, 'Info', $txt)
    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func _zeit()
    Local $zeit = _DateTimeFormat(_NowCalc(), 5)
    _GUICtrlStatusBar_SetText($tatusBar, @TAB & $zeit, 1)
    ;~ _GUICtrlStatusBar_SetText($tatusBar, @TAB & @TAB & $zeit, 1)
    EndFunc ;==>_zeit

    [/autoit]