Boss-Key: alles verstecken

  • Dieses Tool schützt die Privatspäre, indem es auf Tastenkombination alle Fenster versteckt/wieder anzeigt.
    Vorsicht: Nicht mit Nero o.ä. verwenden, Tool basiert auf Titeln!
    Hier:

    Spoiler anzeigen
    [autoit]

    #NoTrayIcon
    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_icon=C:\system.space\Icons\Attention2.ico
    #AutoIt3Wrapper_outfile=boss.exe
    #AutoIt3Wrapper_Res_Comment=http://glilabors.de
    #AutoIt3Wrapper_Res_Description=GLi Boss
    #AutoIt3Wrapper_Res_Fileversion=0.1.0.1
    #AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y
    #AutoIt3Wrapper_Res_LegalCopyright=http://glilabors.de
    #AutoIt3Wrapper_Res_Field=Made by|L3viathan
    #AutoIt3Wrapper_Res_Field=Company|GLi Labors inrternational
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #include <Array.au3>
    HotkeySet("#q","_hide")
    global $array[1]
    func _hide()
    $var = WinList()
    For $i = 1 to $var[0][0]
    If $var[$i][0] <> "" AND IsVisible($var[$i][1]) AND $var[$i][0] <> "Program manager" Then
    WinSetState($var[$i][0],"",@SW_HIDE)
    _Arrayadd($array,$var[$i][0])
    EndIf
    Next
    HotKeySet("#q","_q")
    EndFunc
    Func IsVisible($handle)
    If BitAnd( WinGetState($handle), 2 ) Then
    Return 1
    Else
    Return 0
    EndIf
    EndFunc
    func _q()
    for $b in $array
    WinSetState($b,"",@SW_SHOW)
    next
    Exit
    EndFunc
    while True
    sleep(100)
    WEnd

    [/autoit]

    Twitter: @L3viathan2142
    Benutze AutoIt persönlich nicht mehr, da ich keinen Windows-Rechner mehr besitze.

    2 Mal editiert, zuletzt von L3viathan2142 (23. Dezember 2008 um 17:07)

  • Das Script funktioniert aber in der Art nicht. Jedenfalls nicht bei mir.

    1. Die Zeile 18 'global $once=False' muss wohl außerhalb der Funktion, sonst führt es in Zeile 42 beim ersten Lauf zu einer nicht deklarierten Variable.
    2. Wenn ich es wie unter 1. angegeben anpasse, beendet sich das Script aber in Zeile 42 sofort.

    Zur Nutzung dieses Forum's, ist ein Übersetzer für folgende Begriffe unerlässlich:

    "On-Bort, weier, verscheiden, schädliges, Butten steyling, näckstet, Parr, Porblem, scripe, Kompletenz, harken, manuel zu extramieren, geckukt, würglich, excell, acces oder Compilevorgeng"

  • Wobei jetzt die Variable $once komplett überflüssig ist, oder ?

    Aber es läuft so wenigstens...

    Zur Nutzung dieses Forum's, ist ein Übersetzer für folgende Begriffe unerlässlich:

    "On-Bort, weier, verscheiden, schädliges, Butten steyling, näckstet, Parr, Porblem, scripe, Kompletenz, harken, manuel zu extramieren, geckukt, würglich, excell, acces oder Compilevorgeng"