在蛋蛋兄的"编辑Listview全部子项"增加单击子项-『中文资料』-AUTOIT CN

3mile 发表于 2011-4-2 23:24:11

在蛋蛋兄的"编辑Listview全部子项"增加单击子项

#include <GUIEdit.au3>
#include <GuiListView.au3>
#include <Editconstants.au3>
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>

Global $msg, $hWnd, $hListview, $hEdit, $aHit, $aPos, $hDC, $hBrush,$lable

$hWnd = GUICreate('Listview edit all subitem')

$hListview = _GUICtrlListView_Create($hWnd, '', 6, 6, 708, 370, BitOR($LVS_EDITLABELS, $LVS_REPORT))
_GUICtrlListView_SetExtendedListViewStyle($hListview, $LVS_EX_GRIDLINES)
$lable=GUICtrlCreateLabel("",10,10,10,10)
GUICtrlSetState(-1,$gui_HIDE)

For $i = 0 To 4
_GUICtrlListView_InsertColumn($hListview, 0, 'row' & 4 - $i, 98)
Next

For $i = 0 To 4
_GUICtrlListView_AddItem($hListview, 'item' & $i, $i)
For $j = 1 To 4
_GUICtrlListView_AddSubItem($hListview, $i, 'subitem' & $j, $j)
Next
Next

GUIRegisterMsg($WM_NOTIFY, 'WM_NOTIFY')
GUIRegisterMsg($WM_COMMAND, 'WM_COMMAND')

GUISetState(@SW_SHOW)

Do
Until GUIGetMsg() = -3

Func WM_NOTIFY($hWnd, $iMsg, $iwParam, $ilParam)
Local $tNMHDR, $hWndFrom, $iCode

$tNMHDR = DllStructCreate($tagNMHDR, $ilParam)
$hWndFrom = DllStructGetData($tNMHDR, 'hWndFrom')
$iCode = DllStructGetData($tNMHDR, 'Code')

Switch $iCode
Case $NM_DBLCLK
GUICtrlSetState($lable,$gui_HIDE)
$aHit = _GUICtrlListView_SubItemHitTest($hListview)
Local $aRect = _GUICtrlListView_GetSubItemRect($hListview, $aHit, $aHit)
Local $aPos = ControlGetPos($hWnd, '', $hListview)
Local $text = _GUICtrlListView_GetItemText($hListview, $aHit, $aHit)
Local $iStyle = BitOR($WS_CHILD, $WS_VISIBLE, $ES_AUTOHSCROLL, $ES_LEFT)

$hEdit = _GUICtrlEdit_Create($hWnd, $text, $aPos + $aRect, $aPos + $aRect, _GUICtrlListView_GetColumnWidth($hListview, $aHit), 17, $iStyle)
_GUICtrlEdit_SetSel($hEdit, 0, -1)
_WinAPI_SetFocus($hEdit)
$hDC = _WinAPI_GetWindowDC($hEdit)
$hBrush = _WinAPI_CreateSolidBrush(0x0000FF)

Local $stRect = DllStructCreate('int;int;int;int')
DllStructSetData($stRect, 1, 0)
DllStructSetData($stRect, 2, 0)
DllStructSetData($stRect, 3, _GUICtrlListView_GetColumnWidth($hListview, $aHit))
DllStructSetData($stRect, 4, 17)
_WinAPI_FrameRect($hDC, DllStructGetPtr($stRect), $hBrush)
Case $NM_CLICK
$aHit1 = _GUICtrlListView_SubItemHitTest($hListview)
IF $aHit1<>-1 Then
Local $aRect1 = _GUICtrlListView_GetSubItemRect($hListview, $aHit1, $aHit1)
Local $aPos1 = ControlGetPos($hWnd, '', $hListview)
Local $text1 = _GUICtrlListView_GetItemText($hListview, $aHit1, $aHit1)
Local $iStyle1 = BitOR($WS_CHILD, $WS_VISIBLE, $ES_AUTOHSCROLL, $ES_LEFT)
GUICtrlSetState($lable,$GUI_SHOW)
GUICtrlSetData($lable,$text1)
GUICtrlSetPos($lable,$aPos1 + $aRect1, $aPos1 + $aRect1, _GUICtrlListView_GetColumnWidth($hListview, $aHit1),$aRect1-$aRect1)
GUICtrlSetBkColor($lable,0x2468a2)
EndIf
EndSwitch
EndFunc ;==>WM_NOTIFY

Func WM_COMMAND($hWnd, $msg, $wParam, $lParam)
Local $iCode = BitShift($wParam, 16)
Switch $lParam
Case $hEdit
Switch $iCode
Case $EN_KILLFOCUS
Local $iText = _GUICtrlEdit_GetText($hEdit)
_GUICtrlListView_SetItemText($hListview, $aHit, $iText, $aHit)
_WinAPI_DeleteObject($hBrush)
_WinAPI_ReleaseDC($hEdit, $hDC)
_WinAPI_DestroyWindow($hEdit)
_GUICtrlEdit_Destroy($hEdit)
$Item = -1
$SubItem = 0
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_COMMAND

