找回密码
 加入
搜索
楼主: xiaochuan

[交流] 去掉窗口标题栏,以前版主发过用图片做的。

 火... [复制链接]
发表于 2011-12-20 09:27:36 | 显示全部楼层
回复 1# xiaochuan
好久没学AU3了,支持!
发表于 2011-12-27 19:45:36 | 显示全部楼层
感谢分享,先收藏,
发表于 2012-1-10 20:42:32 | 显示全部楼层
顶顶顶不错不错!
发表于 2012-1-15 17:34:24 | 显示全部楼层
这样效率会好点
#include <StaticConstants.au3>
Global $S
$Form1 = GUICreate('AU3 Good!!', 500, 400, -1, -1, $WS_POPUP)
GUISetBkColor(0x999999)
GUISetFont(11, 400, 0, 'Verdana')
$Label1 = GUICtrlCreateLabel('  AU3 Good!!', 0, 0, 460, 40, $SS_CENTERIMAGE, $GUI_WS_EX_PARENTDRAG)
GUICtrlSetBkColor(-1, 0x666666)
GUICtrlSetColor(-1, 0xEFEFEF)
$Label2 = GUICtrlCreateLabel('×', 460, 0, 40, 40, $SS_CENTER)
GUICtrlSetBkColor(-1, 0x666666)
GUICtrlSetColor(-1, 0xEFEFEF)
GUICtrlSetFont(-1, 20, 400, 0, 'Verdana')
GUISetState(@SW_SHOW)
While 1
        $info = GUIGetCursorInfo()
        Switch $info[4]
                Case $Label2
                        If $S = True Then
                                GUICtrlSetColor($Label2, 0xFF0000)
                                $S = False
                        EndIf
                Case Else
                        If $S = False Then
                                GUICtrlSetColor($Label2, 0xFFFFFF)
                                $S = True
                        EndIf
        EndSwitch
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Label2
                        Exit
        EndSwitch
WEnd
发表于 2012-1-17 17:48:32 | 显示全部楼层
好东西~!!!
发表于 2012-1-17 17:48:43 | 显示全部楼层
学习学习~!!!!!!!!!!!!!!1
发表于 2012-1-17 17:49:30 | 显示全部楼层
之前就没想过,这样还可以搞~!!
发表于 2012-2-12 20:11:15 | 显示全部楼层
路过,学习了
发表于 2012-3-10 18:22:49 | 显示全部楼层
发表于 2012-5-15 02:03:15 | 显示全部楼层
这个样式还真不错啊!学习一下!
发表于 2012-6-6 16:15:05 | 显示全部楼层
19#的东东,做的确实不错!
发表于 2012-10-16 12:22:21 | 显示全部楼层
很好的代码
发表于 2013-3-11 21:54:16 | 显示全部楼层
照猫画虎的瞎改了一下

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <StaticConstants.au3>
Global $S
$Form1 = GUICreate('AU3 Good!!', 500, 400, -1, -1, $WS_POPUP)
GUICtrlSetDefBkColor(0x666666) ;默认
GUICtrlSetDefColor(0xEFEFEF) ;默认
GUISetBkColor(0x999999)
GUISetFont(11, 400, 0, 'Verdana')
$Label1 = GUICtrlCreateLabel('  AU3 Good!!', 0, 0, 460, 40, $SS_CENTERIMAGE, $GUI_WS_EX_PARENTDRAG)
$Label2 = GUICtrlCreateLabel('×', 460, 0, 40, 40, $SS_CENTER)
GUICtrlSetFont(-1, 20, 400, 0, 'Verdana')
GUISetState(@SW_SHOW)
While 1
        $info = GUIGetCursorInfo()
        If Not @error Then ;加个判断,否则窗口不激活的时候会报错
                Switch $info[4]
                        Case $Label2
                                If $S = True Then
                                        GUICtrlSetColor($Label2, 0xFF0000)
                                        $S = False
                                EndIf
                        Case Else
                                If $S = False Then
                                        GUICtrlSetColor($Label2, 0xFFFFFF)
                                        $S = True
                                EndIf
                EndSwitch
        EndIf
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Label2
                        Exit
        EndSwitch
WEnd



发表于 2013-6-19 11:17:36 | 显示全部楼层
怎么没有最小化按钮呢?
发表于 2013-10-2 21:53:54 | 显示全部楼层
好厉害。。。又学习了!
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-24 12:43 , Processed in 0.069013 second(s), 14 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表