找回密码
 加入
搜索
查看: 8498|回复: 8

[GUI管理] [已解决]Listview就地编辑,两个编辑框就有问题了

  [复制链接]
发表于 2012-11-23 15:48:42 | 显示全部楼层 |阅读模式
本帖最后由 qinylj 于 2012-11-24 13:20 编辑
#include <GuiListView.au3>
#include <Editconstants.au3>
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
;2011.11.09 by bbs.wglm.net 小A  修改至:yhxhappy  2012.11.22由qinylj修改
;[修改] 删掉了原来的Enter键,仅仅换成Input输入,但是这是目前我比较满意的一个Listview原地编辑例子,字体正常,支持右键复制
Global $ListView_HitItem, $Listview_HitItemIndex, $Listview_HitItemSubItem, $ListView_HitItemInput;定义全局变量粘贴
Global $ListView1_HitItem, $ListView1_HitItemIndex, $ListView1_HitItemSubItem, $ListView1_HitItemInput;定义全局变量
$Form = GUICreate("LIST原位编辑支持子项 by 小A&修改by qinylj,感谢蛋蛋大大的帮助", 1200, 708)
GUISetFont(9, 400, 0, "微软雅黑")
$ListView = GUICtrlCreateListView("1|2|3|4", 8, 8, 592, 700)
GUICtrlSendMsg($ListView, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_GRIDLINES, $LVS_EX_GRIDLINES);扩展风格
$ListView1 = GUICtrlCreateListView("1|2|3|4", 600, 8, 592, 700)
GUICtrlSendMsg($ListView, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_GRIDLINES, $LVS_EX_GRIDLINES);扩展风格
$label = GUICtrlCreateLabel("", -100, -100, 1, 1)
GUISetState(@SW_SHOW)
For $i = 0 To 3
        GUICtrlSendMsg($ListView, $LVM_SETCOLUMNWIDTH, $i, 135)
        GUICtrlSendMsg($ListView1, $LVM_SETCOLUMNWIDTH, $i, 130)
Next
For $i = 0 To 120
        GUICtrlCreateListViewItem("Au3中文论坛啊,呵呵" & $i & "|Autoit中文论坛" & $i & "|感谢蛋蛋大大netegg" & $i & "|还要感谢小A" & $i, $ListView)
        GUICtrlCreateListViewItem("Qinylj啊,哈哈" & $i & "|BY Qinylj我晕哦" & $i & "|小A是哪个?" & $i & "|修改By啊Qinylj" & $i, $ListView1)
Next
GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")
GUIRegisterMsg($WM_COMMAND, "_WM_COMMAND")

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

