Sign in to follow this  
Followers 0
testingtest

Odd problem

13 posts in this topic

I don't understand why this isn't working. I even put a message box for testing the message box responses but the dll call doesn't

#include <GUIConstants.au3>
Global $hwnd
$hwnd = GUICreate("",200,600,@DesktopWidth-200,0,$WS_POPUP,$WS_EX_TOOLWINDOW)
GUISetBkColor(0)
$start = GUICtrlCreateLabel("Tool Bar",0,0,200,28)
GUICtrlSetFont(-1,18,500)
GUICtrlSetColor(-1,0xFFFFFF)
GUICtrlCreateGraphic(0,28,200,2)
GUICtrlSetBkColor(-1,0xFFFFFF)
$Command = GUICtrlCreateInput("Enter Command", 0, 32, 200, 20)
$Run = GUICtrlCreateButton("Run..." , 0 , 55 , 200 , 20)
$Slide = GUICtrlCreateButton(">" , 0 ,78  , 15 , 20)
GUICtrlCreateLabel("will hide the tool bar" , 25 , 80 ,200 ,28)
GUICtrlSetColor(-1,0xFFFFFF)
GUISetState(@SW_SHOW)
WinSetTrans($hwnd,"",150)

While 1
    $msg = GuiGetMsg()
    Select
        Case $msg = $Slide 
        ;   _Slide()
        MsgBox(0 , "" , "test")
        DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 500, "long", 0x00040001)

    EndSelect
WEnd

Share this post


Link to post
Share on other sites



Not too sure why that's not working, but perhaps consider using an "implode" effect:

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $GUI, "int", 1000, "long", 0x00050010)

Kurt


Awaiting Diablo III..

Share this post


Link to post
Share on other sites

#3 ·  Posted (edited)

Not too sure why that's not working, but perhaps consider using an "implode" effect:

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $GUI, "int", 1000, "long", 0x00050010)

Kurt

well the hole point of it was to slide to make it hidden more or less

[edited] yep implode works can someone help me figure why this one won't work though

Edited by testingtest

Share this post


Link to post
Share on other sites

#4 ·  Posted (edited)

Well, I have no clue how to solve your problem, but I'll throw some more suggestions at ya:

(Note: This example script is taken from Autoit 123)

$hwnd = GUICreate("", 300, 200)
GUICtrlCreateLabel("", 50, 50, 200, 50)
GUICtrlSetFont( -1, 16, 800)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000);fade-in
GUISetState()
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000);fade-out
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040001);slide in from left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050002);slide out to left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002);slide in from right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001);slide out to right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040004);slide-in from top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050008);slide-out to top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040008);slide-in from bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050004);slide-out to bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040005);diag slide-in from Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0005000a);diag slide-out to Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040006);diag slide-in from Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050009);diag slide-out to Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040009);diag slide-in from Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050006);diag slide-out to Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0004000a);diag slide-in from Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050005);diag slide-out to Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040010);explode
Sleep(1000)
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010);implode

Good luck :whistle:

Kurt

EDIT: Minor Spelling Mistake

Edited by _Kurt

Awaiting Diablo III..

Share this post


Link to post
Share on other sites

0x00040001 if for sliding *in* from left

Use 0x00050002 instead.

#)

I want it to look like this Visit My Website

I guess Ill have take his a part to get it to work with my gui

Share this post


Link to post
Share on other sites

It's quite simple to create that effect, keep in mind that it requires two GUI's. I will provide an simple example if I have the time.

Kurt


Awaiting Diablo III..

Share this post


Link to post
Share on other sites

It's quite simple to create that effect, keep in mind that it requires two GUI's. I will provide an simple example if I have the time.

Kurt

ok cool , if not I might be able to do it but no at my pc atm

Share this post


Link to post
Share on other sites

#9 ·  Posted (edited)

Here you go:

#include <GuiConstants.au3>

$hwnd = GuiCreate("test", 482, 92,-1, -1)
Global $pos = WinGetPos($hwnd)
$Button_1 = GuiCtrlCreateButton("Button1", 40, 20, 80, 40)
$Button_2 = GuiCtrlCreateButton("Button2", 140, 20, 80, 40)
$Button_3 = GuiCtrlCreateButton("Button3", 260, 20, 80, 40)
$SLIDEIN = GuiCtrlCreateButton("Slide it!", 390, 10, 90, 80)
GuiSetState()

$hwnd2 = GUICreate("", 40, 92, $pos[0]+482-40, $pos[1])
$SLIDEOUT = GUICtrlCreateButton("<<", 0,0,40,91)

While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        Exit
    Case $msg = $SLIDEIN
        Slide1()
    Case $msg = $SLIDEOUT
        Slide2()
    EndSelect
