论坛 › 已解决问题区 › 打开关闭脚本时的一种效果……【已解决】

xhf100 发表于 2010-3-14 12:14:56

打开关闭脚本时的一种效果……【已解决】

本帖最后由 xhf100 于 2010-3-18 14:45 编辑

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 122, 65, 192, 124)
$Button1 = GUICtrlCreateButton("Button1", 24, 16, 75, 25)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $Form1, "int", 1000, "long", 0x00000008)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
   Exit
Case $Button1
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $Form1, "int", 1000, "long", 0x00010004)
Exit
EndSwitch
WEnd

打开效果：从下到上。
关闭效果：从上到下。

xhf100 发表于 2010-3-14 12:21:45

还有一个关闭窗口逐渐消失的脚本，也不会用。。。。不知道放在脚本的什么地方。。


$hwnd = GUICreate("渐变窗口", 400, 300)
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000)
GUISetState()
Sleep(2000)
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000)

xhf100 发表于 2010-3-14 13:48:27

关闭窗口逐渐消失的脚本，开打的时候逐渐清晰倒是可以，但是关闭关闭窗口逐渐消失，不知道怎么用。

afan 发表于 2010-3-14 13:51:32

语无伦次……

水木子 发表于 2010-3-14 13:53:54

现在帮忙解决问题———基本靠猜！:face (31):

sxd 发表于 2010-3-14 13:59:49

我严重支持楼上两楼

itljl 发表于 2010-3-14 16:09:55

退出的话
将
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000)
放在
exit前面。

haorui658 发表于 2010-3-14 16:11:15

楼主想达到什么样的目的?我猜测是想把"单击窗口退出"这段代码放到他的源码里面

xhf100 发表于 2010-3-18 14:42:32

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 122, 65, 192, 124)
$Button1 = GUICtrlCreateButton("Button1", 24, 16, 75, 25)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $Form1, "int", 1000, "long", 0x00000008)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
   Exit
Case $Button1
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $Form1, "int", 1000, "long", 0x00010004)
Exit
EndSwitch
WEnd

打开效果：从下到上。
关闭效果：从上到下。

查看完整版本: 打开关闭脚本时的一种效果……【已解决】