Hallo.
Ich dachte mir, bei einer so guten ID sollte bischen Farbe ins Spiel kommen.
Hintergrund: Schwarz und darauf ein Foto oder Logo.
Das ist dabei rausgekommen und mein PC ist gerade frisch gestartet.
Spoiler anzeigen
#include<GUIConstants.au3>
#include<Misc.au3>
;--------------------------------------------------------------------------------------------------------------------------------------------------
;Dieses Script:
; - startet eine Oberfläche mit dem aktuellen Desktopbild
; - dieses kann nur durch korrekte Eingabe des Passwortes verlassen werden
; - wird eine andere Tastenkombination, Win-Taste, Programm gestartet, usw. wird diese GUI automatisch wieder in den Vordergrund geholt
; - Es werden bestimmt Fenster automatisch geschlossen
;--------------------------------------------------------------------------------------------------------------------------------------------------
;************************
;******* Passwort *******
$passwort = "xxx"
;************************
Opt("WinTitleMatchMode", 2)
Opt("TrayIconHide", 1)
$gui_titel = "Sperren"
$gui = GUICreate($gui_titel, -1, -1, 0, 0, BitOr($WS_POPUP, $WS_MAXIMIZE))
GUISetBkColor(0x000000)
GUICtrlCreatePic("logo.jpg", -1, -1, 200, 200)
$input = GUICtrlCreateInput("", @DesktopWidth/2, @DesktopHeight/2, 50, -1, $ES_PASSWORD)
GUICtrlSetState($input, $GUI_HIDE)
$desktop_reg = RegRead("HKEY_CURRENT_USER\Control Panel\Desktop", "Wallpaper")
GUICtrlCreatePic($desktop_reg, 0, 0, @DesktopWidth, @DesktopHeight)
GUISetState()
While 1
If Not WinActive($gui_titel) Then WinActivate($gui_titel)
If GUICtrlRead($input) = $passwort Then Exit
If WinExists("Windows Task-Manager") Then WinClose("Windows Task-Manager")
If WinExists("Internet Explorer") Then
WinClose("Internet Explorer")
If WinExists("Internet Explorer", "&Registerkarten schließen") Then ControlClick("Internet Explorer", "&Registerkarten schließen", 6)
EndIf
If WinExists("Outlook Express") Then WinClose("Outlook Express")
Wend
Die Idee dachte ich sei einfach zu löschen. Backcolor und Bild als GUI setzen und das war's. Aber Butterblume oder Pustekuchen. Dat wollte gar nicht.
LG Lina