Edit In Place Listview (multi-column)

JohnBailey · September 14, 2007

eltorro,

I have made the updates. If you want, I can post them here or PM them to you to look over. Again, there may be specific reasons you did not include those things.

JohnBailey · September 14, 2007

Another request that I've got working is

Combobox loads different data per rows if scripter permits it too

JohnBailey · September 14, 2007

Bug Report

UpdateonfocusChange doesn't seem to be working for any of the controls, except Input.

Edited September 14, 2007 by JohnBailey

JohnBailey · September 14, 2007

Bug Report
UpdateonfocusChange doesn't seem to be working for any of the controls, except Input.

Corrected the error. I can post this along with the other requested adjustments/additions or just post this fix. Let me know.

EDIT

I actually just brought over some script from your previous version, and it works with that script.

Edited September 14, 2007 by JohnBailey

JohnBailey · September 14, 2007

Bug Report: Right-click Popup Menu does not show in mouse coordinates, but at the row element's coordinates.

JohnBailey · September 14, 2007

Request

Make the TabHandler() more dynamic by allowing it to "figureout"/"know" which tab the LV is in. (I'm thinking on this one, but can't figure it out)

eltorro · September 15, 2007

You.ve been busy. Post what you got.

JohnBailey · September 15, 2007

You.ve been busy. Post what you got.

hahaha indeed I have. I told you I really like this udf!

Additions

Checkbox Control (see wish list below though)
New Function _EIPInitAllColumnClicksStandard() allows a standard setup for all columns. "Function to set all columns with a standard right click and left click." This is helpful for many reasons, but one it saves time. The scripter can then go in a specify, after the function is called, which columns he/she wants to be unique.
Further expand _InitEditLib() with a parameter to allow for an alternative function(s) to be used for the RegMsgs
The Main GUI Window is dynamically set like the LV is set This is done by $__EIP_GUI = $Gui, where $GUI is the var for the GUI winodw where the LV is contained ($Gui is what is found in your, Eltorro, example file).
Moved the $bCALLBACK_EVENT if-statement from below the _MonitorEditState in the example to the _MonitorEditState function
Double-Clicking can activate different controls. For example, single click activates 256 (MyCallBack()), while double click activates 1 (Edit Control). That way a single click can do something, while double click allows for editing. Double-click control list is $LVcolControlDouble

Bug Fix(es)

UpdateonfocusChange doesn't seem to be working for any of the controls, except Input. I actually just brought over some script from your previous version, and it works with that script.

#include-once
#include <GuiConstants.au3>
#include <GuiListview.au3>
#Include <GuiCombo.au3>
#Include <GuiList.au3>
#include <GuiTab.au3>

;this is a modified version of my original script.  It creates a popup
;window for the control as a child window to workaround issues related to
;listviews on tabs.
;
; ------------------------------------------------------------------------------
;
; AutoIt Version:    3.0
; Language:      English
; Description: Multi-column editable Listview  (EditInPlace)
;                   Stephen Podhajecki <gehossafats at netmdc.com/> Gary Frost <gafrost at charter dot net/>
;                   pdm for control array concept
;                   see http://www.autoitscript.com/forum/index.ph...mp;#entry322551
;==============================================================================
;   ######>>> set the type of control for each column <<<######
;   0 = Input/edit  1 = combobox 2 = date control
;   Global $LVcolControl[4]=[0,0,1,2]
;   _InitEditLib();######>>>  add this after you create your main gui<<<######
;   _MonitorEditState($__EIP_GUI, $editCtrl, $editFlag, $__LISTVIEWCTRL, $LVINFO, $LVcolControl);######>>>  add this in your message loop<<<######
;   _TermEditLib();######>>>  add this after your message loop when exiting the script<<<######
; $__LISTVIEWCTRL = $ListView1 ######>>> Set this to your ListView control <<<######
;==============================================================================
Global  $DebugIt = 0

#include <ControlConstants.au3>

Global $checkboxSymbolChecked = chr(149);----Addition----;
Global $checkboxSymbolUNChecked = ' ';----Addition----;
Global Const $GUILOSTFOCUS = -1
Global $LVCALLBACK = "_CancelEdit" ; default to cancel edit
Global $LVCONTEXT = "_CancelEdit" ; defalut to cancel edit
Global $bCALLBACK = False;a call-back has been executed.
Global $bCALLBACK_EVENT = False
Global $bLVUPDATEonfocusCHANGE = False;save editing if another cell is clicked;-----Adjusted from 0 to False ------;
Global $bLVDBLCLICK = False;
Global $bLVITEMCHECKED = False;
Global $bLVEDITondblclick = False;Must dblclick to edit
Global $bDATECHANGED = False;
Global $bPROGRESSSHOWING = False;
Global $bInitiated = False
Global $LVCHECKEDCNT = 0;
Global $updateCBimmediately = true
Global $old_col
Global $__LISTVIEWCTRL = -999
Global $__EIP_GUI, $editFlag
Global $bCanceled = False
Global $editHwnd;= the Hwnd of the editing control.
Global $editCtrl;= the CtrlId of the editing control.
;;array dim to number of cols, value of each element determines control.
Global $LVcolControl[1] = [0] ;0= ignore, 1= edit, 2= combo, 4= calendar, 8 = list, 256 use callback.
Global $LVcolControlDouble[1] = [0] ;0= ignore, 1= edit, 2= combo, 4= calendar, 8 = list, 256 use callback.
Global $LVcolRControl[1] = [0];0= ignore, 256 = context callback.
Global $lvControlGui , $lvEdit, $lvCombo, $lvDate , $lvList, $lvCheckbox
Global $LVINFO[11];
Opt("GUICloseOnESC", 0);turn off exit on esc.

;===============================================================================
; Function Name:    _EIPInitAllColumnClicksStandard
;
; Description:      Initializes (sets up the arrays for) the column right and left clicks. Therefore, all columns will have the same functions.
;
; Parameter(s):     $iaccsTotalColumns - number, The Number of Columns
;                   $iaccsLeftClickOption - number, Left Click option (default = 1)(other options:  0= ignore, 1= edit, 2= combo, 4= calendar, 8 = list, 128 = checkbox, 256= use callback)
;                   $iaccsRightClickOption - boolean, Right Click option (default = true)
;
; Requirement(s):
;
; Return Value(s):  Sets Globals which are arrays
;
; User CallTip:     _EIPInitAllColumnClicksStandard($iaccsTotalColumns[,$iaccsLeftClickOption=1][,$iaccsRightClickOption=256]). Sets up all columns with the same type of control.
;
; Note(s):          This is optional and just sets up the array that is called
;                   Best used with _GUICtrlListViewGetSubItemsCount() for $iaccsTotalColumns
;
; Author(s):        JohnBailey
;===============================================================================
Func _EIPInitAllColumnClicksStandard($iaccsTotalColumns,$iaccsLeftClickOption=1,$iaccsLeftDoubleClickOption=128,$iaccsRightClickOption=true)
;   ======>>> set the type of control for each column <<<======
;0= ignore, 1= edit, 2= combo, 4= calendar, 8 = list, 128 = checkbox, 256= use callback.
    Local $iaccsCounter
    Global $LVcolControl[$iaccsTotalColumns]; = [1,1,1,1];left click actions
    For $iaccsCounter = 0 to $iaccsTotalColumns-1
        $LVcolControl[$iaccsCounter] = $iaccsLeftClickOption
    Next
    For $iaccsCounter = 0 to $iaccsTotalColumns-1
        $LVcolControlDouble[$iaccsCounter] = $iaccsLeftDoubleClickOption
    Next
