新栏开章, 凑个热闹,无边框渐大渐小(扩大/缩小)的效果 GUI 效果

131738 · 发表于 2010-2-6 19:47:12

本帖最后由 131738 于 2010-2-7 21:33 编辑

#include <WindowsConstants.au3>

;以下建立主窗口
$form = GUICreate("", 800, 600, -1, -1 ,BitOR($WS_POPUP,$WS_CLIPSIBLINGS))
        DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $form, "int", _
                1000, "long", 0x00000010);主窗口打开效果;参数 1000 为调整渐大渐小(扩大/缩小)的效果速度
$Button4 = GUICtrlCreateButton("退   出", 670, 552, 105, 25)
        GUICtrlSetFont (-1,10, 400)

$state = 1  ;运行状态
If $state = 1 Or $state = "" Then 
         GUISetState(@SW_SHOW)
ElseIf $state = 0 Then
     GUISetState(@SW_HIDE)
EndIf
 
While 1 
     $nMsg = GUIGetMsg()
     Select
         Case $nMsg = $Button4;退出 动作
               DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $form, "int", _
                1000, "long", 0x00050010);退出效果;参数 1000 为调整渐大渐小(扩大/缩小)的效果速度
         ExitLoop
     EndSelect
 WEnd

xlcwxl · 发表于 2010-2-6 20:18:27

新栏开章, 凑个热闹,占个沙发

catcher · 发表于 2010-2-6 22:28:16

好东西,收下

lpxx · 发表于 2010-2-6 22:37:45

确实是无边框，但不是淡入淡出。

lpxx · 发表于 2010-2-6 22:40:07

顺便搜索一下论坛，好像淡入淡出代码如下：

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 10000, "long", 0x00080000)

316428696 · 发表于 2010-2-7 00:10:04

131738 发表于 2010-2-6 19:47

[/quote]

[quote] 谢谢楼主放源码！

131738 · 发表于 2010-2-7 17:25:11

本帖最后由 131738 于 2010-2-7 21:36 编辑

回复 4# lpxx

我理解有误原贴修改!

131738 · 发表于 2010-2-7 17:30:19

本帖最后由 131738 于 2010-2-7 17:40 编辑

回复 5# lpxx

请教了........

加Global 定义后,没有效果!

catcher · 发表于 2010-2-7 18:17:33

本帖最后由 catcher 于 2010-2-7 18:21 编辑

回复 7# 131738

LPXX一说, 我一想还真的对
淡入淡出应该是渐显的效果
楼主的代码是渐大渐小(扩大/缩小)的效果
不过我喜欢

131738 · 发表于 2010-2-7 21:31:48

回复 9# catcher

原来如此.....修改标题吧!

kn007 · 发表于 2010-2-7 21:33:52

回复

加Global 定义后,没有效果!
131738 发表于 2010-2-7 17:30

$hwnd输入你所创建的gui的返回值，也就是handle
最后一个是DLL执行码，如下所示，当然还有，我只是试出这么多

                                ;AW_HOR_POSITIVE （0x00000001） '从左到右打开窗口
                                ;AW_HOR_NEGATIVE （0x00000002） '从右到左打开窗口
                                ;AW_VER_POSITIVE （0x00000004） '从上到下打开窗口
                                ;AW_VER_NEGATIVE （0x00000008） '从下到上打开窗口
                                ;AW_CENTER 　　　（0x00000010） '若使用了AW_HIDE标志，则使窗口向内重叠；若未使用AW_HIDE标志，则使窗口向外扩展。但我的感觉是后者的效果不明显
                                ;AW_HIDE 　　　　（0x00010000） '在窗体卸载时若想使用本函数就得加上此常量 
                                ;AW_ACTIVATE 　　（0x00020000） '在窗体通过本函数打开后，默认情况下会失去焦点，除非加上本常量 
                                ;AW_SLIDE 　　　 （0x00040000） '使用滑动类型。缺省则为滚动动画类型。当使用AW_CENTER标志时，这个标志就被忽略
                                ;AW_BLEND 　　　 （0x00080000） '淡入淡出效果

131738 · 发表于 2010-2-7 21:43:27

回复 11# kn007
这个热闹凑大了.......赫赫.......

领教了!!!!!!!

youxiz · 发表于 2010-4-8 16:03:36

凑个热闹

dabaiyun · 发表于 2010-4-16 13:17:47

好东西呀收下了呀

spaykimo · 发表于 2010-4-19 18:08:01

謝謝大大的範例

		自动登录	找回密码
密码			加入

[特效] 新栏开章, 凑个热闹,无边框渐大渐小(扩大/缩小)的效果 GUI 效果

本帖子中包含更多资源