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

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

本帖最后由 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

新栏开章, 凑个热闹,占个沙发:face (38):

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

:face (26):好东西,收下

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 http://www.autoitx.com/images/common/back.gif

:face (1): 谢谢楼主放源码!

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 http://www.autoitx.com/images/common/back.gif


    $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
这个热闹凑大了.......赫赫.......:face (3):

领教了!!!!!!!

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

凑个热闹:face (29):

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

好东西呀收下了呀

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

謝謝大大的範例
页: [1] 2 3 4
查看完整版本: 新栏开章, 凑个热闹,无边框渐大渐小(扩大/缩小)的效果 GUI 效果