;0 = ignore, 256= use context callback
    Global $LVcolRControl[$iaccsTotalColumns];= [256,256,256,256]; right click actions
    For $iaccsCounter = 0 to $iaccsTotalColumns-1
        If $iaccsRightClickOption Then
            $LVcolRControl[$iaccsCounter] = 256
        Else
            $LVcolRControl[$iaccsCounter] = 0
        EndIf
    Next

EndFunc  ;==>_EIPInitAllColumnClicksStandard

;===============================================================================
; Function Name:    _InitEditLib
; Description:      Create the editing controls and registers WM_NOTIFY handler.
; Parameter(s):
; Requirement(s):
; Return Value(s):
; User CallTip:
; Author(s):
; Note(s):      Call this BEFORE you create your listview.
;===============================================================================
Func _InitEditLib($lvEditStart="",$lvComboStart="",$lvDataStart="",$lvListStart="",$hParent=0,$EIP_WMACTIVATEfunc="WM_ACTIVATE_EIPStandard",$EIP_WMMOVEEVENTfunc="WM_MOVE_EVENT_EIPStandard",$EIP_WMMOVINGfunc="WM_Notify_Events_EIPStandard",$EIP_WMNOTIFYfunc="WM_Notify_Events_EIPStandard",$EIP_WMCOMMANDfunc="WM_Command_Events_EIPStandard")
    _TermEditLib()
    $lvControlGui = GuiCreate("LVCONTROL",0,0,1,1,$WS_POPUP,-1,$hParent)
    $lvEdit = GUICtrlCreateInput($lvEditStart, 0, 0, 1, 1, BitOR($ES_AUTOHSCROLL, $ES_NOHIDESEL, $WS_BORDER), 0)
    GUICtrlSetState($lvEdit, $GUI_HIDE)
    GuiCtrlSetFont($lvEdit,8.5)
    $lvCombo = GUICtrlCreateCombo($lvComboStart, 0, 0, 1, 1,-1,$WS_EX_TOPMOST)
    GUICtrlSetState($lvCombo, $GUI_HIDE)
    $lvDate = GUICtrlCreateDate($lvDataStart,0, 0, 1, 1,BitOR($GUI_SS_DEFAULT_DATE, $DTS_SHORTDATEFORMAT),BitOr($WS_EX_CLIENTEDGE,$WS_EX_TOPMOST ))
    GUICtrlSetState($lvDate, $GUI_HIDE)
    $lvList = GUICtrlCreateList($lvListStart, 0, 0, 1, 1,-1,$WS_EX_TOPMOST)
    GUICtrlSetState($lvList, $GUI_HIDE)
    $lvCheckbox = GUICtrlCreateCheckbox('',0,0);    ----Addition---
    GUICtrlSetState($lvCheckBox, $GUI_HIDE) ;   ----Addition---
    GuiSetState(@SW_SHOW)
    GUIRegisterMsg($WM_ACTIVATE,$EIP_WMACTIVATEfunc)
    GUIRegisterMsg($WM_MOVE,    $EIP_WMMOVEEVENTfunc)
    GUIRegisterMsg($WM_MOVING,  $EIP_WMMOVINGfunc)
    GUIRegisterMsg($WM_NOTIFY,  $EIP_WMNOTIFYfunc)
    GUIRegisterMsg($WM_COMMAND, $EIP_WMCOMMANDfunc)
EndFunc  ;==>_InitEditLib
 
;===============================================================================
; Function Name:    _TermEditLib
; Description:      Deletes the editing controls and un-registers WM_NOTIFY handler.
; Parameter(s):
; Requirement(s):
; Return Value(s):
; User CallTip:
; Author(s):
; Note(s):      Call this when close your gui if switching to another gui.
;===============================================================================
Func _TermEditLib()
    GUICtrlDelete($lvEdit)
    GUICtrlDelete($lvCombo)
    GUICtrlDelete($lvDate)
    GuiCtrlDelete($lvList)
    GuiCtrlDelete($lvCheckbox); ----Addition---
    GUIRegisterMsg($WM_ACTIVATE,"")
    GUIRegisterMsg($WM_MOVE,"")
    GUIRegisterMsg($WM_MOVING,"")
    GUIRegisterMsg($WM_NOTIFY, "")
    GUIRegisterMsg($WM_COMMAND,"")
EndFunc  ;==>_TermEditLib
;===============================================================================
; Function Name:    ListView_Click
; Description:  Called from WN_NOTIFY event handler.
; Parameter(s):
; Requirement(s):
; Return Value(s):
; User CallTip:
; Author(s):        Stephen Podhajecki <gehossafats at netmdc.com/>
; Note(s):
;===============================================================================
Func _ListView_Click()
ConsoleWrite(_DebugHeader("_ListView_Click"))
ConsoleWrite("$editFlag="&$editFlag&@lf)
ConsoleWrite("$bLVUPDATEonfocusCHANGE = "&$bLVUPDATEonfocusCHANGE &@LF)
   ;----------------------------------------------------------------------------------------------
    If $DebugIt Then
        If $DebugIt Then ConsoleWrite(_DebugHeader("_ListView_Click"))
    EndIf
   ;----------------------------------------------------------------------------------------------
    If $editFlag = 1 Then
        If $bLVUPDATEonfocusCHANGE = True Then
            
            If $editCtrl = $lvDate Then
                If $bDATECHANGED = False Then
                    _CancelEdit()
                    Return
                EndIf
            EndIf
            If UBound($LVcolControl) - 1 < $LVINFO[1] Then ;------ Adjusted - Brought this back to prevent errors when listview is not full -------start;
                _CancelEdit()
            Else
                _LVUpdate($editCtrl, $__LISTVIEWCTRL, $LVINFO[6], $LVINFO[7])
            EndIf;------ Adjusted - Brought this back to prevent errors when listview is not full ------------------------------------------------end;
            
        Else
            _CancelEdit()
        EndIf
    Else
        If $bLVEDITondblclick = False Then
            sleep(10)
            _InitEdit($LVINFO, $LVcolControl)
        EndIf
    EndIf
EndFunc  ;==>ListView_Click
;===============================================================================
; Function Name:    ListView_RClick
; Description:  Called from WN_NOTIFY event handler.
; Parameter(s):
; Requirement(s):
; Return Value(s):
; User CallTip:
; Author(s):        Stephen Podhajecki <gehossafats at netmdc.com/>
; Note(s):
;===============================================================================
Func _ListView_RClick()
    If $editFlag = 1 Then
        Return 0
    Else
        If $LVINFO[0] < 0 Or $LVINFO[1] < 0 Then Return 0
        If $LVcolRControl[$LVINFO[1]] = 256 Then Call($LVCONTEXT,$LVINFO);call context call back function.
        _CancelEdit()
    EndIf
   ;----------------------------------------------------------------------------------------------
    If $DebugIt Then ConsoleWrite(_DebugHeader("$NM_RCLICK"))
   ;----------------------------------------------------------------------------------------------
EndFunc  ;==>ListView_RClick
;===============================================================================
; Function Name:    ListView_DoubleClick
; Description:  Called from WN_NOTIFY event handler.
; Parameter(s):
; Requirement(s):
; Return Value(s):
; User CallTip:
; Author(s):
; Note(s):          Initiates the edit process on a DblClick
;===============================================================================
Func _ListView_DoubleClick()
   ;----------------------------------------------------------------------------------------------
    If $DebugIt Then ConsoleWrite(_DebugHeader("$NM_DBLCLICK"))
   ;----------------------------------------------------------------------------------------------
    If $editFlag = 0 Then
        _InitEdit($LVINFO, $LVcolControlDouble)
    Else
        _CancelEdit()
    EndIf
