[已解决] $WS_POPUP 属性的窗体如何用鼠标在桌面上拖动

hnfeng · 发表于 2016-5-4 09:31:45

本帖最后由 hnfeng 于 2016-5-6 20:24 编辑

下面的代码中的窗体只显示在桌面中间位置。怎样才能用鼠标拖动呢? 先谢谢了


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

$Form1 = GUICreate("Form1", 460, 260, -1, -1, $WS_POPUP)
GUISetBkColor(0x008080)
$Button1 = GUICtrlCreateButton("OK", 384, 224, 65, 25)
GUICtrlSetBkColor(-1, 0x0080c0)
GUISetState(@SW_SHOW)
WinSetTrans($Form1, "", 200)

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button1
                        Exit
        EndSwitch
WEnd

zghwelcome · 发表于 2016-5-4 09:50:47

好像只有快捷键
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Global $g_move = False
HotKeySet("{home}", "_moveit")
$Form1 = GUICreate("Form1", 460, 260, -1, -1, $WS_POPUP)
GUISetBkColor(0x008080)
$Button1 = GUICtrlCreateButton("OK", 384, 224, 65, 25)
GUICtrlSetBkColor(-1, 0x0080c0)
GUISetState(@SW_SHOW)
WinSetTrans($Form1, "", 200)

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
Exit
EndSwitch
WEnd

Func _moveit()
$g_move = Not $g_move
While $g_move
WinMove($Form1, "", MouseGetPos(0), MouseGetPos(1))
WEnd
EndFunc ;==>_moveit

hnfeng · 发表于 2016-5-4 10:07:33

回复 2# zghwelcome

谢谢。
不怎么想用快捷键
想尽量用鼠标拖动

kk_lee69 · 发表于 2016-5-4 10:45:47

本帖最后由 kk_lee69 于 2016-5-4 10:47 编辑

回复 1# hnfeng

http://www.autoitx.com/forum.php ... =%CE%DE%B1%DF%BF%F2

善用搜尋

hnfeng · 发表于 2016-5-4 10:57:21

回复 4# kk_lee69

多谢多谢

afan · 发表于 2016-5-4 12:40:34

回复 5# hnfeng

似乎你前年回复过那贴

hnfeng · 发表于 2016-5-6 20:23:58

回复 6# afan

确实，看到了才知道

不好意思，忘记了

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

[AU3基础] [已解决] $WS_POPUP 属性的窗体如何用鼠标在桌面上拖动

相关帖子