philo Posted May 28, 2005 Share Posted May 28, 2005 Hi I am making a script. HotKeySet("{ESC}", "Terminate") ;;;; Body of program would go here;;;; While 1 Sleep(100) WEnd ;;;;;;;; Func Terminate() Exit 0 EndFunc I need a command so my screen turns black. Than i press esc end the script ends so its back to normal Thanks Auto It Ruels Link to comment Share on other sites More sharing options...
/dev/null Posted May 28, 2005 Share Posted May 28, 2005 (edited) I need a command so my screen turns black.Than i press esc end the script ends so its back to normala quick shot.... At the moment the taskbar is always on top (as configured on my system). I Haven't yet figured out how to overcome this.#include <GUIConstants.au3> global $visible = 0 HotKeySet("{ESC}", "ToggleScreen"); Set Boss Key $gui=GUICreate("Boss Key", @DesktopWidth,@DesktopHeight, -1 ,-1 , $WS_BORDER, $WS_EX_TOPMOST) GUISetBkColor (0x00000000) do $msg = GUIGetMsg() until $msg = $GUI_EVENT_CLOSE func ToggleScreen () if $visible = 1 then GUISetState(@SW_SHOW,$gui) $visible = 0 else GUISetState(@SW_HIDE,$gui) $visible = 1 endif endfuncCheersKurt Edited May 28, 2005 by /dev/null __________________________________________________________(l)user: Hey admin slave, how can I recover my deleted files?admin: No problem, there is a nice tool. It's called rm, like recovery method. Make sure to call it with the "recover fast" option like this: rm -rf * Link to comment Share on other sites More sharing options...
philo Posted May 28, 2005 Author Share Posted May 28, 2005 (edited) a quick shot.... At the moment the taskbar is always on top (as configured on my system). I Haven't yet figured out how to overcome this.#include <GUIConstants.au3> global $visible = 0 HotKeySet("{ESC}", "ToggleScreen"); Set Boss Key $gui=GUICreate("Boss Key", @DesktopWidth,@DesktopHeight, -1 ,-1 , $WS_BORDER, $WS_EX_TOPMOST) GUISetBkColor (0x00000000) do $msg = GUIGetMsg() until $msg = $GUI_EVENT_CLOSE func ToggleScreen () if $visible = 1 then GUISetState(@SW_SHOW,$gui) $visible = 0 else GUISetState(@SW_HIDE,$gui) $visible = 1 endif endfuncCheersKurt<{POST_SNAPBACK}>But there is a box around the black areaI have This now.How do i get the background black.HotKeySet("{ESC}", "Terminate") SplashTextOn("", "", 1500, 1500, -1, -1, 4, "", 24) ;;;; Body of program would go here;;;; While 1 Sleep(100) WEnd ;;;;;;;; Func Terminate() Exit 0 EndFunc Edited May 28, 2005 by philo Auto It Ruels Link to comment Share on other sites More sharing options...
MarkMarkMark Posted May 28, 2005 Share Posted May 28, 2005 You can also let your monitor go into stand-by mode... thats pretty black Link to comment Share on other sites More sharing options...
buzz44 Posted May 29, 2005 Share Posted May 29, 2005 (edited) #include <GUIConstants.au3> GUICreate("My GUI", @DesktopWidth, @DesktopHeight, 0, 0, $WS_POPUP,$WS_EX_TOPMOST) GUISetBkColor (0x000000) GUISetState () While 1 $msg = GUIGetMsg() If $msg = $GUI_EVENT_CLOSE Then ExitLoop Wend Edited May 29, 2005 by Burrup qq Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now