EndFunc  ;==>ListView_DoubleClick
; WM_NOTIFY event handler
;===============================================================================
; Function Name:    _MonitorEditState
; Description:      Handles {enter} {esc} and {f2}
; Parameter(s):         $h_gui          - IN/OUT -
;                      $editCtrl        - IN/OUT -
;                      $editFlag        - IN/OUT -
;                      $__LISTVIEWCTRL  - IN/OUT -
;                      $LVINFO           - IN/OUT -
;                      $LVcolControl    - IN -
; Requirement(s):
; Return Value(s):
; User CallTip:
; Author(s):
; Note(s):
;===============================================================================
Func _MonitorEditState(ByRef $editCtrl, ByRef $editFlag, ByRef $__LISTVIEWCTRL, ByRef $LVINFO)
    Local $pressed = _vKeyCheck()
    If $editFlag And $pressed = 13 Then; pressed enter
        _LVUpdate($editCtrl, $__LISTVIEWCTRL, $LVINFO[0], $LVINFO[1])
    ElseIf $editFlag And $pressed = 27 Then; pressed esc
        _CancelEdit()
    ElseIf Not $editFlag And $pressed = 113 Then; pressed f2
        MouseClick("primary");workaround work all the time (if mouse is over the control)
        MouseClick("primary")
    EndIf
    If $bCALLBACK_EVENT = True Then
        $bCALLBACK_EVENT = False
       
        Call($LVCALLBACK, $LVINFO)
    EndIf
EndFunc  ;==>_MonitorEditState
Func Enter()
   ; just a dummy function
EndFunc  ;==>Enter
;===============================================================================
; Function Name:    _LVUpdate
; Description:      Put the new data in the Listview
; Parameter(s): $editCtrl        - IN/OUT -
;                       $__LISTVIEWCTRL  - IN/OUT -
;                       $iRow                - IN -
;                       $iCol                - IN -
;
; Requirement(s):
; Return Value(s):
; User CallTip:
; Author(s):
; Note(s):
;===============================================================================
Func _LVUpdate(ByRef $editCtrl, ByRef $__LISTVIEWCTRL, $iRow, $iCol)
;   If $DebugIt Then ConsoleWrite("_LVUpdate>>"&@LF)
    If $bCanceled then Return
    If $editCtrl = $lvCheckbox Then                 ;------- Addition ------;
        Local $CBstate = GUICtrlRead($editCtrl)     ;------- Addition ------;
        If  $CBstate = $GUI_UNCHECKED Then          ;------- Addition ------;
            Local $newText = $checkboxSymbolUNChecked;------- Addition ------;
        ElseIf $CBstate =$GUI_CHECKED THen          ;------- Addition ------;
            Local $newText = $checkboxSymbolChecked ;------- Addition ------;
        EndIf
        
    Else
        Local $newText = GUICtrlRead($editCtrl)
    EndIf
    If $editCtrl = $lvList or $editCtrl = $lvCombo Then
        If $newText <> "" Then
            _GUICtrlListViewSetItemText($__LISTVIEWCTRL, $iRow, $iCol, $newText)
        EndIf
    Else
        _GUICtrlListViewSetItemText($__LISTVIEWCTRL, $iRow, $iCol, $newText)
    EndIf
    $LVINFO[6] = $iRow
    $LVINFO[7] = $iCol
    _CancelEdit()
EndFunc  ;==>_LVUpdate
;===============================================================================
; Function Name:    _GUICtrlListViewGetSubItemRect
; Description:   Get the bounding rect of a listview item
; Parameter(s): $h_listview - IN -
;                       $row            - IN -
;                       $col             - IN -
;                       $aRect      - IN/OUT -
;
; Requirement(s):
; Return Value(s):
; User CallTip:
; Author(s):
; Note(s):
;===============================================================================
Func _GUICtrlListViewGetSubItemRect($h_listview, $row, $col, ByRef $aRect)
    Local $rectangle, $rv,$ht[4]
    $rectangle = DllStructCreate("int;int;int;int");left, top, right, bottom
    DllStructSetData($rectangle, 1, $LVIR_BOUNDS)
    DllStructSetData($rectangle, 2, $col)
    If IsHWnd($h_listview) Then
        Local $a_ret = DllCall("user32.dll", "int", "SendMessage", "hwnd", $h_listview, "int", $LVM_GETSUBITEMRECT, "int", $row, "ptr", DllStructGetPtr($rectangle))
        $rv = $a_ret[0]
    Else
        $rv = GUICtrlSendMsg($h_listview, $LVM_GETSUBITEMRECT, $row, DllStructGetPtr($rectangle))
    EndIf
        ReDim $aRect[4]
        $aRect = $ht
        $aRect[0] = DllStructGetData($rectangle, 1)
        $aRect[1] = DllStructGetData($rectangle, 2)
        $aRect[2] = DllStructGetData($rectangle, 3)
        $aRect[3] = DllStructGetData($rectangle, 4) - $aRect[1]
    $rectangle = 0
    Sleep(10)
    Return $rv
EndFunc  ;==>_GUICtrlListViewGetSubItemRec
;===============================================================================
; Function Name:    _InitEdit
; Description:      Bring forth the editing control and set focus on it.
; Parameter(s): $LVINFO          - IN -
;                       $_LVcolControl  - IN -
;
; Requirement(s):
; Return Value(s):
; User CallTip:
; Author(s):
; Note(s):
;===============================================================================
Func _InitEdit($LVINFO, $_LVcolControl)
    If $bPROGRESSSHOWING = True Then Return
   ;ConsoleWrite("_InitEdit>>"&@LF)
    If $bCanceled  Then
        $bCanceled = False
        Return
    EndIf
    if $bCALLBACK Then
        _CancelEdit()
        $bCALLBACK = False
    EndIf
   
    If $editFlag = 1 Then _CancelEdit()
    Local $CtrlType
    If $LVINFO[0] < 0 Or $LVINFO[1] < 0 Then Return 0
    If UBound($_LVcolControl) - 1 < $LVINFO[1] Then
        $CtrlType = 0
    Else
        $CtrlType = $_LVcolControl[$LVINFO[1]]
    EndIf
   ;----------------------------------------------------------------------------------------------
    If $DebugIt Then ConsoleWrite(_DebugHeader("$CtrlType:" & $CtrlType))
   ;----------------------------------------------------------------------------------------------
    Switch $CtrlType
        Case 1
            GUICtrlSetData($lvEdit, "")
            $editCtrl = $lvEdit
        Case 2
            $editCtrl = $lvCombo
        Case 4
            $editCtrl = $lvDate
        Case 8
            $editCtrl = $lvList
        Case 128
            $editCtrl = $lvCheckbox ;------Addition-----;
        Case 256
            $bCALLBACK= True
        Case Else
            Return
    EndSwitch
    If $bCALLBACK Then
        $bCALLBACK = False
        $bCALLBACK_EVENT =True
    Else
       ;----------------------------------------------------------------------------------------------
        If $DebugIt Then ConsoleWrite(_DebugHeader("Classname="&_GetClassName($editCtrl)))
       ;----------------------------------------------------------------------------------------------
        Local $editCtrlPos = _CalcEditPos($__LISTVIEWCTRL,$LVINFO)
        Local $x1 , $y1
        ClientToScreen($__EIP_GUI,$x1,$y1)
        WinMove($lvControlGui,"", $editCtrlPos[0]+($x1-1),$editCtrlPos[1]+($y1-1), $editCtrlPos[2],$editCtrlPos[3])