Func _WM_NOTIFY($hWnd, $iMsg, $iwParam, $ilParam)
        Local $tNMHDR, $hWndFrom, $iCode
        $tNMHDR = DllStructCreate($tagNMHDR, $ilParam)
        $hWndFrom = DllStructGetData($tNMHDR, 'hWndFrom')
        $iCode = DllStructGetData($tNMHDR, 'Code')

        Switch $hWndFrom
                Case GUICtrlGetHandle($ListView)
                        Switch $iCode
                                Case $NM_DBLCLK;双击消息
                                        $ListView_HitItem = _GUICtrlListView_SubItemHitTest(GUICtrlGetHandle($ListView));确定哪些项目或子项目在控件的给定位置,参见帮助文件
                                        $Listview_HitItemIndex = $ListView_HitItem[0];获取点击项目的0基索引
                                        $Listview_HitItemSubItem = $ListView_HitItem[1];获取点击项目的子项索引
                                        If $Listview_HitItemIndex = -1 Then Return
                                        $ListView_HitItemPos = ControlGetPos($Form, "", $ListView);获取Listview坐标
                                        $ListView_HitItemRect = _GUICtrlListView_GetSubItemRect($ListView, $ListView_HitItem[0], $ListView_HitItem[1]);获取点击项的边界矩形
                                        $ListView_HitItemText = _GUICtrlListView_GetItemText($ListView, $ListView_HitItem[0], $ListView_HitItem[1]) ;读取所点击单元格的文本
                                        $ListView_HitItemInput = GUICtrlCreateInput($ListView_HitItemText, _ ;创建一个与单元格差不多大小的输入框 ;$ListView_HitItemText为在Input控件中显示的文本
                                                        $ListView_HitItemRect[0] + $ListView_HitItemPos[0] + 4, _;Input控件距离左侧的值,即X坐标,由点击项目的X坐标加上Listview的X坐标再加上4(4为微调值,保证X坐标吻合)
                                                        $ListView_HitItemRect[1] + $ListView_HitItemPos[1] + 2, _;Input控件距离上方的值,即Y坐标,由点击项目的Y坐标加上Listview的Y坐标再加上2(2为微调值,保证Y坐标吻合)
                                                        _GUICtrlListView_GetColumnWidth($ListView, $ListView_HitItem[1]) - 2, _;Input控件的宽度
                                                        $ListView_HitItemRect[3] - $ListView_HitItemRect[1]);Input控件的高度
                                        GUICtrlSetState(-1, $GUI_ONTOP + $GUI_FOCUS) ;使输入框具有焦点及置顶
                        EndSwitch
                Case GUICtrlGetHandle($ListView1)
                        Switch $iCode
                                Case $NM_DBLCLK;双击消息
                                        $ListView1_HitItem = _GUICtrlListView_SubItemHitTest(GUICtrlGetHandle($ListView1));确定哪些项目或子项目在控件的给定位置,参见帮助文件
                                        $ListView1_HitItemIndex = $ListView1_HitItem[0];获取点击项目的0基索引
                                        $ListView1_HitItemSubItem = $ListView1_HitItem[1];获取点击项目的子项索引
                                        If $ListView1_HitItemIndex = -1 Then Return
                                        $ListView1_HitItemPos = ControlGetPos($Form, "", $ListView1);获取Listview坐标
                                        $ListView1_HitItemRect = _GUICtrlListView_GetSubItemRect($ListView1, $ListView1_HitItem[0], $ListView1_HitItem[1]);获取点击项的边界矩形
                                        $ListView1_HitItemText = _GUICtrlListView_GetItemText($ListView1, $ListView1_HitItem[0], $ListView1_HitItem[1]) ;读取所点击单元格的文本
                                        $ListView1_HitItemInput = GUICtrlCreateInput($ListView1_HitItemText, _ ;创建一个与单元格差不多大小的输入框 ;$ListView1_HitItemText为在Input控件中显示的文本
                                                        $ListView1_HitItemRect[0] + $ListView1_HitItemPos[0] + 4, _;Input控件距离左侧的值,即X坐标,由点击项目的X坐标加上Listview的X坐标再加上4(4为微调值,保证X坐标吻合)
                                                        $ListView1_HitItemRect[1] + $ListView1_HitItemPos[1] + 2, _;Input控件距离上方的值,即Y坐标,由点击项目的Y坐标加上Listview的Y坐标再加上2(2为微调值,保证Y坐标吻合)
                                                        _GUICtrlListView_GetColumnWidth($ListView1, $ListView1_HitItem[1]) - 2, _;Input控件的宽度
                                                        $ListView1_HitItemRect[3] - $ListView1_HitItemRect[1]);Input控件的高度
                                        GUICtrlSetState(-1, $GUI_ONTOP + $GUI_FOCUS) ;使输入框具有焦点及置顶
                        EndSwitch
        EndSwitch
        Return $GUI_RUNDEFMSG
EndFunc   ;==>_WM_NOTIFY

Func _WM_COMMAND($hWnd, $iMsg, $iwParam, $ilParam)
        Local $hWndFrom, $iIDFrom, $iCode
        $hWndFrom = $ilParam
        $iCode = BitShift($iwParam, 16);获取高位
        $iIDFrom = BitAND($iwParam, 0x0000FFFF);获取低位
        
        Switch $hWndFrom
                Case GUICtrlGetHandle($ListView_HitItemInput)
                        Switch $iCode
                                Case $EN_KILLFOCUS ; 控件丢失键盘焦点时发送
                                        _GUICtrlListView_SetItemText($ListView, $Listview_HitItemIndex, GUICtrlRead($ListView_HitItemInput), $Listview_HitItemSubItem) ;更改子项文本,$Listview_HitItemIndex项目索引,$Listview_HitItemSubItem子项的索引
                                        GUICtrlDelete($ListView_HitItemInput);删除Input控件
                        EndSwitch
                Case GUICtrlGetHandle($ListView1_HitItemInput)
                        Switch $iCode
                                Case $EN_KILLFOCUS ; 控件丢失键盘焦点时发送
                                        _GUICtrlListView_SetItemText($ListView1, $ListView1_HitItemIndex, GUICtrlRead($ListView1_HitItemInput), $ListView1_HitItemSubItem) ;更改子项文本,$ListView1_HitItemIndex项目索引,$ListView1_HitItemSubItem子项的索引
                                        GUICtrlDelete($ListView1_HitItemInput);删除Input控件
                        EndSwitch
        EndSwitch
        Return $GUI_RUNDEFMSG
