zerobin 发表于 2012-6-14 14:11:16

【已解决】label 标签的双击

本帖最后由 zerobin 于 2012-6-14 14:59 编辑

原帖思考方式方式有误,已解决。代码见下面。

参考notify资料
http://hi.baidu.com/a0x777/blog/item/f90e6916e39c935ff919b877.html

zerobin 发表于 2012-6-14 14:52:54

本帖最后由 zerobin 于 2012-6-14 14:54 编辑

晕,原来我想错了。
是这样的。#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <StaticConstants.au3>
$hGUI = GUICreate("label双击", 400, 400)
$hLabel = GUICtrlCreateLabel("单击没用,双击我看看!", 100, 150, 200, 50, BitOr($SS_CENTER, $SS_CENTERIMAGE))
GUICtrlSetBkColor(-1, 0xcccc00)
GUISetState()
GUIRegisterMsg($WM_COMMAND, "WM_COMMAND")
While 1
    Switch GUIGetMsg()
      Case $GUI_EVENT_CLOSE
            ExitLoop
    EndSwitch
WEnd
Func WM_COMMAND($hWnd, $MsgID, $wParam, $lParam)
    Local Const $STN_DBLCLK = 1
    Local $nID = BitAND($wParam, 0xFFFF)
    Local $nNotifyCode = BitShift($wParam, 16)
    If $nID = $hlabel And $nNotifyCode = $STN_DBLCLK Then
         MsgBox(0, "双击", "也! 成功!")
EndIf
    Return $GUI_RUNDEFMSG
EndFunc

kk_lee69 发表于 2016-5-31 10:51:00

好東西留個腳印 macgyver

zpmc123 发表于 2017-3-31 12:38:36

效果很好,不错
页: [1]
查看完整版本: 【已解决】label 标签的双击