无边框窗口拖动

风行者 · 发表于 2011-5-27 22:53:05

本帖最后由风行者于 2011-5-27 23:01 编辑

好像最近这话题比较热，写个例子大家参考下

#include <WinAPI.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Global Const $SC_MOVE = 0xF010

$Form1 = GUICreate("Form1", 300, 239, 192, 124, BitOR($WS_SYSMENU, $WS_POPUP,$WS_SIZEBOX))
$Button1 = GUICtrlCreateButton("退出", 112, 160, 81, 33)
GUISetState()

While 1
        $Msg = GUIGetMsg()
        Switch $Msg
                Case $Button1
                        Exit
                Case $GUI_EVENT_PRIMARYDOWN
                        _SendMessage($Form1, $WM_SYSCOMMAND, $SC_MOVE + $HTCAPTION, 0)
        EndSwitch
WEnd

happytc · 发表于 2011-5-27 23:10:07

非常不错呀！
根本没有想到用$WS_SYSMENU，谢谢了！

annybaby · 发表于 2011-5-28 00:56:20

看起来不错,不过可以把那个边框弄小一点吗?

ooxxgod · 发表于 2012-5-11 15:07:48

支持楼主不过还是喜欢边框

penguinl · 发表于 2012-5-15 02:00:44

这个代码很精辟啊！感谢分享！

syhw2222 · 发表于 2012-6-6 17:04:30

谢谢楼主分享！

xyhqqaa · 发表于 2012-12-13 18:01:48

试试看..谢谢啦...哈

chamlien · 发表于 2013-3-17 23:59:10

学习了，真的很强大！

茫然 · 发表于 2013-5-2 11:09:08

这个在事件模式下怎么弄？

laomeng · 发表于 2013-5-2 12:51:59

这个很强大啊得支持

scorpio1102 · 发表于 2013-6-27 13:30:22

恶补恶补ＧＵＩ

suifeng123 · 发表于 2013-8-6 20:21:56

正好用上楼主辛苦了。。。。。。。。。。。。

suifeng123 · 发表于 2013-8-6 20:22:32

正好用上楼主辛苦了。。。。。。。。。。。。

llllllxllllll · 发表于 2013-8-24 21:22:30

下来研究学习，谢谢

snailyyy · 发表于 2013-11-10 08:16:01

收藏下之前是通过在窗体上建立一个可以控制移动的标签完成的~~
GUICtrlCreateLabel("123", 0, 0, 440, 30, $SS_CENTERIMAGE, $GUI_WS_EX_PARENTDRAG)

用户名		自动登录	找回密码
密码			加入

[交流] 无边框窗口拖动

评分