EndFunc   ;==>_WM_COMMAND
上面这段代码中有两个Listview,现在出现的问题是双击第一个Listview编辑后,再去双击第二个Listview编辑时就会出现问题,失去焦点后不是修改第二个Listview的编辑项,而是修改第一个Listview中最后编辑的项目,我把下面的代码放到前面一点(Case GUICtrlGetHandle($ListView_HitItemInput))就会出现编辑了第二个Listview后再编辑第一个Listview修改的是第二个Listview的值
                Case GUICtrlGetHandle($ListView1_HitItemInput)
                        Switch $iCode
                                Case $EN_KILLFOCUS ; 控件丢失键盘焦点时发送
                                        _GUICtrlListView_SetItemText($ListView1, $ListView1_HitItemIndex, GUICtrlRead($ListView1_HitItemInput), $ListView1_HitItemSubItem) ;更改子项文本,$ListView1_HitItemIndex项目索引,$ListView1_HitItemSubItem子项的索引
                                        GUICtrlDelete($ListView1_HitItemInput);删除Input控件
                        EndSwitch
纠结了好半天了,不知道问题出在哪里,希望各位帮忙试试,先感谢了

依然要感谢蛋蛋大大,呵呵,以下是修改后的代码:
#include <GuiListView.au3>
#include <Editconstants.au3>
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
;2011.11.09 by bbs.wglm.net 小A  修改至:yhxhappy  2012.11.22由qinylj修改
;[修改] 删掉了原来的Enter键,仅仅换成Input输入,但是这是目前我比较满意的一个Listview原地编辑例子,字体正常,支持右键复制
Global $ListView_HitItem, $Listview_HitItemIndex, $Listview_HitItemSubItem, $ListView_HitItemInput, $Listview_EditLV;定义全局变量粘贴
$Form = GUICreate("LIST原位编辑支持子项 by 小A&修改by qinylj,感谢蛋蛋大大的帮助", 1200, 708)
GUISetFont(9, 400, 0, "微软雅黑")
$ListView = GUICtrlCreateListView("1|2|3|4", 8, 8, 592, 700)
GUICtrlSendMsg($ListView, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_GRIDLINES, $LVS_EX_GRIDLINES);扩展风格
$ListView1 = GUICtrlCreateListView("1|2|3|4", 600, 8, 592, 700)
GUICtrlSendMsg($ListView, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_GRIDLINES, $LVS_EX_GRIDLINES);扩展风格
$label = GUICtrlCreateLabel("", -100, -100, 1, 1)
GUISetState(@SW_SHOW)
For $i = 0 To 3
        GUICtrlSendMsg($ListView, $LVM_SETCOLUMNWIDTH, $i, 135)
        GUICtrlSendMsg($ListView1, $LVM_SETCOLUMNWIDTH, $i, 130)
Next
For $i = 0 To 120
        GUICtrlCreateListViewItem("Au3中文论坛啊,呵呵" & $i & "|Autoit中文论坛" & $i & "|感谢蛋蛋大大netegg" & $i & "|还要感谢小A" & $i, $ListView)
        GUICtrlCreateListViewItem("Qinylj啊,哈哈" & $i & "|BY Qinylj我晕哦" & $i & "|小A是哪个?" & $i & "|修改By啊Qinylj" & $i, $ListView1)
Next
GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")
GUIRegisterMsg($WM_COMMAND, "_WM_COMMAND")

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