;       GUICtrlSetPos($editCtrl, $editCtrlPos[0],$editCtrlPos[1], $editCtrlPos[2],$editCtrlPos[3])
        GUICtrlSetPos($editCtrl, 0,0, $editCtrlPos[2],$editCtrlPos[3])
        Local $oldText = _GUICtrlListViewGetItemText($__LISTVIEWCTRL, $LVINFO[0], $LVINFO[1])
        If $DebugIt Then ConsoleWrite($oldText&@LF)
        GUICtrlSetState($__LISTVIEWCTRL,$GUI_NOFOCUS)
        If $DebugIt Then ConsoleWrite(_GetClassName($editCtrl)&@LF)
        Switch $editCtrl
            Case $lvList
                If $oldText <> "" Then   GUICtrlSetData($editCtrl, $oldText)
            Case $lvCombo
                If $oldText <> "" Then
                    Local $index = _GUICtrlComboFindString($editCtrl,$oldText)
                    If $DebugIt Then ConsoleWrite("index="&@LF)
                    If ($index = -1) Then $index = _GUICtrlComboAddString($editCtrl,$oldText)
                    _GUICtrlComboSetCurSel($editCtrl,$index)
                    GUICtrlSetState($editCtrl,$GUI_ONTOP)
                EndIf
            Case $lvCheckbox
                
                    If $oldText = $checkboxSymbolChecked Then
                        GUICtrlSetState($editCtrl, $GUI_CHECKED)
                    Else
                        GUICtrlSetState($editCtrl, $GUI_UNCHECKED)
                    EndIf
                

            Case Else   
                GUICtrlSetData($editCtrl, $oldText)
        EndSwitch
        $editFlag = 1
       
        GUICtrlSetState($__LISTVIEWCTRL,$GUI_NOFOCUS)
        If $DebugIt Then ConsoleWrite("Set pos"&@LF)
        WinMove($lvControlGui,"", $editCtrlPos[0]+($x1-1),$editCtrlPos[1]+($y1-1), $editCtrlPos[2]+1,$editCtrlPos[3]+1)
        WinSetOnTop($lvControlGui,"",1)
        GUISetState(@SW_SHOW,$lvControlGui)
;~      GUICtrlSetPos($editCtrl, $editCtrlPos[0],$editCtrlPos[1], $editCtrlPos[2],$editCtrlPos[3])
;~      GUICtrlSetState($editCtrl, $GUI_SHOW)
        GUICtrlSetPos($editCtrl, 0,0, $editCtrlPos[2],$editCtrlPos[3])
        GUICtrlSetState($editCtrl, $GUI_SHOW)
        GUICtrlSetState($editCtrl, $GUI_FOCUS)
;      GUIRegisterMsg($WM_ACTIVATE,"WM_ACTIVATE")
        EndIf
        If $DebugIt Then ConsoleWrite("Leaving _InitEdit()"&@LF)
EndFunc  ;==>_InitEdit

Func _MoveControl()
        If $bInitiated =  True Then
            Local $editCtrlPos = _CalcEditPos($__LISTVIEWCTRL,$LVINFO)
            Local $x1 , $y1
            ClientToScreen($__EIP_GUI,$x1,$y1)
            If $editCtrlPos[0]>0 Then
                WinMove($lvControlGui,"", $editCtrlPos[0]+($x1-1),$editCtrlPos[1]+($y1-1), $editCtrlPos[2],$editCtrlPos[3])
            Else
                WinMove($lvControlGui,"", $x1+1,$editCtrlPos[1]+($y1-1), $editCtrlPos[2]-Abs($editCtrlPos[0]),$editCtrlPos[3])
            EndIf
           ;GUICtrlSetPos($editCtrl, 0,0, $editCtrlPos[2],$editCtrlPos[3])
        EndIf
EndFunc
Func _CalcEditPos($nLvCtrl,$aINFO)
       Local $pos[4]
        Local $ctrlSize = ControlGetPos($__EIP_GUI,"",$nLvCtrl)
        Local $ERR = @error
        $pos[0] = $aINFO[2]
        $pos[1] = $aINFO[3]+3
        $pos[2] = $aINFO[4]
        $pos[3] = $aINFO[5]-4
        If $ERR Then
            ConsoleWrite("NoControlPos"&@LF)
            Return $pos
        EndIf
        If $aINFO[2]+$aINFO[4] > $ctrlSize[2] Then
            $pos[0] = $aINFO[2] - (($aINFO[2]+$aINFO[4])- $ctrlSize[2])
        EndIf
        If $editCtrl = $lvList Then
           ;make the list fit inside the ListView.
            Local $initH = (_GUICtrlListCount($lvList)*14.5)*(_GUICtrlListCount($lvList)*14.5 >0)
            Local $y1 = $ctrlSize[3] - $aINFO[3] -21
            $y1 =  $y1* ($y1>21)
            If $initH < $y1 Then
                $pos[3]= $initH
            Else
                $pos[3] =$y1
            EndIf
           
        EndIf
        If _LvHasCheckStyle($__LISTVIEWCTRL) And $aINFO[1]= 0 And $editCtrl = $lvEdit  Then
           ;compensate for check box
            $pos[2] = $aINFO[4]-21
            $pos[0] = $aINFO[2]+21
        EndIf
    Return $pos
EndFunc

;===============================================================================
; Function Name:    _CancelEdit
; Description:      Cancels the editing process, and kills the hot keys.
; Parameter(s):
; Requirement(s):
; Return Value(s):
; User CallTip:
; Author(s):
; Note(s):
;===============================================================================
Func _CancelEdit()
    ConsoleWrite("_CancelEdit>>"&@LF)
    HotKeySet("{Enter}")
    HotKeySet("{Esc}")
   ;if $editFlag = 1 then Send("{Enter}");quit edit mode
    $editFlag = 0
    GUISetState(@SW_Hide,$lvControlGui); additionally hide it
    WinSetOnTop($lvControlGui,"",0); remove topmost attrib
    WinMove($lvControlGui,"",1024,768,1,1);move to bottom right corner
    GUICtrlSetState($editCtrl, $GUI_HIDE)
    GUICtrlSetPos($editCtrl, 0,0, 1, 1)
    $bCanceled = True
    $bDATECHANGED = False
   ;----------------------------------------------------------------------------------------------
    If $DebugIt Then ConsoleWrite(_DebugHeader("_CancelEdit()"))
   ;----------------------------------------------------------------------------------------------
   ;if Not(WinActive($__EIP_GUI,"")) Then WinActivate($__EIP_GUI,"")
EndFunc  ;==>_CancelEdit

;===============================================================================
; Function Name:    _FillLV_Info
; Description:      This fills the passed in array with row col and rect info for
;                       used by the editing controls
; Parameter(s): $__LISTVIEWCTRL - IN/OUT -
;                       $iRow                - IN -
;                       $iCol                - IN -
;                       $aLVI                - IN/OUT -
;
; Requirement(s):
; Return Value(s):
; User CallTip:
; Author(s):
; Note(s):
;===============================================================================
Func _FillLV_Info(ByRef $nLvCtrl, $iRow, $iCol, ByRef $aLVI,$iFlag = 1)
    If $iFlag Then
        $aLVI[6] = $aLVI[0]   ;set old row
        $aLVI[7] = $aLVI[1]   ;set old col
        $aLVI[0] = $iRow       ;set new row
        $aLVI[1] = $iCol       ;set new col
    EndIf
    If $iRow < 0 Or $iCol < 0 Then Return 0
    Local $lvi_rect[4], $pos = ControlGetPos($__EIP_GUI, "", $nLvCtrl)
    _GUICtrlListViewGetSubItemRect($nLvCtrl, $iRow, $iCol, $lvi_rect)
    $aLVI[2] = $pos[0] + $lvi_rect[0] + 5
    $aLVI[3] = $pos[1] + $lvi_rect[1]
    $aLVI[4] = _GUICtrlListViewGetColumnWidth($nLvCtrl, $iCol) - 4
    $aLVI[5] = $lvi_rect[3] + 5
    Sleep(10)
    Return 1
