maniootek Posted October 26, 2023 Posted October 26, 2023 (edited) I need function to edit existing array. I create this code using GUIListViewEx UDF: expandcollapse popup#include-once #include <WindowsConstants.au3> ;$WS_OVERLAPPEDWINDOW + $WS_CLIPSIBLINGS + $WS_CLIPCHILDREN #include <GUIConstantsEx.au3> ;$GUI_EVENT_CLOSE #include "GUIListViewEx.au3" ArrayEdit_Example() Func ArrayEdit_Example() Local $aHeaders[] = ["name", "surname", "age"] Local $aDataTable[][] = [ ["bill", "gates"], ["jim", "carrey"], ["morgan", "freeman"] ] Local $aEditableCols[] = [2] ArrayEdit($aDataTable, $aHeaders, $aEditableCols) _ArrayDisplay($aDataTable, "$aArrayAfterEditing") EndFunc Func ArrayEdit(ByRef $aInput, $aHeaders, $aEditableCols) Local Const $GUI_WIDTH = 600 Local Const $GUI_HEIGHT = 400 AutoItSetOption("GUICoordMode", default) Local $hGUI = GUICreate(Default, $GUI_WIDTH, $GUI_HEIGHT, -1, -1, $WS_OVERLAPPEDWINDOW + $WS_CLIPSIBLINGS + $WS_CLIPCHILDREN, 8) ;$WS_EX_TOPMOST=8 Local $idListView = GUICtrlCreateListView(_ArrayToString($aHeaders), 10, 10, $GUI_WIDTH-20, $GUI_HEIGHT-20) Local $iExListViewStyle = BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_GRIDLINES, $LVS_EX_DOUBLEBUFFER) _GUICtrlListView_SetExtendedListViewStyle($idListView, $iExListViewStyle) For $i = 0 To UBound($aInput) - 1 GUICtrlCreateListViewItem(_ArrayToString($aInput, "|", $i, $i), $idListView) Next $iLV_Index = _GUIListViewEx_Init($idListView, $aInput, 0, 0, True, 512) ;32 = User coloured items, 512 = No internal drag/drop Local $sEditableCols = _ArrayToString($aEditableCols, ";") _GUIListViewEx_SetEditStatus($iLV_Index, $sEditableCols) _GUIListViewEx_MsgRegister(True, False, False) GUISetState(@SW_SHOW) Local $vRet While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE ExitLoop EndSwitch $vRet = _GUIListViewEx_EventMonitor() ; Use correct monitor function here <<<<<<<<<<<<<<<<<<< WEnd GUISetState(@SW_HIDE) Local $aContentOfListView = _GUIListViewEx_ReturnArray($iLV_Index, 0) $aInput = $aContentOfListView EndFunc Code is not perfect but I am wondering if you have any tips for me @Melba23 to improve it? Maybe somewhere there is already function which do the job? Edited October 26, 2023 by maniootek
Champak Posted October 28, 2023 Posted October 28, 2023 sometimes if I use the touchpad and swipe left/right to scroll the listview, the scrolling craaaaaawls ever so slowly. This issue doesn't happen if I grab the scrollbar and move to where I want to go. Is this a known thing, is there any programming tricks around that can correct this slowness when swiping with a touchpad?
Moderators Melba23 Posted October 28, 2023 Author Moderators Posted October 28, 2023 (edited) Champak, There is no touchpad support in the UDF - and I have no plans to add any. maniootek, Just back from a holiday - I will look into your code next week. M23 31k Edited February 29, 2024 by Melba23 Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Reveal hidden contents ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area
Champak Posted October 28, 2023 Posted October 28, 2023 Ok, i didnt think specific support had to be built for that, I thought I was just seeing a lag/quirk in the way it was scrolling that may have a work around. Np.
Moderators Melba23 Posted October 30, 2023 Author Moderators Posted October 30, 2023 maniootek, Perhaps as you are dealing with numbers, you could add an UpDown like this: expandcollapse popup#include <WindowsConstants.au3> ;$WS_OVERLAPPEDWINDOW + $WS_CLIPSIBLINGS + $WS_CLIPCHILDREN #include <GUIConstantsEx.au3> ;$GUI_EVENT_CLOSE #include "GUIListViewEx.au3" ArrayEdit_Example() Func ArrayEdit_Example() Local $aHeaders[] = ["name", "surname", "age"] Local $aDataTable[][] = [ ["bill", "gates"], ["jim", "carrey"], ["morgan", "freeman"] ] Local $aEditableCols[] = [2] ArrayEdit($aDataTable, $aHeaders, $aEditableCols) _ArrayDisplay($aDataTable, "$aArrayAfterEditing") EndFunc Func ArrayEdit(ByRef $aInput, $aHeaders, $aEditableCols) Local Const $GUI_WIDTH = 600 Local Const $GUI_HEIGHT = 400 ;AutoItSetOption("GUICoordMode", default) Local $hGUI = GUICreate(Default, $GUI_WIDTH, $GUI_HEIGHT, -1, -1, -1, 8) ;$WS_EX_TOPMOST=8 Local $idListView = GUICtrlCreateListView(_ArrayToString($aHeaders), 10, 10, $GUI_WIDTH - 20, $GUI_HEIGHT - 20, $LVS_SHOWSELALWAYS) _GUICtrlListView_SetExtendedListViewStyle($idListView, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_GRIDLINES)) For $i = 0 To UBound($aInput) - 1 GUICtrlCreateListViewItem(_ArrayToString($aInput, "|", $i, $i), $idListView) _GUICtrlListView_SetColumnWidth($idListView, $i, 100) Next $iLV_Index = _GUIListViewEx_Init($idListView, $aInput, 0, 0, True, 512) ;512 = No internal drag/drop Local $sEditableCols = _ArrayToString($aEditableCols, ";") _GUIListViewEx_SetEditStatus($iLV_Index, $sEditableCols, 1, 1, "1|120|1") :<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< _GUIListViewEx_MsgRegister(True, False, False) GUISetState(@SW_SHOW) Local $vRet While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE ExitLoop EndSwitch _GUIListViewEx_EventMonitor() WEnd $aInput = _GUIListViewEx_ReturnArray($iLV_Index, 0) GUIDelete($hGUI) EndFunc Other than that, I made one or two cosmetic changes which you can take or leave - simply a matter of preferred coding style. M23 robertocm 1 Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Reveal hidden contents ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area
maniootek Posted November 1, 2023 Posted November 1, 2023 On 10/30/2023 at 7:21 AM, Melba23 said: maniootek, Perhaps as you are dealing with numbers, you could add an UpDown like this: expandcollapse popup#include <WindowsConstants.au3> ;$WS_OVERLAPPEDWINDOW + $WS_CLIPSIBLINGS + $WS_CLIPCHILDREN #include <GUIConstantsEx.au3> ;$GUI_EVENT_CLOSE #include "GUIListViewEx.au3" ArrayEdit_Example() Func ArrayEdit_Example() Local $aHeaders[] = ["name", "surname", "age"] Local $aDataTable[][] = [ ["bill", "gates"], ["jim", "carrey"], ["morgan", "freeman"] ] Local $aEditableCols[] = [2] ArrayEdit($aDataTable, $aHeaders, $aEditableCols) _ArrayDisplay($aDataTable, "$aArrayAfterEditing") EndFunc Func ArrayEdit(ByRef $aInput, $aHeaders, $aEditableCols) Local Const $GUI_WIDTH = 600 Local Const $GUI_HEIGHT = 400 ;AutoItSetOption("GUICoordMode", default) Local $hGUI = GUICreate(Default, $GUI_WIDTH, $GUI_HEIGHT, -1, -1, -1, 8) ;$WS_EX_TOPMOST=8 Local $idListView = GUICtrlCreateListView(_ArrayToString($aHeaders), 10, 10, $GUI_WIDTH - 20, $GUI_HEIGHT - 20, $LVS_SHOWSELALWAYS) _GUICtrlListView_SetExtendedListViewStyle($idListView, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_GRIDLINES)) For $i = 0 To UBound($aInput) - 1 GUICtrlCreateListViewItem(_ArrayToString($aInput, "|", $i, $i), $idListView) _GUICtrlListView_SetColumnWidth($idListView, $i, 100) Next $iLV_Index = _GUIListViewEx_Init($idListView, $aInput, 0, 0, True, 512) ;512 = No internal drag/drop Local $sEditableCols = _ArrayToString($aEditableCols, ";") _GUIListViewEx_SetEditStatus($iLV_Index, $sEditableCols, 1, 1, "1|120|1") :<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< _GUIListViewEx_MsgRegister(True, False, False) GUISetState(@SW_SHOW) Local $vRet While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE ExitLoop EndSwitch _GUIListViewEx_EventMonitor() WEnd $aInput = _GUIListViewEx_ReturnArray($iLV_Index, 0) GUIDelete($hGUI) EndFunc Other than that, I made one or two cosmetic changes which you can take or leave - simply a matter of preferred coding style. M23 Expand Thank you. Is it possible to confirm editing by clicking on the any position in the GUI instead of hitting ENTER key?
Moderators Melba23 Posted November 1, 2023 Author Moderators Posted November 1, 2023 maniootek, Afraid not - clicking outside the edit control aborts the editing process. M23 Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Reveal hidden contents ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area
Resiak1811 Posted November 1, 2023 Posted November 1, 2023 (edited) I'm far to be as good as you Melba but you can "save" the edit by clicking away in the GUI like that : expandcollapse popup#include <WindowsConstants.au3>;$WS_OVERLAPPEDWINDOW + $WS_CLIPSIBLINGS + $WS_CLIPCHILDREN #include <GUIConstantsEx.au3>;$GUI_EVENT_CLOSE #include "GUIListViewEx.au3" ArrayEdit_Example() Func ArrayEdit_Example() Local $aHeaders[] = ["name", "surname", "age"] Local $aDataTable[][] = [["bill", "gates"], ["jim", "carrey"], ["morgan", "freeman"]] Local $aEditableCols[] = [2] ArrayEdit($aDataTable, $aHeaders, $aEditableCols) _ArrayDisplay($aDataTable, "$aArrayAfterEditing") EndFunc ;==>ArrayEdit_Example Func ArrayEdit(ByRef $aInput, $aHeaders, $aEditableCols) Local Const $GUI_WIDTH = 600 Local Const $GUI_HEIGHT = 400 Global $iEditMode = 0 ;AutoItSetOption("GUICoordMode", default) Local $hGUI = GUICreate(Default, $GUI_WIDTH, $GUI_HEIGHT, -1, -1, -1, 8) ;$WS_EX_TOPMOST=8 Local $idListView = GUICtrlCreateListView(_ArrayToString($aHeaders), 10, 10, $GUI_WIDTH - 20, $GUI_HEIGHT - 20, $LVS_SHOWSELALWAYS) _GUICtrlListView_SetExtendedListViewStyle($idListView, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_GRIDLINES)) For $i = 0 To UBound($aInput) - 1 GUICtrlCreateListViewItem(_ArrayToString($aInput, "|", $i, $i), $idListView) _GUICtrlListView_SetColumnWidth($idListView, $i, 100) Next ;~ $iLV_Index = _GUIListViewEx_Init($idListView, $aInput, 0, 0, True, 512) ;512 = No internal drag/drop ;~ Local $sEditableCols = _ArrayToString($aEditableCols, ";") ;~ _GUIListViewEx_SetEditStatus($iLV_Index, $sEditableCols, 1, 1, "1|120|1") ; :<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< $ReadToArray = _GUIListViewEx_ReadToArray($idListView, 1) $idListView_Edit = _GUIListViewEx_Init($idListView, $ReadToArray, 1, 0xFF0000, True, 4 + 64 + 128 + 256 + 512) _GUIListViewEx_SetEditStatus($idListView_Edit, "2") _GUIListViewEx_MsgRegister(True, False, False) GUISetState(@SW_SHOW) While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE ExitLoop EndSwitch $vRet = _GUIListViewEx_EventMonitor($iEditMode) If @error Then ;~ ;~ Do nothing ! EndIf Switch @extended Case 1 If $vRet <> "" Then $row = $vRet[1][0] $column = $vRet[1][1] $before = $vRet[1][2] $after = $vRet[1][3] Switch $column Case 2 _GUICtrlListView_SetItemText($idListView, $row, $after, $column) EndSwitch EndIf EndSwitch WEnd $aInput = _GUIListViewEx_ReturnArray($idListView_Edit, 0) GUIDelete($hGUI) EndFunc ;==>ArrayEdit Maybe it's not a good practice... but it works Edited November 1, 2023 by Resiak1811
Moderators Melba23 Posted November 2, 2023 Author Moderators Posted November 2, 2023 Resiak1811, I would strongly advise you NOT to code along those lines. You are amending the ListView content using non-UDF functions (_GUICtrlListView_SetItemText) which means that the UDF internal array mirroring the ListViewcontent will not reflect the actual content and will, with a very high degree of certainty, result in tears at bedtime. I have lost track of the number of times I have repeated the mantra: once the UDF is in use you MUST use the UDF functions to amend the ListView content. M23 Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Reveal hidden contents ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area
Anthony72 Posted January 13, 2024 Posted January 13, 2024 Hello everyone, I'm new to /forum.com and old to /forum.fr I would like to thank Melba23 for his work on the UDF of "GUIListViewEx.au3", very nice work. And as my presence is new I would like to ask for a small option that could make this beautiful project grow. Well let's get started, we have a lot of Functions that only deal with Columns, for example: Func _GUIListViewEx_SetEditStatus($iLV_Index, $vCol, $iMode = 1, $vParam1 = Default, $vParam2 = Default) But not the Rows, which made me come to this topic and not another because I want to be able to modify the content per ComboBox row with different content on the fly and according to a value to be updated. Thanks for reading me. ;~ Func _GUIListViewEx_SetEditStatus($iLV_Index, $vRow, $vCol, $iMode = 1, $vParam1 = Default, $vParam2 = Default) For $i = 0 To $aLV_List_Left[0][0] ; ... If $_Unit_of_measurement[$i] = $_Unit Then _GUIListViewEx_SetEditStatus( $iLV_Left_Index, $vRow[$j], 5, , 2, "Blue > Red|Blue < Greeen", 1) If $_Unit_of_measurement[$i] = $_Unit Then _GUIListViewEx_SetEditStatus( $iLV_Left_Index, $vRow[$j], 5, , 2, "Blue < Red|Blue > Greeen", 1) ; ... Next My UDF GuiStatusBar facile
Moderators Melba23 Posted January 13, 2024 Author Moderators Posted January 13, 2024 (edited) Anthony72, This question is better posted in the main UDF thread - I will move it there tomorrow. Moved. And I must admit that I am having some difficulty understanding exactly what you want as you have 2 identical If constructs so you never get past the first. Should I take it that the $_Unit values in the 2 constructs are actually different variables? M23 P.S. Welcome to the AutoIt forums. Edited January 14, 2024 by Melba23 Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Reveal hidden contents ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area
Anthony72 Posted January 14, 2024 Posted January 14, 2024 Reveal hidden contents expandcollapse popup #include <GuiListBox.au3> #include <Date.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <AutoItConstants.au3> #include <StaticConstants.au3> #include <UpDownConstants.au3> #include <EditConstants.au3> #include <File.au3> #include <Misc.au3> #include <String.au3> #include <Array.au3> ;~ #include "GUIListViewEx.au3" #include ".\GUIListViewEx\GUIListViewEx.au3" ;~ Global $sRet, $aRetMem $hGUI = GUICreate("ListView Example_6 Light", 660, 330) ; Create ListView GUICtrlCreateLabel("ComboBox - $vRow, $vCol for edit ComboBox (RJ-45) etc...", 10, 10, 400, 20) $cLV_1 = GUICtrlCreateListView("Country|Reference|Not use|Not use", 10, 30, 640, 260, BitOR($LVS_SINGLESEL, $LVS_SHOWSELALWAYS)) _GUICtrlListView_SetExtendedListViewStyle($cLV_1, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_HEADERDRAGDROP)) For $i = 0 To 3 _GUICtrlListView_SetColumnWidth($cLV_1, $i, 158) Next ; Create Cols & Rows ; Créer des Colonnes et des Lignes Global $vCols = 6, $vRows = 4 ; Create array and fill listview Global $aLVArray_1[$vCols][$vRows] $sData = "RJ-45 color order USA|Blue,Green,Orange,Brown" $aLVArray_1[0][0] = $sData GUICtrlCreateListViewItem($sData, $cLV_1) $sData = "Standard TV USA|NTSC" $aLVArray_1[1][0] = $sData GUICtrlCreateListViewItem($sData, $cLV_1) ; Initiate ListView = sort on column click - editable headers $iLVIndex_1 = _GUIListViewEx_Init($cLV_1, $aLVArray_1, 0, 0, True, 1 + 8 + 32) ; + 16 ; Set column edit status ; Func _GUIListViewEx_SetEditStatus($iLV_Index, $vCol, $iMode = 1, $vParam1 = Default, $vParam2 = Default) $iMode = 2 ; $iMode - 2 = Editable using combo _GUIListViewEx_SetEditStatus($iLVIndex_1, 0, $iMode, "RJ-45 color order USA|RJ-45 color order EUROPE", 1) ; All Rows in Col < ========================= _GUIListViewEx_SetEditStatus($iLVIndex_1, 1, $iMode, "Blue,Green,Orange,Brown|Blue,Orange,Green,Brown", 1) ; All Rows in Col < ========================= _GUIListViewEx_SetEditStatus($iLVIndex_1, 2, $iMode, "Standard TV USA|Standard TV EUROPE", 1) ; All Rows in Col < ========================= _GUIListViewEx_SetEditStatus($iLVIndex_1, 3, $iMode, "NTSC|Pal/Secam/NTSC", 1) ; All Rows in Col < ========================= ; Func _GUIListViewEx_SetEditStatus($iLV_Index, $vRow, $vCol, $iMode = 1, $vParam1 = Default, $vParam2 = Default) ; Add $vRow _GUIListViewEx_SetEditStatus($iLVIndex_1, 0, 0, $iMode, "RJ-45 color order USA|RJ-45 color order EUROPE", 1) ; One Row in Col < === Add $vRow =========== _GUIListViewEx_SetEditStatus($iLVIndex_1, 0, 1, $iMode, "Blue,Green,Orange,Brown|Blue,Orange,Green,Brown", 1) ; One Row in Col < === Add $vRow =========== _GUIListViewEx_SetEditStatus($iLVIndex_1, 1, 0, $iMode, "Standard TV USA|Standard TV EUROPE", 1) ; All Rows in Col < === Add $vRow =========== _GUIListViewEx_SetEditStatus($iLVIndex_1, 1, 1, $iMode, "NTSC|Pal/Secam/NTSC", 1) ; All Rows in Col < === Add $vRow =========== $cContent = GUICtrlCreateButton("Content", 100, 295, 80, 30) $cHeaders = GUICtrlCreateButton("Headers", 300, 295, 80, 30) _GUIListViewEx_MsgRegister() GUISetState() While 1 $iMsg = GUIGetMsg() Switch $iMsg Case $GUI_EVENT_CLOSE Exit Case $cContent $aRet = _GUIListViewEx_ReturnArray($iLVIndex_1) _ArrayDisplay($aRet, "", Default, 8) Case $cHeaders $aRet = _GUIListViewEx_ReturnArray($iLVIndex_1, 4) _ArrayDisplay($aRet, "", Default, 8) EndSwitch $vRet = _GUIListViewEx_EventMonitor() If @error Then MsgBox($MB_SYSTEMMODAL, "Error", "Event error: " & @error) EndIf Switch @extended Case 0 ; No event detected Case 1 If $vRet = "" Then ;~ MsgBox($MB_SYSTEMMODAL, "Edit", "Edit aborted" & @CRLF) Else _ArrayDisplay($vRet, "ListView " & _GUIListViewEx_GetActive() & " content edited", Default, 8) EndIf Case 2 If $vRet = "" Then MsgBox($MB_SYSTEMMODAL, "Header edit", "Header edit aborted" & @CRLF) Else _ArrayDisplay($vRet, "ListView " & _GUIListViewEx_GetActive() & " header edited", Default, 8) EndIf Case 3 MsgBox($MB_SYSTEMMODAL, "Sorted", "ListView: " & $vRet & @CRLF) Case 4 Local $aRet = StringSplit($vRet, ":") MsgBox($MB_SYSTEMMODAL, "Dragged", "From ListView " & $aRet[1] & @CRLF & "To ListView " & $aRet[2]) EndSwitch WEnd Yes indeed I did not see the error and I did not find how to edit here is a very simple test code or when I choose "Standard TV EUROPE" I can have the choice between "NTSC or Pal/Secam/ NTSC" in the right place. My UDF GuiStatusBar facile
Moderators Melba23 Posted January 14, 2024 Author Moderators Posted January 14, 2024 (edited) Anthony72, So you wish to have the ability to crreate an edit combo for a specific row within a column alongside the existing option having the same combo for every row? If so then I think you will have to use $iMode = 9 to run a custom function when the element is double-clicked. The function will receive the row & column values fo the actioned element and so should be able to produce a dialog with a combo to allow the required selection. I will try and run up an example this afternoon when I have finished installing all the new elements that my wife wants in the bathroom (new mirror, towel rails and cupboards). M23 Edited January 14, 2024 by Melba23 Pressed too soon! Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Reveal hidden contents ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area
Anthony72 Posted January 14, 2024 Posted January 14, 2024 That's pretty much it, I can't wait to test your code. I'm also looking for how to remove the blue highlight from a line. For the rest I can manage. I'm also into DIY, I have a radiator that no longer heats up. My UDF GuiStatusBar facile
Moderators Melba23 Posted January 14, 2024 Author Moderators Posted January 14, 2024 Anthony72, This seems to do what you want: expandcollapse popup#include <GuiListBox.au3> #include <Date.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <AutoItConstants.au3> #include <StaticConstants.au3> #include <UpDownConstants.au3> #include <EditConstants.au3> #include <File.au3> #include <Misc.au3> #include <String.au3> #include <Array.au3> #include "GUIListViewEx.au3" ;#include ".\GUIListViewEx\GUIListViewEx.au3" ;~ Global $sRet, $aRetMem $hGUI = GUICreate("ListView Example_6 Light", 660, 330) ; Create ListView GUICtrlCreateLabel("ComboBox - $vRow, $vCol for edit ComboBox (RJ-45) etc...", 10, 10, 400, 20) $cLV_1 = GUICtrlCreateListView("Country|Reference|Not use|Not use", 10, 30, 640, 260, BitOR($LVS_SINGLESEL, $LVS_SHOWSELALWAYS)) _GUICtrlListView_SetExtendedListViewStyle($cLV_1, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_HEADERDRAGDROP)) For $i = 0 To 3 _GUICtrlListView_SetColumnWidth($cLV_1, $i, 158) Next ; Create Cols & Rows ; Créer des Colonnes et des Lignes Global $vCols = 6, $vRows = 4 ; Create array and fill listview Global $aLVArray_1[$vCols][$vRows] $sData = "RJ-45 color order USA|Blue,Green,Orange,Brown" $aLVArray_1[0][0] = $sData GUICtrlCreateListViewItem($sData, $cLV_1) $sData = "Standard TV USA|NTSC" $aLVArray_1[1][0] = $sData GUICtrlCreateListViewItem($sData, $cLV_1) ; Initiate ListView = sort on column click - editable headers $iLVIndex_1 = _GUIListViewEx_Init($cLV_1, $aLVArray_1, 0, 0, True, 1 + 8 + 32) ; + 16 ; Set column edit status _GUIListViewEx_SetEditStatus($iLVIndex_1, "0", 9, _Combo_Edit) ; Call function when double clicked _GUIListViewEx_SetEditStatus($iLVIndex_1, "1", 9, _Combo_Edit) $cContent = GUICtrlCreateButton("Content", 100, 295, 80, 30) $cHeaders = GUICtrlCreateButton("Headers", 300, 295, 80, 30) _GUIListViewEx_MsgRegister() GUISetState() While 1 $iMsg = GUIGetMsg() Switch $iMsg Case $GUI_EVENT_CLOSE Exit Case $cContent $aRet = _GUIListViewEx_ReturnArray($iLVIndex_1) _ArrayDisplay($aRet, "", Default, 8) Case $cHeaders $aRet = _GUIListViewEx_ReturnArray($iLVIndex_1, 4) _ArrayDisplay($aRet, "", Default, 8) EndSwitch $vRet = _GUIListViewEx_EventMonitor() If @error Then MsgBox($MB_SYSTEMMODAL, "Error", "Event error: " & @error) EndIf Switch @extended Case 0 ; No event detected Case 1 If $vRet = "" Then ;~ MsgBox($MB_SYSTEMMODAL, "Edit", "Edit aborted" & @CRLF) Else _ArrayDisplay($vRet, "ListView " & _GUIListViewEx_GetActive() & " content edited", Default, 8) EndIf Case 2 If $vRet = "" Then MsgBox($MB_SYSTEMMODAL, "Header edit", "Header edit aborted" & @CRLF) Else _ArrayDisplay($vRet, "ListView " & _GUIListViewEx_GetActive() & " header edited", Default, 8) EndIf Case 3 MsgBox($MB_SYSTEMMODAL, "Sorted", "ListView: " & $vRet & @CRLF) Case 4 Local $aRet = StringSplit($vRet, ":") MsgBox($MB_SYSTEMMODAL, "Dragged", "From ListView " & $aRet[1] & @CRLF & "To ListView " & $aRet[2]) EndSwitch WEnd Func _Combo_Edit($hLV, $iIndexLV, $iRow, $iCol) Local $sCombo_Fill ; Select correct combo fill depending on row/col Switch $iRow Case 0 Switch $iCol Case 0 $sCombo_Fill = "RJ-45 color order USA|RJ-45 color order EUROPE" Case 1 $sCombo_Fill = "Blue,Green,Orange,Brown|Blue,Orange,Green,Brown" EndSwitch Case 1 Switch $iCol Case 0 $sCombo_Fill = "Standard TV USA|Standard TV EUROPE" Case 1 $sCombo_Fill = "NTSC|Pal/Secam/NTSC" EndSwitch EndSwitch ; Create combo dialog $hCombo_Dialog = GUICreate("Edit", 200, 30) $cCombo = GUICtrlCreateCombo("", 0, 0, 200, 20) ; Fill combo with required elements GUICtrlSetData($cCombo, $sCombo_Fill, _GUICtrlListView_GetItemText($hLV, $iRow, $iCol)) GUISetState() While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE GUIDelete($hCombo_Dialog) Return Case $cCombo ExitLoop EndSwitch WEnd ; Change ListView element to match selection _GUIListViewEx_ChangeItem($iIndexLV, $iRow, $iCol, GUICtrlRead($cCombo)) GUIDelete($hCombo_Dialog) EndFunc This is just a very basic example. The combo data selection is a little clunky - I would suggest that it would be more elegant to create an array so that you can get the required data directly using the row/column passed to the function. And you will need to create the dialog with a little more care - such as disabling the main GUI while it is displayed. I hope that points you in the right direction. M23 robertocm 1 Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Reveal hidden contents ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area
Anthony72 Posted January 16, 2024 Posted January 16, 2024 Hello Melba23, I worked a little on the code you gave me and it's pretty good. I find myself facing the width problem with column 0 and not understood how to solve the problem and make it clean. Do you have a solution for optimal operation? Thanks to you. expandcollapse popup#include <GuiListBox.au3> #include <Date.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <AutoItConstants.au3> #include <StaticConstants.au3> #include <UpDownConstants.au3> #include <EditConstants.au3> #include <File.au3> #include <Misc.au3> #include <String.au3> #include <Array.au3> ;~ #include "GUIListViewEx.au3" #include ".\GUIListViewEx\GUIListViewEx.au3" ;~ Global $sRet, $aRetMem $hGUI = GUICreate("ListView Example_6 Light", 660, 330) ; Create ListView GUICtrlCreateLabel("ComboBox - $vRow, $vCol for edit ComboBox (RJ-45) etc...", 10, 10, 400, 20) $cLV_1 = GUICtrlCreateListView("Country|Reference|Not use|Not use", 10, 30, 640, 260, BitOR($LVS_SINGLESEL, $LVS_SHOWSELALWAYS)) _GUICtrlListView_SetExtendedListViewStyle($cLV_1, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_HEADERDRAGDROP)) For $i = 0 To 3 _GUICtrlListView_SetColumnWidth($cLV_1, $i, 158) Next ; Create Cols & Rows ; Créer des Colonnes et des Lignes Global $vCols = 6, $vRows = 4 ; Create array and fill listview Global $aLVArray_1[$vCols][$vRows] $sData = "RJ-45 color order USA|Blue,Green,Orange,Brown" $aLVArray_1[0][0] = $sData GUICtrlCreateListViewItem($sData, $cLV_1) $sData = "Standard TV USA|NTSC" $aLVArray_1[1][0] = $sData GUICtrlCreateListViewItem($sData, $cLV_1) ; Initiate ListView = sort on column click - editable headers $iLVIndex_1 = _GUIListViewEx_Init($cLV_1, $aLVArray_1, 0, 0, True, 1 + 8 + 32) ; + 16 ; Set column edit status _GUIListViewEx_SetEditStatus($iLVIndex_1, "0", 9, _Combo_Edit) ; Call function when double clicked _GUIListViewEx_SetEditStatus($iLVIndex_1, "1", 9, _Combo_Edit) $cContent = GUICtrlCreateButton("Content", 100, 295, 80, 30) $cHeaders = GUICtrlCreateButton("Headers", 300, 295, 80, 30) _GUIListViewEx_MsgRegister() GUISetState() While 1 $iMsg = GUIGetMsg() Switch $iMsg Case $GUI_EVENT_CLOSE Exit Case $cContent $aRet = _GUIListViewEx_ReturnArray($iLVIndex_1) _ArrayDisplay($aRet, "$cContent", Default, 8) Case $cHeaders $aRet = _GUIListViewEx_ReturnArray($iLVIndex_1, 4) _ArrayDisplay($aRet, "$cHeaders", Default, 8) EndSwitch $vRet = _GUIListViewEx_EventMonitor() If @error Then MsgBox($MB_SYSTEMMODAL, "Error", "Event error: " & @error) EndIf Switch @extended Case 0 ; No event detected Case 1 If $vRet = "" Then ;~ MsgBox($MB_SYSTEMMODAL, "Edit", "Edit aborted" & @CRLF) Else _ArrayDisplay($vRet, "ListView " & _GUIListViewEx_GetActive() & " content edited", Default, 8) EndIf Case 2 If $vRet = "" Then ;~ MsgBox($MB_SYSTEMMODAL, "Header edit", "Header edit aborted" & @CRLF) Else _ArrayDisplay($vRet, "ListView " & _GUIListViewEx_GetActive() & " header edited", Default, 8) EndIf Case 3 MsgBox($MB_SYSTEMMODAL, "Sorted", "ListView: " & $vRet & @CRLF) Case 4 Local $aRet = StringSplit($vRet, ":") MsgBox($MB_SYSTEMMODAL, "Dragged", "From ListView " & $aRet[1] & @CRLF & "To ListView " & $aRet[2]) EndSwitch WEnd Func _Combo_Edit( $hLV, $iIndexLV, $iRow, $iCol) ;~ ConsoleWrite("Line=" & @ScriptLineNumber & @TAB & "$iRow = "&$iRow &", $iCol = "& $iCol &@CRLF) Local $sCombo_Fill ; Select correct combo fill depending on row/col Switch $iRow Case 0 Switch $iCol Case 0 $sCombo_Fill = "RJ-45 color order USA|RJ-45 color order EUROPE" Case 1 $sCombo_Fill = "Blue,Green,Orange,Brown|Blue,Orange,Green,Brown" EndSwitch Case 1 Switch $iCol Case 0 $sCombo_Fill = "Standard TV USA|Standard TV EUROPE" Case 1 $sCombo_Fill = "NTSC|Pal/Secam/NTSC" EndSwitch EndSwitch ; Retrieve the position x, y and size (width and height) of the edit control in Notepad. The handle returned by WinWait is used for the "title" parameter of ControlGetPos. Local $aPos = ControlGetPos( $hGUI, "", $hLV) ConsoleWrite( "Line=" & @ScriptLineNumber & @TAB & "Position: " & $aPos[0] & ", " & $aPos[1] & ", Size: " & $aPos[2] & ", " & $aPos[3] &@CRLF) $aRect = _GUICtrlListView_GetSubItemRect( $hLV, $iRow, $iCol) $X = $aPos[0]+$aRect[0] +2 $Y = $aPos[1]+$aRect[1] +2 $W = $aRect[2]-$aRect[0] $H = $aRect[3]-$aRect[1] ConsoleWrite( "Line=" & @ScriptLineNumber & @TAB & "$hLV=" & $hLV & ", $iRow=" & $iRow & ", $iCol=" & $iCol & StringFormat(", Subitem Rectangle "&$iRow&","&$iCol&" OK : [%d, %d, %d, %d]", $X, $Y, $W, $Y)&@CRLF) ; Create combo dialog $hCombo_Dialog = GUICreate( "", $W, $H, -1, -1, BitOR($WS_POPUP, $WS_SYSMENU), $WS_EX_TOOLWINDOW+$WS_EX_TOPMOST) ; Attach window to the desktop (always on bottom) _WinAPI_SetParent( $hCombo_Dialog, $hGUI) ; Move GUI 2 WinMove( $hCombo_Dialog, "", $X, $Y, $W, $H) ; WinMove( $hCombo_Dialog, "", 150, 100, $aLVPos[2], $aLVPos[3]) X, Y, W, H ; Move GUI 2 Combo OK Local $aLVPos = WinGetClientSize( $hCombo_Dialog) $cCombo = GUICtrlCreateCombo( "", 0, 0, $aLVPos[0], $aLVPos[0]) ; $cCombo = GUICtrlCreateCombo("", 0, 0, 200, 20) ; Fill combo with required elements GUICtrlSetData( $cCombo, $sCombo_Fill, _GUICtrlListView_GetItemText( $hLV, $iRow, $iCol)) GUISetState() While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE, WinActive( $hCombo_Dialog) GUIDelete( $hCombo_Dialog) Return Case $cCombo ExitLoop EndSwitch WEnd ; Change ListView element to match selection _GUIListViewEx_ChangeItem( $iIndexLV, $iRow, $iCol, GUICtrlRead( $cCombo)) GUIDelete( $hCombo_Dialog) EndFunc My UDF GuiStatusBar facile
Moderators Melba23 Posted January 16, 2024 Author Moderators Posted January 16, 2024 Antony72, I have run into this problem before - MS likes to give you the entire width of the ListView when you ask for the data of the 0 column. A workaround is to ask for the column width directly: $W = _GUICtrlListView_GetColumnWidth($hLV, $iCol) That solves the problem for me. M23 Anthony72 1 Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Reveal hidden contents ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area
Anthony72 Posted January 16, 2024 Posted January 16, 2024 Effectively ... I'm trying to remove focus from the ListView in order to remove this blue bar but without success, I need a last little help after I'm done with this function. expandcollapse popup#include <GuiListBox.au3> #include <Date.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <AutoItConstants.au3> #include <StaticConstants.au3> #include <UpDownConstants.au3> #include <EditConstants.au3> #include <File.au3> #include <Misc.au3> #include <String.au3> #include <Array.au3> ;~ #include "GUIListViewEx.au3" #include ".\GUIListViewEx\GUIListViewEx.au3" ;~ Global $sRet, $aRetMem $hGUI = GUICreate("ListView Example_6 Light", 660, 330) ; Create ListView GUICtrlCreateLabel("ComboBox - $vRow, $vCol for edit ComboBox (RJ-45) etc...", 10, 10, 400, 20) $cLV_1 = GUICtrlCreateListView("Country|Reference|Not use|Not use", 10, 30, 640, 260, BitOR($LVS_SINGLESEL, $LVS_SHOWSELALWAYS)) _GUICtrlListView_SetExtendedListViewStyle($cLV_1, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_HEADERDRAGDROP)) For $i = 0 To 3 _GUICtrlListView_SetColumnWidth($cLV_1, $i, 158) Next ; Create Cols & Rows ; Créer des Colonnes et des Lignes Global $vCols = 6, $vRows = 4 ; Create array and fill listview Global $aLVArray_1[$vCols][$vRows] $sData = "RJ-45 color order USA|Blue,Green,Orange,Brown" $aLVArray_1[0][0] = $sData GUICtrlCreateListViewItem($sData, $cLV_1) $sData = "Standard TV USA|NTSC" $aLVArray_1[1][0] = $sData GUICtrlCreateListViewItem($sData, $cLV_1) ; Initiate ListView = sort on column click - editable headers $iLVIndex_1 = _GUIListViewEx_Init($cLV_1, $aLVArray_1, 0, 0, True, 1 + 8 + 32) ; + 16 ; Set column edit status _GUIListViewEx_SetEditStatus($iLVIndex_1, "0", 9, _Combo_Edit) ; Call function when double clicked _GUIListViewEx_SetEditStatus($iLVIndex_1, "1", 9, _Combo_Edit) $cContent = GUICtrlCreateButton("Content", 100, 295, 80, 30) $cHeaders = GUICtrlCreateButton("Headers", 300, 295, 80, 30) _GUIListViewEx_MsgRegister() GUISetState() While 1 $iMsg = GUIGetMsg() Switch $iMsg Case $GUI_EVENT_CLOSE Exit Case $cContent $aRet = _GUIListViewEx_ReturnArray($iLVIndex_1) _ArrayDisplay($aRet, "$cContent", Default, 8) Case $cHeaders $aRet = _GUIListViewEx_ReturnArray($iLVIndex_1, 4) _ArrayDisplay($aRet, "$cHeaders", Default, 8) EndSwitch $vRet = _GUIListViewEx_EventMonitor() If @error Then MsgBox($MB_SYSTEMMODAL, "Error", "Event error: " & @error) EndIf Switch @extended Case 0 ; No event detected Case 1 If $vRet = "" Then ;~ MsgBox($MB_SYSTEMMODAL, "Edit", "Edit aborted" & @CRLF) Else _ArrayDisplay($vRet, "ListView " & _GUIListViewEx_GetActive() & " content edited", Default, 8) EndIf Case 2 If $vRet = "" Then ;~ MsgBox($MB_SYSTEMMODAL, "Header edit", "Header edit aborted" & @CRLF) Else _ArrayDisplay($vRet, "ListView " & _GUIListViewEx_GetActive() & " header edited", Default, 8) EndIf Case 3 MsgBox($MB_SYSTEMMODAL, "Sorted", "ListView: " & $vRet & @CRLF) Case 4 Local $aRet = StringSplit($vRet, ":") MsgBox($MB_SYSTEMMODAL, "Dragged", "From ListView " & $aRet[1] & @CRLF & "To ListView " & $aRet[2]) EndSwitch WEnd Func _Combo_Edit( $hLV, $iIndexLV, $iRow, $iCol) ;~ ConsoleWrite("Line=" & @ScriptLineNumber & @TAB & "$iRow = "&$iRow &", $iCol = "& $iCol &@CRLF) Local $sCombo_Fill ; Select correct combo fill depending on row/col Switch $iRow Case 0 Switch $iCol Case 0 $sCombo_Fill = "RJ-45 color order USA|RJ-45 color order EUROPE" Case 1 $sCombo_Fill = "Blue,Green,Orange,Brown|Blue,Orange,Green,Brown" EndSwitch Case 1 Switch $iCol Case 0 $sCombo_Fill = "Standard TV USA|Standard TV EUROPE" Case 1 $sCombo_Fill = "NTSC|Pal/Secam/NTSC" EndSwitch EndSwitch ; Retrieve the position x, y and size (width and height) of the edit control in Notepad. The handle returned by WinWait is used for the "title" parameter of ControlGetPos. Local $aPos = ControlGetPos( $hGUI, "", $hLV) ConsoleWrite( "Line=" & @ScriptLineNumber & @TAB & "Position: " & $aPos[0] & ", " & $aPos[1] & ", Size: " & $aPos[2] & ", " & $aPos[3] &@CRLF) $aRect = _GUICtrlListView_GetSubItemRect( $hLV, $iRow, $iCol) $X = $aPos[0]+$aRect[0] +2 $Y = $aPos[1]+$aRect[1] +1 ;~ $W = $aRect[2]-$aRect[0] $W = _GUICtrlListView_GetColumnWidth($hLV, $iCol) $H = $aRect[3]-$aRect[1] +2 ConsoleWrite( "Line=" & @ScriptLineNumber & @TAB & "$hLV=" & $hLV & ", $iRow=" & $iRow & ", $iCol=" & $iCol & StringFormat(", Subitem Rectangle "&$iRow&","&$iCol&" OK : [%d, %d, %d, %d]", $X, $Y, $W, $Y)&@CRLF) ; Create combo dialog $hCombo_Dialog = GUICreate( "", $W, $H, -1, -1, BitOR($WS_POPUP, $WS_SYSMENU), $WS_EX_TOOLWINDOW+$WS_EX_TOPMOST) ; Attach window to the desktop (always on bottom) _WinAPI_SetParent( $hCombo_Dialog, $hGUI) ; Move GUI 2 WinMove( $hCombo_Dialog, "", $X, $Y, $W, $H) ; WinMove( $hCombo_Dialog, "", 150, 100, $aLVPos[2], $aLVPos[3]) X, Y, W, H ; Move GUI 2 Combo OK Local $aLVPos = WinGetClientSize( $hCombo_Dialog) $cCombo = GUICtrlCreateCombo( "", 0, 0, $aLVPos[0], $aLVPos[0]) ; $cCombo = GUICtrlCreateCombo("", 0, 0, 200, 20) ; Fill combo with required elements GUICtrlSetData( $cCombo, $sCombo_Fill, _GUICtrlListView_GetItemText( $hLV, $iRow, $iCol)) ; ---> ------------------------------------------------------------------------------------------------------------------- ;~ _GUIListViewEx_BlockReDraw( $cLV_1, True) ; True = Prevent redrawing during Insert/Delete/Change calls GUICtrlSetState( $cLV_1, $GUI_NOFOCUS) ConsoleWrite( "Line=" & @ScriptLineNumber & @TAB & GUICtrlRead( GUICtrlRead( $cLV_1)) &@CRLF) ;~ For $i = 0 To _GUICtrlListView_GetColumnCount( $hLV) ;~ _GUIListViewEx_SetColour( $cLV_1, ";" , $iRow, $i) ; ";" <= par Default > ";" & $iWhite <=Par couleur ;~ Next WinActivate( $hCombo_Dialog, "") ;~ _GUIListViewEx_BlockReDraw( $cLV_1, False) ; False = Allow future redrawing and force a redraw ; <--- ------------------------------------------------------------------------------------------------------------------- GUISetState() While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE, WinActive( $hCombo_Dialog) GUIDelete( $hCombo_Dialog) Return Case $cCombo ExitLoop EndSwitch WEnd ; Change ListView element to match selection _GUIListViewEx_ChangeItem( $iIndexLV, $iRow, $iCol, GUICtrlRead( $cCombo)) GUIDelete( $hCombo_Dialog) EndFunc My UDF GuiStatusBar facile
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now