Sign in to follow this  
Followers 0
Tricky_haha

Hider(GUI)

6 posts in this topic

;some of the stuff in this sript Fuzi0h helped me with

#include    <guiconstants.au3>

HotKeySet("{PGDN}", "hide")
HotKeySet("{PGUP}", "Unhide")
    
Func hide()
    WinSetState("Hider", "", @SW_HIDE)
EndFunc

Func unhide()
    WinSetState("Hider", "", @SW_SHOW)
EndFunc

GuiCreate("Hider",180,190)

$exitmenu = GUICtrlCreateMenuitem ("&Exit", -1)

$helpmenu = GUICtrlCreateMenu("&?")
$helpitem = GUICtrlCreateMenuitem("Info",$helpmenu)

GUICtrlCreateLabel("Hider",10,10)
GUICtrlSetColor(-1, 0xef05cb0)
GUICtrlCreateLabel(";By Peter Sørensen",10,157)
GUICtrlSetColor(-1, 0xef05cb0)

GUICtrlCreateGroup ("OGame", 10, 25, 95, 55)
$1=GUICtrlCreateRadio("Hide", 20,38,45,20)
$2=GUICtrlCreateRadio("Unhide", 20,55,55,20)

GUICtrlCreateGroup("Bubble Trouble", 10,90,95,55)
$3=GUICtrlCreateRadio("Hide", 20,103,45,20)
$4=GUICtrlCreateRadio("Unhide",20,122,55,20)

$5=GUICtrlCreateButton("EXIT",110,145,70,25)

GUISetState()
while 1
    $msg = GUIGetMsg()
    Select
    case $msg = $1
        WinSetState("OGame.dk", "", @SW_HIDE)
    Case $msg = $2
        WInsetstate("OGame.dk", "", @SW_SHOW)
    case $msg = $3  
        WinSetState("Bubble Trouble", "", @SW_HIDE)
    case $msg = $4
        WinSetState("Bubble Trouble", "", @SW_SHOW)
    EndSelect
    IF $msg = $GUI_EVENT_CLOSE Or $msg = $5 or $msg = $exitmenu Then ExitLoop
    If $msg = $helpitem Then Msgbox(0,"Info","This is a GUI Hider" & @CRLF & "" & @CRLF & "To hide the Games click on the eyes" & @CRLF & "in the messagebox" & @CRLF & "" & @CRLF & "To hide the hider press Page Down " & @CRLF & "And to unhide it press Page Up")
WEnd

Share this post


Link to post
Share on other sites



Nice little hider :o


My Scripts:Radioblog Club Music DownloaderOther stuff:Fun movieIm serious read the help file it helps :PFight 'Till you drop. Never stop, You Cant give up. Til you reach the top Fight! you’re the best in town Fight!

Share this post


Link to post
Share on other sites

Thx Niko..... :o

Share this post


Link to post
Share on other sites

Rather than using the "If" statements... why nopt continue the "Case" statements...

You should also run "Tidy" to clean up your scripts

8)


NEWHeader1.png

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0