WEnd


Func Slide1()
    DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001);slide out to right
    GUISetState(@SW_HIDE, $hwnd)
    GUISetState(@SW_SHOW, $hwnd2)
EndFunc ;==>Slide_out


Func Slide2()
    DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002);slide in from right
    GUISetState(@SW_HIDE, $hwnd2)
    GUISetState(@SW_SHOW, $hwnd)
EndFunc ;==>Slide_inoÝ÷ Ù(hºWp¢¹)z·ÞrÙr*êí2Eæ¥7¶­²XzËh¶«mÙmêÞßÛ(ëajÛ%׬¶azWµ«­¢+Ø¥¹±Õ±ÐíÕ¥
½¹ÍѹÑ̹ÔÌÐì((ÀÌØí¡Ý¹ôÕ¥
ÉÑ ÅÕ½ÐíÑÍÐÅÕ½Ðì°ÐàÈ°äÈ°´Ä°´Ä¤)±½°ÀÌØíÁ½Ìô]¥¹ÑA½Ì ÀÌØí¡Ý¹¤(ÀÌØí    ÕÑѽ¹|ÄôÕ¥
Ñɱ
ÉÑ    ÕÑѽ¸ ÅÕ½Ðí   ÕÑѽ¸ÄÅÕ½Ðì°ÐÀ°ÈÀ°àÀ°ÐÀ¤(ÀÌØí   ÕÑѽ¹|ÈôÕ¥
Ñɱ
ÉÑ    ÕÑѽ¸ ÅÕ½Ðí   ÕÑѽ¸ÈÅÕ½Ðì°ÄÐÀ°ÈÀ°àÀ°ÐÀ¤(ÀÌØí ÕÑѽ¹|ÌôÕ¥
Ñɱ
ÉÑ    ÕÑѽ¸ ÅÕ½Ðí   ÕÑѽ¸ÌÅÕ½Ðì°ÈØÀ°ÈÀ°àÀ°ÐÀ¤(ÀÌØíM1%%8ôÕ¥
Ñɱ
ÉÑ    ÕÑѽ¸ ÅÕ½ÐíM±¥¥ÐÌÌìÅÕ½Ðì°ÌäÀ°ÄÀ°äÀ°àÀ¤)Õ¥MÑMÑÑ ¤((ÀÌØí¡Ý¹ÈôU%
ÉÑ ÅÕ½ÐìÅÕ½Ðì°ÐÀ°äÈ°ÀÌØíÁ½ÍlÁt°ÀÌØíÁ½ÍlÅt¤(ÀÌØíM1%=UPôU%
Ñɱ
ÉÑ    ÕÑѽ¸ ÅÕ½ÐìÐìÐìÅÕ½Ðì°À°À°ÐÀ°äĤ()]¡¥±Ä($ÀÌØíµÍôÕ¥Ñ5Í ¤(%M±Ð(%
ÍÀÌØíµÍôÀÌØíU%}Y9Q}
1=M($%á¥Ð(%
ÍÀÌØíµÍôÀÌØíM1%%8($%M±¥Ä ¤(%
ÍÀÌØíµÍôÀÌØíM1%=UP($%M±¥È ¤(%¹M±Ð)]¹(()Õ¹M±¥Ä ¤(±±
±° ÅÕ½ÐíÕÍÈÌȹ±°ÅÕ½Ðì°ÅÕ½Ðí¥¹ÐÅÕ½Ðì°ÅÕ½Ðí¹¥µÑ]¥¹½ÜÅÕ½Ðì°ÅÕ½Ðí¡Ý¹ÅÕ½Ðì°ÀÌØí¡Ý¹°ÅÕ½Ðí¥¹ÐÅÕ½Ðì°ÔÀÀ°ÅÕ½Ðí±½¹ÅÕ½Ðì°ÁàÀÀÀÔÀÀÀȤíͱ¥½ÕÐѼ±Ð(U%MÑMÑÑ¡M]}!%°ÀÌØí¡Ý¹¤(%U%MÑMÑÑ¡M]}M!=°ÀÌØí¡Ý¹È¤)¹Õ¹ìôôÐíM±¥}½ÕÐ(()Õ¹M±¥È ¤(±±
±° ÅÕ½ÐíÕÍÈÌȹ±°ÅÕ½Ðì°ÅÕ½Ðí¥¹ÐÅÕ½Ðì°ÅÕ½Ðí¹¥µÑ]¥¹½ÜÅÕ½Ðì°ÅÕ½Ðí¡Ý¹ÅÕ½Ðì°ÀÌØí¡Ý¹È°ÅÕ½Ðí¥¹ÐÅÕ½Ðì°ÄÀÀÀ°ÅÕ½Ðí±½¹ÅÕ½Ðì°ÁàÀÀÀÐÀÀÀĤíͱ¥¥¸É½´±Ð(U%MÑMÑÑ¡M]}!%°ÀÌØí¡Ý¹È¤(%U%MÑMÑÑ¡M]}M!=°ÀÌØí¡Ý¹¤)¹Õ¹ìôôÐíM±¥}¥¸

EDIT: Fixed 1 mistake in DllCall

Edited by _Kurt

Awaiting Diablo III..

Share this post


Link to post
Share on other sites

Here you go:

#include <GuiConstants.au3>

$hwnd = GuiCreate("test", 482, 92,-1, -1)
Global $pos = WinGetPos($hwnd)
$Button_1 = GuiCtrlCreateButton("Button1", 40, 20, 80, 40)
$Button_2 = GuiCtrlCreateButton("Button2", 140, 20, 80, 40)
$Button_3 = GuiCtrlCreateButton("Button3", 260, 20, 80, 40)
$SLIDEIN = GuiCtrlCreateButton("Slide it!", 390, 10, 90, 80)
GuiSetState()

$hwnd2 = GUICreate("", 40, 92, $pos[0]+482-40, $pos[1])
$SLIDEOUT = GUICtrlCreateButton("<<", 0,0,40,91)

While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        Exit
    Case $msg = $SLIDEIN
        Slide1()
    Case $msg = $SLIDEOUT
        Slide2()
    EndSelect
WEnd
Func Slide1()
    DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001);slide out to right
    GUISetState(@SW_HIDE, $hwnd)
    GUISetState(@SW_SHOW, $hwnd2)
EndFunc ;==>Slide_out
Func Slide2()
    DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002);slide in from right
    GUISetState(@SW_HIDE, $hwnd2)
    GUISetState(@SW_SHOW, $hwnd)
EndFunc ;==>Slide_inoÝ÷ Ù(hºWp¢¹)z·ÞrÙr*êí2Eæ¥7¶­²XzËh¶«mÙmêÞßÛ(ëajÛ%׬¶azWµ«­¢+Ø¥¹±Õ±ÐíÕ¥
½¹ÍѹÑ̹ÔÌÐì((ÀÌØí¡Ý¹ôÕ¥
ÉÑ ÅÕ½ÐíÑÍÐÅÕ½Ðì°ÐàÈ°äÈ°´Ä°´Ä¤)±½°ÀÌØíÁ½Ìô]¥¹ÑA½Ì ÀÌØí¡Ý¹¤(ÀÌØí    ÕÑѽ¹|ÄôÕ¥
Ñɱ
ÉÑ    ÕÑѽ¸ ÅÕ½Ðí   ÕÑѽ¸ÄÅÕ½Ðì°ÐÀ°ÈÀ°àÀ°ÐÀ¤(ÀÌØí   ÕÑѽ¹|ÈôÕ¥
Ñɱ
ÉÑ    ÕÑѽ¸ ÅÕ½Ðí   ÕÑѽ¸ÈÅÕ½Ðì°ÄÐÀ°ÈÀ°àÀ°ÐÀ¤(ÀÌØí ÕÑѽ¹|ÌôÕ¥
Ñɱ
ÉÑ    ÕÑѽ¸ ÅÕ½Ðí   ÕÑѽ¸ÌÅÕ½Ðì°ÈØÀ°ÈÀ°àÀ°ÐÀ¤(ÀÌØíM1%%8ôÕ¥
Ñɱ
ÉÑ    ÕÑѽ¸ ÅÕ½ÐíM±¥¥ÐÌÌìÅÕ½Ðì°ÌäÀ°ÄÀ°äÀ°àÀ¤)Õ¥MÑMÑÑ ¤((ÀÌØí¡Ý¹ÈôU%
ÉÑ ÅÕ½ÐìÅÕ½Ðì°ÐÀ°äÈ°ÀÌØíÁ½ÍlÁt°ÀÌØíÁ½ÍlÅt¤(ÀÌØíM1%=UPôU%
Ñɱ
ÉÑ    ÕÑѽ¸ ÅÕ½ÐìÐìÐìÅÕ½Ðì°À°À°ÐÀ°äĤ()]¡¥±Ä($ÀÌØíµÍôÕ¥Ñ5Í ¤(%M±Ð(%
ÍÀÌØíµÍôÀÌØíU%}Y9Q}
1=M($%á¥Ð(%
ÍÀÌØíµÍôÀÌØíM1%%8($%M±¥Ä ¤(%
ÍÀÌØíµÍôÀÌØíM1%=UP($%M±¥È ¤(%¹M±Ð)]¹)Õ¹M±¥Ä ¤(±±
±° ÅÕ½ÐíÕÍÈÌȹ±°ÅÕ½Ðì°ÅÕ½Ðí¥¹ÐÅÕ½Ðì°ÅÕ½Ðí¹¥µÑ]¥¹½ÜÅÕ½Ðì°ÅÕ½Ðí¡Ý¹ÅÕ½Ðì°ÀÌØí¡Ý¹°ÅÕ½Ðí¥¹ÐÅÕ½Ðì°ÔÀÀ°ÅÕ½Ðí±½¹ÅÕ½Ðì°ÁàÀÀÀÔÀÀÀȤíͱ¥½ÕÐѼ±Ð(U%MÑMÑÑ¡M]}!%°ÀÌØí¡Ý¹¤(%U%MÑMÑÑ¡M]}M!=°ÀÌØí¡Ý¹È¤)¹Õ¹ìôôÐíM±¥}½ÕÐ)Õ¹M±¥È ¤(±±
±° ÅÕ½ÐíÕÍÈÌȹ±°ÅÕ½Ðì°ÅÕ½Ðí¥¹ÐÅÕ½Ðì°ÅÕ½Ðí¹¥µÑ]¥¹½ÜÅÕ½Ðì°ÅÕ½Ðí¡Ý¹ÅÕ½Ðì°ÀÌØí¡Ý¹È°ÅÕ½Ðí¥¹ÐÅÕ½Ðì°ÄÀÀÀ°ÅÕ½Ðí±½¹ÅÕ½Ðì°ÁàÀÀÀÐÀÀÀĤíͱ¥¥¸É½´±Ð(U%MÑMÑÑ¡M]}!%°ÀÌØí¡Ý¹È¤(%U%MÑMÑÑ¡M]}M!=°ÀÌØí¡Ý¹¤)¹Õ¹ìôôÐíM±¥}¥¸

EDIT: Fixed 1 mistake in DllCall

thanks lol I just figured out how to do it. I really am thankful though and will compare them bet yours is better :whistle:

Share this post


Link to post
Share on other sites

No problem, please make sure to use WinGetPos for the first GUI, since people may have different resolutions.

$pos = WinGetPos($hwnd)

$hwnd2 = GUICreate("", 40, 92, $pos[0], $pos[1])

Kurt

Awaiting Diablo III..

Share this post


Link to post
Share on other sites

#12 ·  Posted (edited)

No problem, please make sure to use WinGetPos for the first GUI, since people may have different resolutions.

Kurt

well this is what I got so far still need finish the slider,
#include <GUIConstants.au3>
Global $hwnd , $hwnd2, $hide_state = 0, $btn_state = 0, $side = "right"
$hwnd = GUICreate("" , 200 , 600 , @DesktopWidth-200 , 0 , $WS_POPUP, $WS_EX_TOOLWINDOW)
GUISetBkColor(0)
$start = GUICtrlCreateLabel("Tool Bar",0,0,200,28)
GUICtrlSetFont(-1,18,500)
GUICtrlSetColor(-1,0xFFFFFF)
GUICtrlCreateGraphic(0,28,200,2)
GUICtrlSetBkColor(-1,0xFFFFFF)
$Command = GUICtrlCreateInput("Enter Command", 0, 32, 200, 20)
$Run = GUICtrlCreateButton("Run..." , 0 , 55 , 200 , 20)
$Slide = GUICtrlCreateButton(">" , 0 ,78  , 15 , 20)
GUICtrlCreateLabel("will hide the tool bar" , 25 , 80 ,200 ,28)
GUICtrlSetColor(-1,0xFFFFFF)
GUISetState(@SW_SHOW)
WinSetTrans($hwnd,"",150)

While 1
    $msg1 = GUIGetMsg()
    If $msg1 = $Slide Then Slide_out()
WEnd






Func _Slider()
$hwnd2 = GuiCreate("" , 30 , @DesktopHeight , @DesktopWidth-30 , 0 , $WS_POPUP , $WS_EX_TOOLWINDOW)
$Slide = GUICtrlCreateButton("<" , 0 , 0 , 30 , @DesktopHeight)
GuiSetState(@SW_SHOW)
While 1
$msg1 = GuiGetMsg()
If $msg1 = $Slide Then Slide_in()
WEnd
    
    
    ;GUISetState(@SW_SHOW, $hwnd2)
    ;WinActivate($hwnd2)
    ;WinWaitActive($hwnd2)
EndFunc


Func Slide_in()
    $hide_state = 0
    GUISetState(@SW_HIDE, $hwnd2)
;   If $side = "left" Then DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd2, "int", 500, "long", 0x00040001);slide in from left
    If $side = "right" Then DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd2, "int", 500, "long", 0x00040002);slide in from right
    WinActivate($hwnd)
    WinWaitActive($hwnd)
EndFunc   ;==>Slide_in

Func Slide_out()
    $hide_state = 1
    ;Btn_reset()
    ;If $side = "left" Then DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 500, "long", 0x00050002);slide out to left
    If $side = "right" Then DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 500, "long", 0x00050001);slide out to right
    _Slider()