EndFunc  ;==>_FillLV_Info


;===============================================================================
; Function Name:    WM_ACTIVATE_Events_EIPStandard
; Description:      Event handler for windows WM_ACTIVATE messages
; Parameter(s): 
;
; Requirement(s):
; Return Value(s):
; User CallTip:
; Author(s):
; Note(s):
;===============================================================================
Func WM_ACTIVATE_EIPStandard($hWndGUI, $MsgID, $wParam, $lParam)
    #forceref $hWndGui,$MsgID,$wParam, $lParam
    Local $wa = _LoWord($wParam);<<--------------------------------------------What was this going to be used for?--------------------?;
    Local $hActive = DllCall("user32.dll","hwnd","GetForegroundWindow")
    If $lParam = 0 And $editFlag = 1  Then
        _CancelEdit()
    EndIf
    If IsArray($hActive) Then
        WinSetOnTop($hActive[0],"",1)
        WinSetOnTop($hActive[0],"",0)
    EndIf
   Return 0
EndFunc

;===============================================================================
; Function Name:    WM_Notify_Events_EIPStandard
; Description:      Event handler for windows WN_NOTIFY messages
; Parameter(s): $hWndGUI         - IN -
;                       $MsgID       - IN -
;                       $wParam      - IN -
;                       $lParam      - IN -
;
; Requirement(s):
; Return Value(s):
; User CallTip:
; Author(s):
; Note(s):
;===============================================================================
Func WM_Notify_Events_EIPStandard($hWndGUI, $MsgID, $wParam, $lParam)
    #forceref $hWndGUI, $MsgID, $wParam
    Local $tagNMHDR, $pressed,$event, $retval = $GUI_RUNDEFMSG;, $idFrom
    $tagNMHDR = DllStructCreate("int;int;int", $lParam);NMHDR (hwndFrom, idFrom, code)
    If @error Then
        $tagNMHDR =0
        Return
    EndIf
;~   $from = DllStructGetData($tagNMHDR, 1)
;~   $idFrom = DllStructGetData($tagNMHDR,2)
   ;ConsoleWrite("idFrom="&$idFrom&@LF)
    $event = DllStructGetData($tagNMHDR, 3)
    Select
        Case ($event = $HDN_TRACK or $event = $HDN_TRACKW)
           ;column dragging
            _CancelEdit()
        Case $MsgID = $WM_MOVING
            _MoveControl()
        Case $wParam = $__LISTVIEWCTRL
            Select
                Case $event = $LVN_ITEMCHANGED
                Local $ckcount = _LvGetCheckedCount($__LISTVIEWCTRL)
                    If $LVCHECKEDCNT <> $ckcount Then
                        $LVCHECKEDCNT = $ckcount
                        $bLVITEMCHECKED = True
                        _CancelEdit()
                    EndIf

                Case $event = $NM_CLICK
                    If $bLVEDITondblclick = False Then
                        
                        _LVGetInfo($lParam)
                       ;scroll column into view.
                        Switch $LVINFO[1]
                        Case 0
                            _GUICtrlListViewScroll ( $__LISTVIEWCTRL, -$LVINFO[4], 0 )
                            _FillLV_Info($__LISTVIEWCTRL, $LVINFO[8], $LVINFO[9], $LVINFO,0)
                           ;_LVGetInfo($lParam)
                        Case Else
                            Local $ctrlSize = ControlGetPos("","",$__LISTVIEWCTRL)
                            If $LVINFO[2]+$LVINFO[4] > $ctrlSize[2] Then
                            _GUICtrlListViewScroll ( $__LISTVIEWCTRL, $LVINFO[4], 0 )
                            _FillLV_Info($__LISTVIEWCTRL, $LVINFO[8], $LVINFO[9], $LVINFO,0)
                            EndIf
                        EndSwitch
                        if Not $bLVITEMCHECKED Then
                            _ListView_Click()
                        EndIf
                    Else
                        if $editFlag = 1 Then _CancelEdit()
                    EndIf
                    $bLVITEMCHECKED = False;   
                    
                Case $event = $NM_DBLCLK
                   ConsoleWrite("$NM_DBLCLK"&@LF)
                    _LVGetInfo($lParam)
                    _ListView_DoubleClick()
                Case $event = $NM_RCLICK
                    _LVGetInfo($lParam)
                    _ListView_RClick()
                Case $event = -180
                    If $DebugIt Then ConsoleWrite("LVEVENT=-180"&@LF)
                    If $editFlag = 1 Then
                        Send("{Esc}")
                        _CancelEdit()
                        $retval = 0
                    EndIf
                Case $event = -181
                    If $DebugIt Then ConsoleWrite("LVEVENT=-181"&@LF)
                    _FillLV_Info($__LISTVIEWCTRL, $LVINFO[0], $LVINFO[1], $LVINFO,0)
                Case $event= -121
                    If $DebugIt Then ConsoleWrite("LVEVENT=-121"&@LF)
                    _LVGetInfo($lParam,1)
                Case Else
                    If $DebugIt Then ConsoleWrite("LV_EVENT>>"&$event&@LF)
            EndSelect
        Case $lvDate
            Select
                Case $event = $DTN_DROPDOWN
                    $bCanceled = False
                    $bDATECHANGED = False
                Case $event = $DTN_WMKEYDOWNA
                    $pressed = _vKeyCheck()
                    If $pressed = 27 Then _CancelEdit()
                Case $event = $DTN_DATETIMECHANGE
                    If $DebugIt Then ConsoleWrite("DTN_DATETIMECHANGE"&@LF)                
                    If $bDATECHANGED = False Then $bDATECHANGED = True
                    $pressed = _vKeyCheck()
                    if $pressed = 27 Then
                        _CancelEdit()
                        $bDATECHANGED = False
                    EndIf
                Case $event = $DTN_CLOSEUP
                    If $DebugIt Then ConsoleWrite("DTN_CLOSEUP"&@LF)           
                    if $bCanceled or ($bDATECHANGED = False) Then
                        Send("{Esc}")
                        $bDATECHANGED = False
                    Else
;                       If $bLVUPDATEonfocusCHANGE = True Then
                            Send("{Enter}")
                            $bDATECHANGED = True
;                       Else
;                           Send("{Esc}")
;                       EndIf
                    EndIf
                case $event = -7
                    If $DebugIt Then ConsoleWrite("dtn $event="&$event&@LF)
                    $bCanceled = False
                    $bDATECHANGED = False
                Case $event = -8
                    If $DebugIt Then ConsoleWrite("dtn $event="&$event&" , ")
                    If $DebugIt Then ConsoleWrite("$bCanceled="&$bCanceled&@LF)
                    If $DebugIt Then ConsoleWrite("$bDATECHANGED="&$bDATECHANGED&@LF)
                    if $bCanceled = True Then
                       ;or ($bDATECHANGED = False) Then
                        Send("{Esc}")
                        $bDATECHANGED = False
                        $bCanceled = False
                    Else
                        $bDATECHANGED = True
                    EndIf
            EndSelect
        Case $event = -326
            ConsoleWrite("HDN Notification: "&$event&@LF)
            if $editFlag Then _CancelEdit()
        Case $MsgID = $WM_KEYDOWN
           ;----------------------------------------------------------------------------------------------
            If $DebugIt Then ConsoleWrite(_DebugHeader("Keydown"))
           ;----------------------------------------------------------------------------------------------
        Case Else
            If $DebugIt Then ConsoleWrite("WPARAM = "&$wParam&@LF)
                   ;;uncomment the following line to have the edit _LVUpdate if the mouse moves
           ;;off of the listview.
           ;If $editFlag And Not(_HasFocus($editCtrl)) Then _LVUpdate($editCtrl, $__LISTVIEWCTRL, $LVINFO[0], $LVINFO[1]);-----unmarkedout-----;
    EndSelect
    If $DebugIt Then
        If $wParam <> $__LISTVIEWCTRL Then
            ConsoleWrite($hWndGUI &" "& $event&@LF)
        EndIf
    EndIf
   
    $tagNMHDR = 0
    $event = 0
    $lParam = 0
    Return $retval