Func _WM_NOTIFY($hWnd, $iMsg, $iwParam, $ilParam)
        Local $tNMHDR, $hWndFrom, $iCode
        $tNMHDR = DllStructCreate($tagNMHDR, $ilParam)
        $hWndFrom = DllStructGetData($tNMHDR, 'hWndFrom')
        $iCode = DllStructGetData($tNMHDR, 'Code')

        Switch $hWndFrom
                Case GUICtrlGetHandle($ListView), GUICtrlGetHandle($ListView1)
                        Switch $iCode
                                Case $NM_DBLCLK;双击消息
                                        $Listview_EditLV = $hWndFrom
                                        $ListView_HitItem = _GUICtrlListView_SubItemHitTest($hWndFrom);确定哪些项目或子项目在控件的给定位置,参见帮助文件
                                        $Listview_HitItemIndex = $ListView_HitItem[0];获取点击项目的0基索引
                                        $Listview_HitItemSubItem = $ListView_HitItem[1];获取点击项目的子项索引
                                        If $Listview_HitItemIndex = -1 Then Return
                                        $ListView_HitItemPos = ControlGetPos($Form, "", $hWndFrom);获取Listview坐标
                                        $ListView_HitItemRect = _GUICtrlListView_GetSubItemRect($hWndFrom, $ListView_HitItem[0], $ListView_HitItem[1]);获取点击项的边界矩形
                                        $ListView_HitItemText = _GUICtrlListView_GetItemText($hWndFrom, $ListView_HitItem[0], $ListView_HitItem[1]) ;读取所点击单元格的文本
                                        $ListView_HitItemInput = GUICtrlCreateInput($ListView_HitItemText, _ ;创建一个与单元格差不多大小的输入框 ;$ListView_HitItemText为在Input控件中显示的文本
                                                        $ListView_HitItemRect[0] + $ListView_HitItemPos[0] + 4, _;Input控件距离左侧的值,即X坐标,由点击项目的X坐标加上Listview的X坐标再加上4(4为微调值,保证X坐标吻合)
                                                        $ListView_HitItemRect[1] + $ListView_HitItemPos[1] + 2, _;Input控件距离上方的值,即Y坐标,由点击项目的Y坐标加上Listview的Y坐标再加上2(2为微调值,保证Y坐标吻合)
                                                        _GUICtrlListView_GetColumnWidth($hWndFrom, $ListView_HitItem[1]) - 2, _;Input控件的宽度
                                                        $ListView_HitItemRect[3] - $ListView_HitItemRect[1]);Input控件的高度
                                        GUICtrlSetState(-1, $GUI_ONTOP + $GUI_FOCUS) ;使输入框具有焦点及置顶
                        EndSwitch
        EndSwitch
        Return $GUI_RUNDEFMSG
EndFunc   ;==>_WM_NOTIFY

Func _WM_COMMAND($hWnd, $iMsg, $iwParam, $ilParam)
        Local $hWndFrom, $iIDFrom, $iCode
        $hWndFrom = $ilParam
        $iCode = BitShift($iwParam, 16);获取高位
        $iIDFrom = BitAND($iwParam, 0x0000FFFF);获取低位

        Switch $hWndFrom
                Case GUICtrlGetHandle($ListView_HitItemInput)
                        Switch $iCode
                                Case $EN_KILLFOCUS ; 控件丢失键盘焦点时发送
                                        _GUICtrlListView_SetItemText($Listview_EditLV, $Listview_HitItemIndex, GUICtrlRead($ListView_HitItemInput), $Listview_HitItemSubItem) ;更改子项文本,$Listview_HitItemIndex项目索引,$Listview_HitItemSubItem子项的索引
                                        GUICtrlDelete($ListView_HitItemInput);删除Input控件
                        EndSwitch
        EndSwitch
        Return $GUI_RUNDEFMSG
EndFunc   ;==>_WM_COMMAND
 楼主| 发表于 2012-11-23 15:56:06 | 显示全部楼层
问题应该是出在_WM_COMMAND中,但是我就是没找到怎么解决,头大了都,哎
发表于 2012-11-23 21:08:00 | 显示全部楼层
先把所有的消息里的消息条件都删掉一个,同一句柄的同一消息不能重复定义
 楼主| 发表于 2012-11-24 08:46:50 | 显示全部楼层
回复 3# netegg


    没怎么看懂,是不是$EN_KILLFOCUS这个放前面,然后再switch控件?还请大大明示?
发表于 2012-11-24 10:57:08 | 显示全部楼层
_WM_COMMAND这个子函数内的case底下为什么是重复的
 楼主| 发表于 2012-11-24 11:38:30 | 显示全部楼层
回复 5# netegg


    一个是Case GUICtrlGetHandle($ListView)
    一个是Case GUICtrlGetHandle($ListView1),没重复啊,只是代码功能相同,我想用两个去区分
发表于 2012-11-24 12:40:15 | 显示全部楼层
本帖最后由 netegg 于 2012-11-24 12:44 编辑

Switch $hWndFrom
                Case GUICtrlGetHandle($ListView),  GUICtrlGetHandle($ListView1)
子函数里用$hwndfrom
switch切的是同一变量不同的值,把值直接带到子函数里有什么用,那不如不用切了直接带进去不是更简单

评分

参与人数 1金钱 +10 收起 理由
qinylj + 10 感谢了,呵呵

查看全部评分

 楼主| 发表于 2012-11-24 13:12:22 | 显示全部楼层
回复 7# netegg


    哦,对的哈,感谢蛋蛋大大,呵呵,真是糊涂了哈
发表于 2012-11-25 02:15:44 | 显示全部楼层
竟然有注释,赶快做好笔记!
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-11-22 01:31 , Processed in 0.090828 second(s), 27 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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