EndFunc   ;==>Slide_out

so this doesn't fit your resolution?

[edited] lol when I release the final version theres going to be a lot of credits

Edited by testingtest

Share this post


Link to post
Share on other sites

Sorry for the late reply, I had been gone all night. You should have been able to study my script & figure out exactly what you need to do for this to work. You had a couple of mistakes with the GUI_HIDE & GUI_SHOW, and you shouldn't re-create a new GUI & start a new loop everytime you want it to slide. What I did makes a lot more sense: I simply create the secondary GUI before-hand & did not "show" or set it's state. Always try to keep everything in one loop, it makes things easier (in my mind).

Here's the fixed up version:

;First we must understand a couple of things,
;this requires 2 GUI's and we are basically
;switching states of the GUI's to show and hide
;each time the slide button is pressed.

#include <GUIConstants.au3>
Global $hwnd , $hwnd2, $hide_state = 0, $btn_state = 0, $side = "right"
$hwnd = GUICreate("" , 200 , 600 , @DesktopWidth-200 , 0 , $WS_POPUP, $WS_EX_TOOLWINDOW)

Global $pos = WinGetPos($hwnd) ;<-- Note that we get the position of the GUI
WinSetOnTop($hwnd, "", 1)      ;<-- We keep the GUI on top of all windows