netegg 发表于 2011-4-2 23:29:07

Case $NM_DBLCLK, $NM_CLICK

3mile 发表于 2011-4-2 23:52:34

回复 2# netegg
呵呵,没看源码吧.
其实也很简单.只是加了个LABLE实现单击选中子项而已.

netegg 发表于 2011-4-3 00:10:06

回复 3# 3mile
运行了下，我理解错了，不好意思{:face (197):}，不错

andersonljw 发表于 2011-4-3 20:03:03

好东西，谢谢分享

蜘蛛抱蛋 发表于 2011-4-5 18:35:05

本帖最后由蜘蛛抱蛋于 2011-4-5 18:39 编辑

回复 3# 3mile

又见LABLE。。。这个词在论坛出现的频率灰常高{:face (113):}
14行$lable=GUICtrlCreateLabel("",10,10,10,10,0x50820100);加上边框更逼真了
72行GUICtrlSetData($lable,' '&$text1);好像表格离得文字都会空一格。。。
74行GUICtrlSetBkColor($lable,0x3399FF);0x2468a2在win7下的颜色
编辑框的光标没了，不知道能不能显示出来。、。

xiehuahere 发表于 2011-10-29 17:15:24

本帖最后由 xiehuahere 于 2011-10-31 21:58 编辑

附基础知识：
WM_COMMAND，WM_NOTIFY等消息
分析与理解VC的通知消息WM_NOTIFY
比较权威的（MSDN，CSDN）：
WM_NOTIFY message
WM_COMMAND message
WM_COMMAND和WM_NOTIFY有什么区别？
基本上，Edit,Button,ListBox等发送WM_COMMAND消息，ListView,TreeView,Toolbar等发送WM_NOTIFY消息。

问题：
双击subitem显示编辑框后，鼠标没法做文本选择操作（只能通过键盘操作）；
编辑后无法直接按回车确认。
这些如何解决呢？

xiehuahere 发表于 2011-10-31 09:08:40

"编辑subitem后直接按回车确认"，这个如何实现呢？
3mile兄的代码只能通过鼠标点击其他地方来实现。

xiehuahere 发表于 2011-10-31 15:20:39

本帖最后由 xiehuahere 于 2011-10-31 22:04 编辑

为ENTER注册热键会影响其他应用程序，所以有没有什么其他方法可以截获ENTER按键消息而又不影响其他应用程序接收这个按键呢？
看到有人说：
如果要处理回车键，最好给所有编辑框添加EN_KILLFOCUS消息,然后重载对话框消息PreTranslateMessage函数,并添加代码
if((pMsg->message ==WM_KEYDOWN) && (pMsg->wParam ==VK_RETURN))
{
CWnd *pWnd=this.GetFocus();
this->SetFocus();
pWnd->SetFocus();
return 0;
}
对C语言不是很熟悉，谁能帮忙翻译成au3代码？

xiehuahere 发表于 2011-11-1 14:20:06

本帖最后由 xiehuahere 于 2011-11-1 14:33 编辑

回复 1# 3mile

_IsPressed()方法试过了也不行：$dll = DllOpen("user32.dll")
Func WM_COMMAND($hWnd, $msg, $wParam, $lParam)
Local $iCode = BitShift($wParam, 16)
Switch $lParam
Case $hEdit
Switch $iCode
Case $EN_KILLFOCUS
                        confirm_listview_input()
                  Case $EN_CHANGE
                           If _IsPressed("0D", $dll) Then
                                       confirm_listview_input()
                                       _GUICtrlListView_SetItemState($hListview, ..., $LVIS_FOCUSED, ...)
                           EndIf
         EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_COMMAND

Func confirm_listview_input()
。。。。
EndFunc ;==>confirm_listview_input

DllClose($dll)个人能力不够，望指点。

xiehuahere 发表于 2011-11-1 15:34:25

搜索“listview return” 和 “列表框回车”未果。
今天搜索了一下“listview 回车”就突然看到了我想要的结果：
http://www.autoitx.com/forum.php?mod=viewthread&tid=27011&highlight=listview%2B%BB%D8%B3%B5

让我情何以堪啊！！
压力山大啊~~~
{:face (52):}

dnbj2010 发表于 2011-11-27 10:10:50

获益匪浅！
留爪学习！

lpxx 发表于 2011-11-27 13:15:15

谢谢分享，我就是这么慢慢积累的，虽然很慢。

431852 发表于 2017-1-2 22:54:13

......选中项一旦被移出便会消失，怀疑移除便会覆盖

lyon 发表于 2017-1-3 14:29:22

支持{:face (411):}

页: [1]

AUTOIT CN's Archiver

在蛋蛋兄的"编辑Listview全部子项"增加单击子项