找回密码
 加入
搜索
查看: 16179|回复: 15

[GUI管理] 怎么判断ListViewItem是否被双击或右键单击

 火.. [复制链接]
发表于 2010-4-1 21:00:13 | 显示全部楼层 |阅读模式
悬赏3金钱已解决
请教各位,怎么样判断用GUICtrlCreateListViewItem 创建的 ListViewItem是否被双击和是否被右键。

如上图,我想实现当双击某一行时弹出一个窗口;当右键单击某一行时弹出右键菜单。

望大家帮忙,指点一下。
附件: 您需要 登录 才可以下载或查看,没有账号?加入
发表于 2010-4-1 21:00:14 | 显示全部楼层
本帖最后由 水木子 于 2010-4-1 21:52 编辑
#include <GuiListView.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <ListViewConstants.au3>
Opt("TrayMenuMode", 1)
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
$dir = @ScriptDir & "\config.ini"
GUICreate("ListView操作例", 280, 270)
$ListView1 = GUICtrlCreateListView("账号           |密码           |", 10, 10, 260, 150)
$But1 = GUICtrlCreateButton("添加", 185, 178, 75, 25, $WS_GROUP)
$Input1 = GUICtrlCreateInput("", 60, 180, 120, 21)
$Input2 = GUICtrlCreateInput("", 60, 220, 120, 21)
GUICtrlCreateLabel("账号:", 20, 183, 36, 17)
GUICtrlCreateLabel("密码:", 20, 223, 36, 17)
GUICtrlCreateLabel("数据", 200, 223, 36, 17)
$Label1 = GUICtrlCreateLabel("0", 230, 223, 36, 17)

;右键菜单
$zhucaidan = GUICtrlCreateContextMenu($ListView1)
$add = GUICtrlCreateMenuItem("添加数据", $zhucaidan)
GUICtrlCreateMenuItem("", $zhucaidan)
$del = GUICtrlCreateMenuItem("删除数据", $zhucaidan)
GUICtrlCreateMenuItem("", $zhucaidan)
$break = GUICtrlCreateMenuItem("刷新数据", $zhucaidan)
GUISetState(@SW_SHOW)
read()

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case - 3
                        Exit
                Case $But1, $add
                        add(GUICtrlRead($Input1), GUICtrlRead($Input2), GUICtrlRead($Label1))
                Case $del
                        Del()
                Case $break
                        read()
        EndSwitch
WEnd

Func read($z = 0)
        _GUICtrlListView_DeleteAllItems($ListView1)
        $read = IniReadSection($dir, "config")
        If Not @error Then
                For $i = 1 To $read[0][0]
                        GUICtrlCreateListViewItem($read[$i][0], $ListView1)
                        _GUICtrlListView_AddSubItem($ListView1, $z, $read[$i][1], 1, $z + 1)
                        GUICtrlSetData($Label1, $z + 1)
                        $z += 1
                Next
        EndIf
EndFunc   ;==>Read

Func add($a, $b, $z)
        If $a <> "" And $b <> "" Then
                IniWrite($dir, "config", $a, $b)
                GUICtrlCreateListViewItem($a & '|' & $b, $ListView1)
                MsgBox(0, "提示", " 账号: " & $a & " 密码: " & $b & " 保存成功 ")
                GUICtrlSetData($Input1, "")
                GUICtrlSetData($Input2, "")
                GUICtrlSetData($Label1, $z + 1)
                GUICtrlSetState($Input1, $GUI_FOCUS)
        EndIf
EndFunc   ;==>Add

Func Del()
        $a = _GUICtrlListView_GetSelectedIndices($ListView1)
        $b = _GUICtrlListView_GetItemTextString($ListView1, Number($a))
        If Not StringLen($a) Then Return
        $chaifen = StringSplit($b, "|")
        
        If MsgBox(32 + 1, "提示", "请确认是否删除以下数据" & @CRLF & @CRLF & "账号:" & $chaifen[1] & @CRLF & @CRLF & "密码:" & $chaifen[2]) = 1 Then
                _GUICtrlListView_DeleteItemsSelected($ListView1) ;删除选定项目
                IniDelete($dir, 'config', $chaifen[1])
                $z = _GUICtrlListView_GetItemCount($ListView1)
                GUICtrlSetData($Label1, $z)
                ;MsgBox(48, "提示", "数据删除成功")
        EndIf
EndFunc   ;==>Del

Func WM_NOTIFY($hWndGUI, $MsgID, $WParam, $LParam)
        Local $tagNMHDR, $Event, $hWndFrom, $IDFrom
        Local $tagNMHDR = DllStructCreate("int;int;int", $LParam)
        If @error Then Return $GUI_RUNDEFMSG
        $IDFrom = DllStructGetData($tagNMHDR, 2)
        $Event = DllStructGetData($tagNMHDR, 3)
        $tagNMHDR = 0
        Switch $IDFrom;选择产生事件的控件
                Case $ListView1
                        Switch $Event; 选择产生的事件
                                Case $NM_CLICK ; 左击

                                Case $NM_DBLCLK ; 双击
                                        $Index = _GUICtrlListView_GetSelectedIndices($ListView1)
                                        If Not StringLen($Index) Then Return; 这里用以判断是否选定了ListViewItem
                                        _PairsClick()
                                Case $NM_RCLICK ; 右击
                        EndSwitch
        EndSwitch
        Return $GUI_RUNDEFMSG
EndFunc   ;==>WM_NOTIFY

Func _PairsClick()
        $a = _GUICtrlListView_GetSelectedIndices($ListView1)
        $b = _GUICtrlListView_GetItemTextString($ListView1, Number($a))
        $chaifen = StringSplit($b, "|")
        MsgBox(64, '本行数据如下:', "账号:" & $chaifen[1] & @CRLF & @CRLF & "密码:" & $chaifen[2])
EndFunc   ;==>_PairsClick

评分

参与人数 1金钱 +20 收起 理由
afan + 20

查看全部评分

发表于 2010-4-2 02:20:40 | 显示全部楼层
多看看帮助里的例子吧
 楼主| 发表于 2010-4-2 10:26:07 | 显示全部楼层
呵呵,谢谢水木子兄弟。

我昨天在帮助文档里找了很长时间,就是没找到,惭愧!

谢谢楼上两位
发表于 2010-4-8 21:22:03 | 显示全部楼层
学习了。。。。。。。。。。
发表于 2010-4-11 20:58:57 | 显示全部楼层
好。又有进步。。。。。。。。。。。。
发表于 2010-4-13 09:41:42 | 显示全部楼层
非常不错,绝对支持
 楼主| 发表于 2010-4-13 13:48:29 | 显示全部楼层
恩,是不错。我用了是上面的代码是可行的。大家该收藏,呵呵
发表于 2010-5-29 11:01:10 | 显示全部楼层
我是来搜索单击事件的
发表于 2010-7-8 05:19:36 | 显示全部楼层
踏破铁靴啊
发表于 2011-4-25 19:10:57 | 显示全部楼层
运行了  很有参考价值
发表于 2011-4-27 15:50:06 | 显示全部楼层
thanks!!!!!good example!!!!!!!!
发表于 2011-4-30 12:15:41 | 显示全部楼层
回复 2# 水木子


  非常感谢水木子,正常用到这个!!
发表于 2011-6-13 21:46:49 | 显示全部楼层
感谢水木子的分享,很有价值的参考,谢谢。
发表于 2014-5-20 15:57:42 | 显示全部楼层
感谢,感谢,学习学习
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-5-10 14:22 , Processed in 0.088864 second(s), 20 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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