GUISetBkColor(0)
$start = GUICtrlCreateLabel("Tool Bar",0,0,200,28)
GUICtrlSetFont(-1,18,500)
GUICtrlSetColor(-1,0xFFFFFF)
GUICtrlCreateGraphic(0,28,200,2)
GUICtrlSetBkColor(-1,0xFFFFFF)
$Command = GUICtrlCreateInput("Enter Command", 0, 32, 200, 20)
$Run = GUICtrlCreateButton("Run..." , 0 , 55 , 200 , 20)
$Slide = GUICtrlCreateButton(">" , 0 ,78  , 15 , 20)
GUICtrlCreateLabel("will hide the tool bar" , 25 , 80 ,200 ,28)
GUICtrlSetColor(-1,0xFFFFFF)
GUISetState()
WinSetTrans($hwnd,"",150)

$hwnd2 = GuiCreate("" , 30, 600, @DesktopWidth-30, 0, $WS_POPUP , $WS_EX_TOOLWINDOW) ;<- Fixed position & size
$Slide2 = GUICtrlCreateButton("<", 0, 0, 30 , 600) ;<- Fixed position & size
WinSetOnTop($hwnd2, "", 1)      ;<-- We keep the GUI on top of all windows IF the gui is actually "showing"

While 1
    $msg1 = GUIGetMsg()
    Select
        Case $msg1 = $Slide
            Slide_out()
        Case $msg1 = $Slide2 ;Even though this button may not be displayed at times, we still add it in the loop
            Slide_in()
        Case $msg1 = $GUI_EVENT_CLOSE
            Exit
    EndSelect
WEnd

Func Slide_in() ;If the button is pressed in the MAIN gui, we will do the following:

;   If $side = "left" Then DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd2, "int", 500, "long", 0x00040001);slide in from left
    If $side = "right" Then DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 500, "long", 0x00040002);slide in from right
    GUISetState(@SW_HIDE, $hwnd2); After the slide effect is done, we must then actually HIDE the secondary gui
    GUISetState(@SW_SHOW, $hwnd);And of course SHOW the main GUI
EndFunc   ;==>Slide_in

Func Slide_out() ;If the button is pressed in the secondary gui, we will do the following:
    
    ;Btn_reset()
    ;If $side = "left" Then DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 500, "long", 0x00050002);slide out to left
    If $side = "right" Then DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 500, "long", 0x00050001);slide out to right
    GUISetState(@SW_HIDE, $hwnd); After the slide effect is done, we must then actually HIDE the main gui
    GUISetState(@SW_SHOW, $hwnd2) ;And of course SHOW the secondary GUI
EndFunc   ;==>Slide_out

Kurt


Awaiting Diablo III..

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