EndFunc  ;==>WM_Notify_Events


;===============================================================================
; Function Name:    WM_MOVE_EVENT_EIPStandard
; Description:    Event handler for windows WN_Move messages
; Parameter(s):     $hWndGUI        - IN -
;                  $MsgID           - IN -
;                  $wParam       - IN -
;                  $lParam          - IN -
;
; Requirement(s):
; Return Value(s):
; User CallTip:
; Author(s):
; Note(s):
;===============================================================================
Func WM_MOVE_EVENT_EIPStandard($hWndGUI, $MsgID, $wParam, $lParam)
    #forceref $hWndGuI,$MsgID,$wParam,$lParam
    If $editFlag Then _MoveControl()
    Return True
EndFunc

;===============================================================================
; Function Name:    WM_Command_Events_EIPStandard
; Description:      Event handler for windows WN_Command messages
; Parameter(s): $hWndGUI         - IN -
;                       $MsgID       - IN -
;                       $wParam      - IN -
;                       $lParam      - IN -
;
; Requirement(s):
; Return Value(s):
; User CallTip:
; Author(s):
; Note(s):
;===============================================================================
Func WM_Command_Events_EIPStandard($hWndGUI, $MsgID, $wParam, $lParam)
    #forceref $hWndGUI, $MsgID, $wParam
    Local $nNotifyCode, $nID,$hCtrl
    Local $retval = $GUI_RUNDEFMSG
    $nNotifyCode    = BitShift($wParam, 16)
    $nID            = BitAnd($wParam, 0x0000FFFF)
    $hCtrl        = $lParam
       Switch $nID
          Case  $lvList
            Switch $nNotifyCode 
                Case $LBN_DBLCLK
                    $bLVDBLCLICK = True
                   ;Send("{Enter}")
                    _SendMessage($lvControlGui,$WM_COMMAND,_MakeLong($editCtrl,$LBN_SELCHANGE),$lParam)
                    _LVUpdate($editCtrl, $__LISTVIEWCTRL, $LVINFO[0], $LVINFO[1])
                    Return $GUI_RUNDEFMSG
                Case $LBN_SELCHANGE
                If $DebugIt Then ConsoleWrite("$LBN_SELCHANGE"&@LF)
                    If Not $bLVDBLCLICK Then Return 0
                Case $LBN_SETFOCUS
                    If $DebugIt Then ConsoleWrite("$LBN_SETFOCUS"&@LF)
                Case $LBN_KILLFOCUS
                    If $DebugIt Then ConsoleWrite("$LBN_KILLFOCUS"&@LF)   
                Case Else
                    If $DebugIt Then ConsoleWrite("ListBox>>"&$nNotifyCode&@LF)
            EndSwitch
        Case $lvCombo
            Switch $nNotifyCode
                Case $CBN_SELCHANGE
                    If $DebugIt Then ConsoleWrite("$CBN_SELCHANGE"&@LF)
                    Send("{Enter}")
            EndSwitch
        Case Else
            If $DebugIt Then ConsoleWrite("$nId="&$nId&@lf)
    EndSwitch
    If $hCtrl = _GetComboInfo($lvCombo) And $DebugIt Then ConsoleWrite("$MsgID="&$MsgID&@LF)
    If $bCanceled  then
        $bCanceled = 0
        $retval = 0
    EndIf
                   
Return $retval
EndFunc

;===============================================================================
; Function Name :   _MakeLong
; Description       :   Converts two 16 bit values into on 32 bit value
; Parameter(s)      :   $LoWord      16bit value
;                       :   $HiWord      16bit value
; Return Value(s)   :   Long value
; Note(s)           :   
;===============================================================================
Func _MakeLong($LoWord,$HiWord)
  Return BitOR($HiWord * 0x10000, BitAND($LoWord, 0xFFFF))
EndFunc

;===============================================================================
; Function Name :   _LVGetInfo
; Description       :   
; Parameter(s)      :   $lParam      Pointer to $tagNMITEMACTIVE struct
;                           $iFlag       Optional value 0 (default)= fill all fields
;                                                                1 = fill just the latest click location.                                                
; Requirement(s)    :   
; Return Value(s)   :   
; User CallTip      :   
; Author(s)         :   
; Note(s)           :   
;===============================================================================
Func _LVGetInfo($lParam,$iFlag =0 )
    Local $tagNMITEMACTIVATE = DllStructCreate("int;int;int;int;int;int;int;int;int", $lParam)
    Local $clicked_row = DllStructGetData($tagNMITEMACTIVATE, 4)
    Local $clicked_col = DllStructGetData($tagNMITEMACTIVATE, 5)
    if $clicked_col < -1 then $clicked_col = -1
    if $clicked_row < -1 then $clicked_row = -1
    if $clicked_col > _GUICtrlListViewGetSubItemsCount($__LISTVIEWCTRL) then $clicked_col = -1
    if $clicked_row > _GUICtrlListViewGetItemCount($__LISTVIEWCTRL) then $clicked_row = -1
    $tagNMITEMACTIVATE = 0
    if $iFlag =0 then
        _FillLV_Info($__LISTVIEWCTRL, $clicked_row, $clicked_col, $LVINFO)
        $old_col = $clicked_col
    EndIf
        $LVINFO[8] = $clicked_row
        $LVINFO[9] = $clicked_col
   ;----------------------------------------------------------------------------------------------
    If $DebugIt Then ConsoleWrite(_DebugHeader("Col:" & $clicked_col))
    If $DebugIt Then ConsoleWrite(_DebugHeader("Row:" & $clicked_row))
   ;----------------------------------------------------------------------------------------------

EndFunc


;===============================================================================
; Function Name:    _DebugHeader
; Description:      Gary's console debug header.
; Parameter(s):         $s_text      - IN -
;
; Requirement(s):
; Return Value(s):
; User CallTip:
; Author(s):
; Note(s):
;===============================================================================
Func _DebugHeader($s_text)
    Return _
            "!===========================================================" & @LF & _
            "+===========================================================" & @LF & _
            "-->" & $s_text & @LF & _
            "+===========================================================" & @LF
EndFunc  ;==>_DebugHeader
   
;===============================================================================
; Function Name:    _GetClassName
; Description:      get the classname of a ctrl
; Parameter(s): $nCtrl       the ctrlId of to get classname for.
; Requirement(s):      
; Return Value(s):  Classname or 0 on failure
; User CallTip:   
; Author(s):        Stephen Podhajecki <gehossafats at netmdc.com/>
; Note(s):          Strips trailing numbers from classname.
;===============================================================================
Func _GetClassName($nCtrl)
    Local $ret, $struct = DllStructCreate("char[128]"),$classname = 0
    $ret = DllCall("user32.dll","int","GetClassName","hwnd",GUICtrlGetHandle($nCtrl),"ptr",DllStructGetPtr($struct),"int",DllStructGetSize($struct))
    If IsArray($ret) Then
        $classname = DllStructGetData($struct,1)
       ;ConsoleWrite("Classname="&$classname&@LF)
    EndIf
    $struct =0
    Return $classname
