Was ist falsch, warum das fenster immer zu geht?
Spoiler anzeigen
#region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=FILER.ICO
#AutoIt3Wrapper_Outfile=WE V0.12.exe
#AutoIt3Wrapper_Compression=0
#AutoIt3Wrapper_Res_Fileversion=0.0.0.20
#AutoIt3Wrapper_Res_FileVersion_AutoIncrement=y
#AutoIt3Wrapper_Run_Tidy=y
#endregion ;**** Directives created by AutoIt3Wrapper_GUI ****
; *** Start added by AutoIt3Wrapper ***
#include <ListViewConstants.au3>
#include <GUIConstants.au3>
#include <ProgressConstants.au3>
#include <GuiListView.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Constants.au3>
#include <GuiButton.au3>
#include <GuiStatusBar.au3>
#include <GDIPlus.au3>
#include <BkPic.au3>
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <ListboxConstants.au3>
#include <EditConstants.au3>
#include <ProgressConstants.au3>
#include <UpdownConstants.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <DateTimeConstants.au3>
#include <TreeviewConstants.au3>
#include <ListviewConstants.au3>
Dim $vlist
Dim $hlist
Dim $abort
Dim $flash
Dim $memval
$font = "Arial"
Global $defaultstatus = "Ready"
Global $status
HotKeySet("^+!{f8}", "mma")
$timer = 1
$me = "Window Ender"
$ver = "v0.12"
$vlist = 0
$hlist = 0
$s = 0
#region AutoIt-Optionen
Opt('GUIOnEventMode', 1)
Opt('MustDeclareVars', 1)
Opt('GUICloseOnESC', 1)
#endregion AutoIt-Optionen
Opt("TrayMenuMode", 1) ; Default tray menu items (Script Paused/Exit) will not be shown.
Opt("GUIDataSeparatorChar", "")
Global $start_check = WinGetProcess($me)
If ProcessExists($start_check) Then
Global $ok = MsgBox(4 + 8192 + 262144 + 48, $me, "Fenster Ender läuft bereits , wollen Sie die 1. Instanz erneut öffnen ? ", 3)
If $ok = 7 Then Exit
If $ok = 6 Then
ProcessClose($start_check)
EndIf
EndIf
Global $bSaveBinary, $sB64String, $file
_Base64String($bSaveBinary = False)
_Base64Decode($sB64String)
Global $max = TrayCreateItem("Anzeigen")
TrayItemSetState($max, $TRAY_DISABLE)
Global $min = TrayCreateItem("Verstecken")
TrayCreateItem("", -1)
Global $tshutdown = TrayCreateItem("Herunterfahren")
Global $trestart = TrayCreateItem("Neustart")
TrayCreateItem("", -1)
Global $aboutitem = TrayCreateItem("Über uns")
TrayCreateItem("")
Global $exititem = TrayCreateItem("Beenden")
TraySetState()
TraySetClick(16)
TrayItemSetState($min, $TRAY_DEFAULT)
Global $gui = GUICreate($me, 650, 500, -1, -1)
Global $gui = GUICtrlCreateMenu("&Datei")
Global $menu_exit = GUICtrlCreateMenuItem("Beenden", $file)
Global $view = GUICtrlCreateMenu("View")
Global $menu_hide = GUICtrlCreateMenuItem("Verbergen", $view)
GUICtrlCreateMenuItem("", $view)
Global $viewstatus = GUICtrlCreateMenuItem("Statusbar", $view)
GUICtrlSetState(-1, $GUI_CHECKED)
Global $help = GUICtrlCreateMenu("Hilfe")
Global $menu_about = GUICtrlCreateMenuItem("Über Uns", $help)
Global $visibleprogramlist = GUICtrlCreateListView("Geöffnetes Fenster ", 10, 35, 180, 300, $LVS_SORTASCENDING + $LVS_REPORT + $LVS_SINGLESEL)
Global $hiddenprogramlist = GUICtrlCreateListView("Geöffnetes Fenster ", 200, 35, 180, 300, $LVS_SORTASCENDING + $LVS_REPORT + $LVS_SINGLESEL)
Global $vscan = GUICtrlCreateButton("Scannen", 398, 55, 80)
Global $vhide = GUICtrlCreateButton("Verbergen", 398, 85, 80)
Global $vshow = GUICtrlCreateButton("Anzeigen", 398, 115, 80)
Global $hscan = GUICtrlCreateButton("Scannen", 502, 55, 80)
Global $hhide = GUICtrlCreateButton("Verbergen", 502, 85, 80)
Global $hshow = GUICtrlCreateButton("Anzeigen", 502, 115, 80)
Global $sys = GUICtrlCreateButton("System-Eigenschaften", 391, 250, 97)
Global $msconfig = GUICtrlCreateButton("MS Config", 488, 250, 97)
Global $sfc = GUICtrlCreateButton("System-Datei überprüfen", 391, 275, 97)
Global $regedit = GUICtrlCreateButton("Registry Editor", 488, 275, 97)
Global $tmgr = GUICtrlCreateButton("Task Manager", 391, 300, 97)
Global $compmgmt = GUICtrlCreateButton("Comp. Manager.", 488, 300, 97) ;compmgmt.msc
;~ GUICtrlSetFont($compmgmt,7.5,350)
Global $rstrui = GUICtrlCreateButton("Systemwiederherstellung", 391, 325, 97)
Global $eventvwr = GUICtrlCreateButton("Ereignisanzeige", 488, 325, 97)
Global $shutdown = GUICtrlCreateButton("Herunterfahren erzwingen", 391, 370, 97)
Global $restart = GUICtrlCreateButton("Neustart erzwingen", 488, 370, 97)
GUICtrlCreateGroup("Sichtbare Fenster", 388, 35, 100, 110)
GUICtrlCreateGroup("Alle Fenster", 492, 35, 100, 110)
GUICtrlCreateGroup("Sichtbare Fenster", 13, 340, 174, 100)
GUICtrlCreateGroup("Alle Fenster", 203, 340, 174, 100)
GUICtrlCreateGroup("Windows Tools", 388, 230, 200, 170)
$memval = "0"
Global $memgroup = GUICtrlCreateGroup("Speicherverbrauch : (" & $memval & "%) ", 388, 150, 200, 55)
Global $membar = GUICtrlCreateProgress(393, 170, 190, 25)
Global $vend = GUICtrlCreateButton("End Window", 40, 355, 120, 23)
Global $vpend = GUICtrlCreateButton("Prozess beenden", 40, 382, 120, 23)
Global $vclear = GUICtrlCreateButton("Liste leeren", 40, 410, 120, 23)
Global $hend = GUICtrlCreateButton("End Window", 230, 355, 120, 23)
Global $hpend = GUICtrlCreateButton("Prozess beenden", 230, 382, 120, 23)
Global $hclear = GUICtrlCreateButton("Liste leeren", 230, 410, 120, 23)
GUICtrlCreateLabel("Sichtbare Fenster", 55, 10, -1, -1, $WS_BORDER + $SS_CENTER)
GUICtrlCreateLabel("Alle Fenster", 255, 10, -1, -1, $WS_BORDER + $SS_CENTER)
Global $priority = WinGetProcess($me)
ProcessSetPriority($priority, 4)
background(-1)
GUICtrlSetImage(-1, @ScriptDir & "\windowslive.jpg")