EndFunc
;===============================================================================
; Function Name:    vKeyCheck  alias for __IsPressedMod
; Description:  Gets a key press
; Parameter(s):         $dll         - IN/OPTIONAL -
; Requirement(s):
; Return Value(s): Return the key that is pressed or 0
; User CallTip:
; Author(s):
; Note(s):
;===============================================================================
Func _vKeyCheck($dll = "user32.dll")
    Local $aR, $hexKey, $i
    Local $vkeys[4]=[1,13,27,113];leftmouse,enter,esc,f2
    For $i =0 to UBound($vkeys)-1
        $hexKey = '0x'&Hex($vkeys[$i],2)
        $aR = DllCall($dll, "int", "GetAsyncKeyState", "int", $hexKey)
        If $aR[0] <> 0 Then Return $vkeys[$i]
        Sleep(5)
    Next
    Return 0
EndFunc  ;==>__IsPressedMod

;===============================================================================
; Function Name :   _HasFocus
; Description       :   Return true if control has focus
; Parameter(s)      :   $nCtrl Ctrlid to check
; Return Value(s)   :   True is ctrl has focus, false otherwise.
; User CallTip      :   
; Author(s)         :   Stephen Podhajecki <gehossafats at netmdc.com/>
; Note(s)           :   
;===============================================================================
Func _HasFocus($nCtrl)
    If $DebugIt Then ConsoleWrite("_HasFocus>>"&@LF)
    Local $hwnd
    if $nCtrl = $lvCombo Then
        $hwnd = _GetComboInfo($nCtrl,0)
    Else
        $hwnd = GUICtrlGetHandle($nCtrl)
    EndIf
    Return ($hwnd = ControlGetHandle($__EIP_GUI,"",ControlGetFocus($__EIP_GUI,"")))
EndFunc

;===============================================================================
; Function Name :   _SetLVCallBack
; Description       :   
; Parameter(s)      :   $CallBack    Function to use for(primary button) call back defaults to _CancelEdit()
; Return Value(s)   :   None.
; Author(s)         :   Stephen Podhajecki <gehossafats at netmdc.com/>
; Note(s)           :   This is used to open other controls and dialogs
;===============================================================================
Func _SetLVCallBack($CallBack = "_CancelEdit")
    If $CallBack <> "" Then $LVCALLBACK = $CallBack
EndFunc
   
;===============================================================================
; Function Name :   _SetLVContext
; Description       :   
; Description       :   
; Parameter(s)      :   $CallBack    Function to use for (secondary button) contexts defaults to _CancelEdit()
; Return Value(s)   :   None.
; Author(s)         :   Stephen Podhajecki <gehossafats at netmdc.com/>
; Note(s)           :   This is used to open other controls and dialogs (context menus)
;===============================================================================
Func _SetLVContext($Context = "_CancelEdit")
    if $Context <> "" Then $LVCONTEXT = $Context
EndFunc
;===============================================================================
; Function Name :   _LvHasCheckStyle
; Description       :   
; Parameter(s)      :   $hCtrl      Listview control to check for $LVS_EX_CHECKBOXES style
;
; Requirement(s)    :   
; Return Value(s)   :   
; User CallTip      :   
; Author(s)         :   Stephen Podhajecki <gehossafats at netmdc.com/>
; Note(s)           :   
;===============================================================================
Func _LvHasCheckStyle($hCtrl)
    Local $style =  _GUICtrlListViewGetExtendedListViewStyle($hCtrl)
    if (BitAnd($style,$LVS_EX_CHECKBOXES) = $LVS_EX_CHECKBOXES) Then Return True
    Return False
EndFunc

;===============================================================================
; Function Name :   _LvGetCheckedCount
; Description       :   
; Parameter(s)      :   $nCtrl       Listview control to get checked checkbox count.
;
; Requirement(s)    :   
; Return Value(s)   :   number of checked checkboxes, or zero.
; User CallTip      :   
; Author(s)         :   Stephen Podhajecki <gehossafats at netmdc.com/>
; Note(s)           :   
;===============================================================================
Func _LvGetCheckedCount($nCtrl)
    if _LvHasCheckStyle($nCtrl) Then
        Local $count =0
        For $x =0 to _GUICtrlListViewGetItemCount($nCtrl)-1
            If _GUICtrlListViewGetCheckedState($nCtrl,$x) Then $count += 1
        Next
        Return $count
    EndIf
    Return 0
EndFunc

;===============================================================================
; Function Name :   _GetComboInfo
; Description       :   
; Parameter(s)      :   $nCtrl      ComboBox control to get info for
;                           $type            0= return edit hwnd, 1=  return list hwnd
;
; Requirement(s)    :   
; Return Value(s)   :   return either the combos edit or list hwnd, or zero otherwise
; User CallTip      :   
; Author(s)         :   Stephen Podhajecki <gehossafats at netmdc.com/>
; Note(s)           :   
;===============================================================================
Func _GetComboInfo($nCtrl,$type =0)
   ;ConsoleWrite(" _GetClassName:"&_GetClassName($nCtrl)&@LF)
    If _GetClassName($nCtrl) <> "ComboBox" Then Return 0
    Local $ret, $cbInfo ,$v_ret
    $cbInfo = DllStructCreate("int;int[4];int[4];int;int;int;int")
    DllStructSetData($cbInfo,1,DllStructGetSize($cbInfo))
    $v_ret = DllCall("user32.dll","int","GetComboBoxInfo","hwnd",GUICtrlGetHandle($nCtrl),"ptr",DllStructGetPtr($cbInfo))
    if IsArray($v_ret) Then
        if $type = 0 Then
            $ret= DllStructGetData($cbInfo,6);edit handle
           ;ConsoleWrite("Text ="&WinGetText($ret)&@LF)
        Elseif $type =1 Then
            $ret = DllStructGetData($cbInfo,7);list handle
        EndIf
    EndIf
    $cbInfo =0
    Return $ret
EndFunc

Func _InvalidateRect($hWnd)
    Local $v_ret =  DllCall("user32.dll", "int", "InvalidateRect","hwnd",$hWnd,"ptr", 0,"int",1)
    return $v_ret[0]
EndFunc

Func _UpdateWindow($hWnd)
    Local $v_ret = DllCall("user32.dll", "int", "UpdateWindow", "hwnd", $hWnd)
    Return $v_ret[0]
EndFunc ;==>UpdateWindow
;;;ripped from help file.
; Convert the client (GUI) coordinates to screen (desktop) coordinates
Func ClientToScreen($hWnd, ByRef $x, ByRef $y)
    Local $stPoint = DllStructCreate("int;int")
    DllStructSetData($stPoint, 1, $x)
    DllStructSetData($stPoint, 2, $y)
    DllCall("user32.dll", "int", "ClientToScreen", "hwnd", $hWnd, "ptr", DllStructGetPtr($stPoint))
    $x = DllStructGetData($stPoint, 1)
    $y = DllStructGetData($stPoint, 2)
   ; release Struct not really needed as it is a local
    $stPoint = 0
EndFunc
Func _HiWord($x)
    Return BitShift($x, 16)
EndFunc  ;==>_HiWord

Func _LoWord($x)
    Return BitAND($x, 0xFFFF)
EndFunc  ;==>_LoWord

Requests/Wish List

--> Working on this. Currently not in the example script. I'm trying to get it to be more dynamic. Combobox loads different data per rows if scripter permits it too I can show you this one, but it is not as dynamic/flexible as it should be.
Make the TabHandler() more dynamic by allowing it to "figureout"/"know" which tab the LV is in. (I'm thinking on this one, but can't figure it out)
Option for a single click on checkbox row elements. Had a few methods for this, but none worked

Bug Report(s)

Right-click Popup Menu does not show in mouse coordinates, but at the row element's coordinates. I can't figure this one out.
Left-click for edit (double-click not on) does not immediately call the control.. The console reports a singleclick, but the edit control is not visible and the editflag is set to zero. I can't figure this one out. I might have done something to mess this up.

There are probably MUCH better ways to do what I've done! Please let me know how the adjustments I've done can be done better or if they should be removed. Again, I luv this udf!

EDIT

I will keep updating this post with updates

Edited September 15, 2007 by JohnBailey

JohnBailey · September 15, 2007

Why did my post jack up this thread !?

I'm using Firefox in a Windows XP Env.

eltorro · September 24, 2007

Bug Report(s)
Right-click Popup Menu does not show in mouse coordinates, but at the row element's coordinates. I can't figure this one out.
Left-click for edit (double-click not on) does not immediately call the control.. The console reports a singleclick, but the edit control is not visible and the editflag is set to zero. I can't figure this one out. I might have done something to mess this up.

The popup is a simple change in the context callback function(MyContext) in the main script :

$xx = 0
    $yy = 0
    ClientToScreen (WinGetHandle($Gui), $xx, $yy)
    Local $ctx = TrackPopupMenu(WinGetHandle($Gui), $hMenu, $xx + $aLVInfo[2], $yy + $aLVInfo[3])oÝ÷ Ù·¢g¬jëh×6    ; Context at mouse pos.
    $xx =  MouseGetPos(0) 
    $yy =  MouseGetPos(1)
    Local $ctx = TrackPopupMenu(WinGetHandle($Gui), $hMenu, $xx , $yy)oÝ÷ Øh¢GjÛazÈ§W'$¦ºéÒ¢éÝ¶jëz-êìjeyÈZ¢â´GbµÊ&éí¢ëmê®¢Ô^¶êçªê-²Özg§µ«¢+ÙÕ¹}%¹¥Ñ¥Ð ÀÌØí1Y%9

The check boxes, they display fine but what do you want to do with them?

Is there an array to store the checked state or a specific value for the listview item when it's checked?

Obviously, it is not hard to add.

silvano · October 1, 2007

hi,

i work with old version and when i check the checkbox in the gui

I must press two times the push-button (Ricevi) in order to execute the function

can I correct it?

this is my button

Global $riceviDati = GUICtrlCreateButton("Ricevi", 30, $guih - 40, 100, 25, 0)
GUICtrlSetOnEvent($riceviDati, "esegui")

see and test the attached file

thanks

test_setonevent.au3

eltorro · October 1, 2007

hi,
i work with old version and when i check the checkbox in the gui
I must press two times the push-button (Ricevi) in order to execute the function
can I correct it?

this is my button
Global $riceviDati = GUICtrlCreateButton("Ricevi", 30, $guih - 40, 100, 25, 0)
GUICtrlSetOnEvent($riceviDati, "esegui")
see and test the attached file

thanks

In the WM_Command_Events function at or around line 729

comment out "retval = 0" and see if that resolves you issue.

silvano · October 1, 2007

thanks, but sorry don't work very nice...

when i change the edit value

the button was pressed automatically and return msgbox

JohnBailey · October 18, 2007

The popup is a simple change in the context callback function(MyContext) in the main script :

I just saw this! For some reason, it didn't get emailed to me that there were posts after mine.

This rocks!

I'll respond to your question after lunch <_<

Edited October 18, 2007 by JohnBailey

JohnBailey · October 22, 2007

The check boxes, they display fine but what do you want to do with them?
Is there an array to store the checked state or a specific value for the listview item when it's checked?
Obviously, it is not hard to add.

I'm glad it's not hard to add. I was using chr(149) for checked and chr(32) for unchecked (or simply 1 and 0). What do you think?

As for what I want to do with them, I want users to be able to use a column to select something for an account. For example, there a listview displaying database information and one column with check capabilities could be used for signifying this a specific type of entry while another check column could further specify entry info.

The popup is a simple change in the context callback function(MyContext) in the main script :
I looked at the single click problem and I found the cause.
Another simple change in _InitEdit, comment out the "Return" statement:

Awesome thanks!!

Will66 · March 8, 2008

is there an update for this for latest autoit version?

ERROR: can't open include file <GuiCombo.au3>

#Include <GuiCombo.au3>

......

#include <GuiListview.au3>

#Include <GuiCombo.au3>

#Include <GuiList.au3>

have changed...eg. new version #Include <GuiComboBox.au3>

eltorro · March 8, 2008

is there an update for this for latest autoit version?
ERROR: can't open include file <GuiCombo.au3>
#Include <GuiCombo.au3>
......
#include <GuiListview.au3>
#Include <GuiCombo.au3>
#Include <GuiList.au3>
have changed...eg. new version #Include <GuiComboBox.au3>

Err... not yet. I try to get to it soon.

qsek · March 18, 2008

I discovered a bug.

when you hook the WINDOWPOSCHANGING message and just click some random Subitems, everytime

you leave the edit window, the content behind (the Subitemtext) is not being redrawn.

Can anyone figure out why?

I have to use the WINDOWPOSCHANGING message.

But EIP dont use it at all. So why this bug comes out?

Is there a special returnvalue?

I didnt found any info in the forums, too.

Add this line to any of your working EIP code to see the bug:

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
    
Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
    ;~  Local $nID = _LoWord($wParam)
    ;~  if $hWnd = $GUI then 
    ;~      $GUIposchanged = 1
            ConsoleWrite(" poschanges" & @CRLF)
    ;~  endif
    ;~ return 0
EndFunc

Can you imagine how desperate you can get, finding this bug in an 5k line script with several child

windows, WM_COMMAND and NOTIFY hooks and so on. You dont wanna know....

eltorro · March 19, 2008

I discovered a bug.
when you hook the WINDOWPOSCHANGING message and just click some random Subitems, everytime
you leave the edit window, the content behind (the Subitemtext) is not being redrawn.

Can anyone figure out why?
I have to use the WINDOWPOSCHANGING message.
But EIP dont use it at all. So why this bug comes out?
Is there a special returnvalue?
I didnt found any info in the forums, too.

Add this line to any of your working EIP code to see the bug:
GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
    
Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
    ;~  Local $nID = _LoWord($wParam)
    ;~  if $hWnd = $GUI then 
    ;~      $GUIposchanged = 1
            ConsoleWrite(" poschanges" & @CRLF)
    ;~  endif
    ;~ return 0
EndFunc
Can you imagine how desperate you can get, finding this bug in an 5k line script with several child
windows, WM_COMMAND and NOTIFY hooks and so on. You dont wanna know....

Frankly, I don't what is causing the problem. However I have a workaround. Try this and see if it still exhibits the same behavior.

I think the whole edit thing could be done using callback to properly sub-class the listview, but I don't have the time to pursue it.

Also I can't replace the link in the first post as the entire content of the post disappears when I try to edit it.

Edited March 19, 2008 by eltorro

martin · June 6, 2009

Frankly, I don't what is causing the problem. However I have a workaround. Try this and see if it still exhibits the same behavior.
I think the whole edit thing could be done using callback to properly sub-class the listview, but I don't have the time to pursue it.
Also I can't replace the link in the first post as the entire content of the post disappears when I try to edit it.

Until eltorro updates this script so that it runs with recent versions of AutoIt, and because a few people have asked about how to achieve this sort of in-place editing, here is a link to a post I made with an update to the UDF.

Edit In Place Listview (multi-column)

Recommended Posts

Link to comment

Share on other sites

Top Posters In This Topic

Top Posters In This Topic

Posted Images

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members