Jump to content
Sign in to follow this  
AndyS01

Set checkboxes on just certain items in a ListView control

Recommended Posts

AndyS01
I'm trying to put a check box next to just some of the items in a ListView control.  I know how to create listview controls with check boxes for ALL items, but not for just SOME of them.  I figured that the only way to do this is to put images of check boxes in the first column, then change the image when I wanted to check or uncheck the item or to change to have no check box at all.
 
An example might be:
Choose one of the following:
[] Apples
[] Oranges
In my test code below, I tried using icons of checked and unchecked images, but I couldn't get that to work.
 
;Add extra ICO files to the resources which can be used with TraySetIcon(@ScriptFullPath, 3) etc
; list of filename of the Ico files to be added, First one will have number 3, then 4 ..etc
#AutoIt3Wrapper_Res_Icon_Add=C:\checked.ico
#AutoIt3Wrapper_Res_Icon_Add=C:\unchecked.ico

Opt("GUICloseOnESC", 1) ; ESC closes GUI
Opt("GUIOnEventMode", 1) ; Change to OnEvent mode
;Opt('MustDeclareVars', 1)
OnAutoItExitRegister("ExitStageLeft_normal")
;Opt("WinTitleMatchMode", -1) ;1=start, 2=subStr, 3=exact, 4=advanced, -1 to -4=Nocase

#include <GuiConstantsEx.au3>
#include <GuiListView.au3>
#include <GuiImageList.au3>

GUICreate("ListView Set Item Image", 220, 400)

$hListView = GUICtrlCreateListView("", 2, 2, 204, 368)

$btn1 = GUICtrlCreateButton("Apples", 5, 400 - 30, 50, 25)
GUICtrlSetOnEvent($btn1, "handle_btn1")

$btn2 = GUICtrlCreateButton("Oranges", 5 + 50, 400 - 30, 70, 25)
GUICtrlSetOnEvent($btn2, "handle_btn2")

GUISetOnEvent($GUI_EVENT_CLOSE, 'ExitStageLeft_normal') ; CLOSE events

GUISetState()

; Load images
$hImage = _GUIImageList_Create(16, 16, 5, 3)

$b1 = _GUIImageList_Add($hImage, _GUICtrlListView_CreateSolidBitMap($hListView, 0xFF0000, 16, 16)); red
$b2 = _GUIImageList_AddIcon($hImage, "C:\checked.ico.ico")
$b3 = _GUIImageList_AddIcon($hImage, "C:\Uunchecked.ico.ico")
$b4 = _GUIImageList_Add($hImage, _GUICtrlListView_CreateSolidBitMap($hListView, 0x00FF00, 16, 16)); green

; Attach the list to the listview control
_GUICtrlListView_SetImageList($hListView, $hImage, 1)

; Add a column
_GUICtrlListView_AddColumn($hListView, "Column 1", 200)

_GUICtrlListView_AddItem($hListView, "", 5)
_GUICtrlListView_AddItem($hListView, "Choose one of the following:", 5)

$itemnum_choice1 = _GUICtrlListView_AddItem($hListView, "Apples", 5)
$itemnum_choice2 = _GUICtrlListView_AddItem($hListView, "Oranges", 5)

ConsoleWrite("+++: $b1 = " & $b1 & ", $b2 = " & $b2 & ", $b3 = " & $b3 & ", $b4 = " & $b4 & @CRLF)

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
GUIDelete()

Func handle_btn1()
    cycle($itemnum_choice1) ; cycle 'apples' between checked, unchecked, and no checkbox
EndFunc   ;==>handle_btn1

Func handle_btn2()
    cycle($itemnum_choice2) ; cycle 'oranges' between checked, unchecked, and no checkbox
EndFunc   ;==>handle_btn2

 ; cycle 'an item between checked, unchecked, and no checkbox
 Func cycle($itemnum)
    $p = _GUICtrlListView_GetItemParam($hListView, $itemnum)
    $p += 1
    _GUICtrlListView_SetItemParam($hListView, $itemnum, $p)

    Switch Mod($p, 3)
        Case 0
            $i = $b2 ; Checked
        Case 1
            $i = $b3 ; Unchecked
        Case 2
            $i = 5 ; no checkbox
    EndSwitch

    _GUICtrlListView_SetItemImage($hListView, $itemnum, $i)
    ConsoleWrite("+++: Item: " & $itemnum & " - " & $i & @CRLF)
EndFunc   ;==>toggle

Func ExitStageLeft_normal()
    Exit
EndFunc   ;==>ExitStageLeft_normal

Share this post


Link to post
Share on other sites
FireFox

Hi,

AFAIK, you can't set a checkbox for some items.

My suggestion is to handle the click and block it for the items you don't want to have a checkbox (cf: WM_NOTIFY).

Br, FireFox.


 

OS : Win XP SP2 (32 bits) / Win 7 SP1 (64 bits) / Win 8 (64 bits) | Autoit version: latest stable / beta.
Hardware : Intel(R) Core(TM) i5-2400 CPU @ 3.10Ghz / 8 GiB RAM DDR3.

My UDFs : Skype UDF | TrayIconEx UDF | GUI Panel UDF | Excel XML UDF | Is_Pressed_UDF

My Projects : YouTube Multi-downloader | FTP Easy-UP | Lock'n | WinKill | AVICapture | Skype TM | Tap Maker | ShellNew | Scriptner | Const Replacer | FT_Pocket | Chrome theme maker

My Examples : Capture toolIP Camera | Crosshair | Draw Captured Region | Picture Screensaver | Jscreenfix | Drivetemp | Picture viewer

My Snippets : Basic TCP | Systray_GetIconIndex | Intercept End task | Winpcap various | Advanced HotKeySet | Transparent Edit control

 

Share this post


Link to post
Share on other sites
AndyS01

I changed the test code to not use check boxes, but instead, puts a a 'checked' or 'unchecked' image for a each item in the ListView that I want to have a check box.  It works like I would like it to work (see test code below), but this test code displays a solid green for checked, a solid red box for unchecked, and no box for 'not a check box'.

However, I want to use my icons instead of the solid boxes.  I want my icons to be inserted into the executable file so I don't have to ship the .ico files separately from my executable file.

Here's my test code:

#AutoIt3Wrapper_Res_Icon_Add=C:\checked.ico
#AutoIt3Wrapper_Res_Icon_Add=C:\unchecked.ico

Opt("WinTitleMatchMode", 1)
Opt("GUIOnEventMode", 1)
Opt("GUICloseOnESC", 1)
OnAutoItExitRegister("ExitStageLeft")

#include <GuiConstantsEx.au3>
#include <GuiListView.au3>
#include <GuiImageList.au3>

GUICreate("ListView Set Item Image", 220, 400)
$hListView = GUICtrlCreateListView("", 2, 2, 204, 368)
GUICtrlCreateButton("CHECK", 5, 370, 65, 25)
GUICtrlSetOnEvent(-1, "handle_btn1")
GUICtrlCreateButton("UNCHECK", 70, 370, 65, 25)
GUICtrlSetOnEvent(-1, "handle_btn2")
GUICtrlCreateButton("NOCHECK", 135, 370, 65, 25)
GUICtrlSetOnEvent(-1, "handle_btn3")
GUISetState()

; Load images
$hImage = _GUIImageList_Create(16, 16, 5, 3)
$a1 = _GUIImageList_Add($hImage, "C:\checked.ico")
$a2 = _GUIImageList_Add($hImage, "C:\unchecked.ico")
$a3 = _GUIImageList_AddIcon($hImage, @SystemDir & "shell32.dll", 110)
$a4 = _GUIImageList_AddIcon($hImage, @SystemDir & "shell32.dll", 131)
$a5 = _GUIImageList_Add($hImage, _GUICtrlListView_CreateSolidBitMap($hListView, 0xFF0000, 16, 16)); red
$a6 = _GUIImageList_Add($hImage, _GUICtrlListView_CreateSolidBitMap($hListView, 0x00FF00, 16, 16)); green
$a7 = _GUICtrlListView_SetImageList($hListView, $hImage, 1)

; Add columns
_GUICtrlListView_AddColumn($hListView, "Column 1", 150)

; Add items
$iconnum = -7
For $x = 0 To 12
    $iconnum += 1
    $str = "Item# " & $x & " - Icon# " & $iconnum
    $ndx = _GUICtrlListView_AddItem($hListView, $str, $iconnum)
    _GUICtrlListView_SetItemImage($hListView, $ndx, $iconnum)
Next

ConsoleWrite("+++: " & StringFormat("$a1 = %d, $a2 = %d, $a3 = %d, $a4 = %d, $a5 = %d, %a7 = %d", $a1, $a2, $a3, $a4, $a5, $a6, $a7) & @CRLF)
GUISetOnEvent($GUI_EVENT_CLOSE, 'ExitStageLeft')

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
GUIDelete()
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

Func ExitStageLeft()
    Exit
EndFunc   ;==>ExitStageLeft

Func handle_btn1()
    testfunc(1)
EndFunc   ;==>handle_btn1

Func handle_btn2()
    testfunc(0)
EndFunc   ;==>handle_btn2

Func handle_btn3()
    testfunc(6)
EndFunc   ;==>handle_btn3

Func testfunc($which)
    $iIndex = 10
    $iImage = $which
    $hWnd = $hListView

    $ret = _GUICtrlListView_SetItemImage($hWnd, $iIndex, $iImage)

    ConsoleWrite("+++: _GUICtrlListView_SetItemImage(" & Hex($hWnd) & ", $iIndex = " & $iIndex & ", $iImage = " & $iImage & ") returns: " & $ret & @CRLF)
EndFunc   ;==>testfunc

Share this post


Link to post
Share on other sites
Artisan

You could include custom images, but it would be easier to grab the icon out of the appropriate Windows DLL file.  Then you don't have to include anything.  (I have no idea which one that is, and I've checked a few dozen so far...)

I started with the assumption that control faces would be icons within a dll.  On reflection, that seems fairly stupid.  My bad.  And I'm pretty sure it would be comctl32.dll, but they're not in there.

Anyway, you can include icon files at compile time (it's an option if you're using SciTE), or you can draw one using GDI(+) and use that for your image (I think).

Edited by Artisan

Share this post


Link to post
Share on other sites
Edano

you have to create an imagelist with all the icons you need.

_GUIImageList_Create()

.

then you set the imagelist to the listview.

.

_GUICtrlListView_SetImageList()

.

in the image list, they are indexed, and you simply use the index with listviewsetitem or how the name is.

you can pull the imagelist icons out of the own exe when you have included the icons to the resource with

.

#AutoIt3Wrapper_Res_Icon_Add=

.

before compilation.

cheers E.

Edit: click on the functions in the tags to get examples

Edit: i just saw that you already managed the imagelist part. then you only need the autoitwrapper working. you find the icons then like createicon("myexe",-5) as example. always "-" for autoit.

Edited by Edano

[color=rgb(255,0,0);][font="'comic sans ms', cursive;"]FukuLeaks[/color][/font]

Share this post


Link to post
Share on other sites
AndyS01

I already had the 2 autoitwrapper lines at the top of the script.  I modified my test script a bit, and added the capability of entering an icon#.  As before, no numbers I plugged in worked.  Do you think you could run my script (with your icons), and see if it works for you?

I'm still looking for a dll with 'check' and 'uncheck' icons.

My check and uncheck icons show up in the list of icons embedded in the .exe file (using IcoFX).  If the icons are embedded, why can't I get to them via image list?

#AutoIt3Wrapper_Res_Icon_Add=C:\checked.ico
#AutoIt3Wrapper_Res_Icon_Add=C:\unchecked.ico

Opt('MustDeclareVars', 1)
Opt("WinTitleMatchMode", 1)
Opt("GUIOnEventMode", 1)
Opt("GUICloseOnESC", 1)
OnAutoItExitRegister("ExitStageLeft")

#include <GuiConstantsEx.au3>
#include <GuiListView.au3>
#include <GuiImageList.au3>

Global $hMainWin, $iID_InputCtrl, $hListView

_Main()
Exit

Func _Main()
    Local $hImage, $a1, $a2, $a3, $a4, $a5, $a6, $a7, $iconnum, $str, $ndx

    $hMainWin = GUICreate("ListView Set Item Image", 220, 400)
    $hListView = GUICtrlCreateListView("", 2, 2, 204, 280)
    GUICtrlCreateButton("CHECK", 5, 290, 65, 25)
    GUICtrlSetOnEvent(-1, "handle_Check_btn")
    GUICtrlCreateButton("UNCHECK", 70, 290, 65, 25)
    GUICtrlSetOnEvent(-1, "handle_UnCheck_btn")
    GUICtrlCreateButton("HIDECHECK", 135, 290, 70, 25)
    GUICtrlSetOnEvent(-1, "handle_HideCheckBox_btn")
    $iID_InputCtrl = GUICtrlCreateInput("", 10, 320, 100, 25)
    GUICtrlCreateButton("Icon#", 10, 345, 65, 25)
    GUICtrlSetOnEvent(-1, "handle_btn4")
    GUISetState()

    ; Load images
    $hImage = _GUIImageList_Create(16, 16, 5, 3)

    $a1 = _GUIImageList_Add($hImage, "C:\checked.ico") ; returns -1
    $a2 = _GUIImageList_Add($hImage, "C:\unchecked.ico") ; returns -1
    $a3 = _GUIImageList_AddIcon($hImage, @SystemDir & "shell32.dll", 110) ; returns 0
    $a4 = _GUIImageList_AddIcon($hImage, @SystemDir & "shell32.dll", 131) ; returns 0
    $a5 = _GUIImageList_Add($hImage, _GUICtrlListView_CreateSolidBitMap($hListView, 0xFF0000, 16, 16)); red ; returns 0
    $a6 = _GUIImageList_Add($hImage, _GUICtrlListView_CreateSolidBitMap($hListView, 0x00FF00, 16, 16)); green ; returns 1

    ; Attach imagelist to the ListView control
    $a7 = _GUICtrlListView_SetImageList($hListView, $hImage, 1)

    ; Add columns
    _GUICtrlListView_AddColumn($hListView, "Column 1", 150)

    ; Add items
    $iconnum = -7
    For $x = 0 To 12
        $iconnum += 1
        $str = "Item# " & $x & " - Icon# " & $iconnum
        $ndx = _GUICtrlListView_AddItem($hListView, $str, $iconnum)
        _GUICtrlListView_SetItemImage($hListView, $ndx, $iconnum)
    Next

    ; Change the text for line 10
    _GUICtrlListView_SetItem($hListView, "LINE 10", 10)

    ConsoleWrite("+++: " & StringFormat("$a1 = %d, $a2 = %d, $a3 = %d, $a4 = %d, $a5 = %d, $a6 = %d, $a7 = %d", $a1, $a2, $a3, $a4, $a5, $a6, $a7) & @CRLF)
    ConsoleWrite("+++: $a7 = " & $a7 & @CRLF)

    GUISetOnEvent($GUI_EVENT_CLOSE, 'ExitStageLeft')

    ; Loop until user exits
    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE
    GUIDelete()
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
EndFunc   ;==>_Main

Func ExitStageLeft()
    Exit
EndFunc   ;==>ExitStageLeft

Func handle_Check_btn()
    testfunc(0)
EndFunc   ;==>handle_Check_btn

Func handle_UnCheck_btn()
    testfunc(1)
EndFunc   ;==>handle_UnCheck_btn

Func handle_HideCheckBox_btn()
    testfunc(2)
EndFunc   ;==>handle_HideCheckBox_btn

Func handle_btn4()
    Local $iIndex = GUICtrlRead($iID_InputCtrl)
    testfunc($iIndex)
EndFunc   ;==>handle_btn4

Func testfunc($iImageNum)
    ConsoleWrite("+++: $iImageNum = " & $iImageNum & @CRLF)
    Local $iIndex, $hWnd, $ret

    $iIndex = 10
    $hWnd = $hListView

    $ret = _GUICtrlListView_SetItemImage($hWnd, $iIndex, $iImageNum)

    ConsoleWrite("+++: _GUICtrlListView_SetItemImage(" & Hex($hWnd) & ", $iIndex = " & $iIndex & ", $iImageNum = " & $iImageNum & ") returns: " & $ret & @CRLF)
EndFunc   ;==>testfunc

Share this post


Link to post
Share on other sites
NewPlaza

How about this?

#AutoIt3Wrapper_Res_Icon_Add=C:\checked.ico
#AutoIt3Wrapper_Res_Icon_Add=C:\unchecked.ico

Opt('MustDeclareVars', 1)
Opt("WinTitleMatchMode", 1)
Opt("GUIOnEventMode", 1)
Opt("GUICloseOnESC", 1)
OnAutoItExitRegister("ExitStageLeft")

#include <GuiConstantsEx.au3>
#include <GuiListView.au3>
#include <GuiImageList.au3>

Global $hMainWin, $iID_InputCtrl, $hListView

_Main()
Exit

Func _Main()
    Local $hImage, $a1, $a2, $a3, $a4, $a5, $a6, $a7, $iconnum, $str, $ndx

    $hMainWin = GUICreate("ListView Set Item Image", 220, 400)
    $hListView = GUICtrlCreateListView("", 2, 2, 204, 280)
    GUICtrlCreateButton("CHECK", 5, 290, 65, 25)
    GUICtrlSetOnEvent(-1, "handle_Check_btn")
    GUICtrlCreateButton("UNCHECK", 70, 290, 65, 25)
    GUICtrlSetOnEvent(-1, "handle_UnCheck_btn")
    GUICtrlCreateButton("HIDECHECK", 135, 290, 70, 25)
    GUICtrlSetOnEvent(-1, "handle_HideCheckBox_btn")
    $iID_InputCtrl = GUICtrlCreateInput("", 10, 320, 100, 25)
    GUICtrlCreateButton("Icon#", 10, 345, 65, 25)
    GUICtrlSetOnEvent(-1, "handle_btn4")
    GUISetState()

    ; Load images
    $hImage = _GUIImageList_Create(16, 16, 5, 3)

    $a1 = _GUIImageList_AddIcon($hImage, @ScriptFullPath, 4) ; returns -1
    $a2 = _GUIImageList_AddIcon($hImage, @ScriptFullPath, 5) ; returns -1
    $a3 = _GUIImageList_AddIcon($hImage, @SystemDir & "\shell32.dll", 110) ; returns 0; The backslash was forgotten
    $a4 = _GUIImageList_AddIcon($hImage, @SystemDir & "\shell32.dll", 131) ; returns 0; The backslash was forgotten
    $a5 = _GUIImageList_Add($hImage, _GUICtrlListView_CreateSolidBitMap($hListView, 0xFF0000, 16, 16)); red ; returns 0
    $a6 = _GUIImageList_Add($hImage, _GUICtrlListView_CreateSolidBitMap($hListView, 0x00FF00, 16, 16)); green ; returns 1

    ; Attach imagelist to the ListView control
    $a7 = _GUICtrlListView_SetImageList($hListView, $hImage, 1)

    ; Add columns
    _GUICtrlListView_AddColumn($hListView, "Column 1", 150)

    ; Add items
    $iconnum = -7
    For $x = 0 To 12
        $iconnum += 1
        $str = "Item# " & $x & " - Icon# " & $iconnum
        $ndx = _GUICtrlListView_AddItem($hListView, $str, $iconnum)
        _GUICtrlListView_SetItemImage($hListView, $ndx, $iconnum)
    Next

    ; Change the text for line 10
    _GUICtrlListView_SetItem($hListView, "LINE 10", 10)

    ConsoleWrite("+++: " & StringFormat("$a1 = %d, $a2 = %d, $a3 = %d, $a4 = %d, $a5 = %d, $a6 = %d, $a7 = %d", $a1, $a2, $a3, $a4, $a5, $a6, $a7) & @CRLF)
    ConsoleWrite("+++: $a7 = " & $a7 & @CRLF)

    GUISetOnEvent($GUI_EVENT_CLOSE, 'ExitStageLeft')

    ; Loop until user exits
    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE
    GUIDelete()
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
EndFunc   ;==>_Main

Func ExitStageLeft()
    Exit
EndFunc   ;==>ExitStageLeft

Func handle_Check_btn()
    testfunc(0)
EndFunc   ;==>handle_Check_btn

Func handle_UnCheck_btn()
    testfunc(1)
EndFunc   ;==>handle_UnCheck_btn

Func handle_HideCheckBox_btn()
    testfunc(2)
EndFunc   ;==>handle_HideCheckBox_btn

Func handle_btn4()
    Local $iIndex = GUICtrlRead($iID_InputCtrl)
    testfunc($iIndex)
EndFunc   ;==>handle_btn4

Func testfunc($iImageNum)
    ConsoleWrite("+++: $iImageNum = " & $iImageNum & @CRLF)
    Local $iIndex, $hWnd, $ret

    $iIndex = 10
    $hWnd = $hListView

    $ret = _GUICtrlListView_SetItemImage($hWnd, $iIndex, $iImageNum)

    ConsoleWrite("+++: _GUICtrlListView_SetItemImage(" & Hex($hWnd) & ", $iIndex = " & $iIndex & ", $iImageNum = " & $iImageNum & ") returns: " & $ret & @CRLF)
EndFunc   ;==>testfunc

NOTE: You MUST compile with options! This is a must.  The icons will embed into the autoitEXE but you will not be able to use them(as far as I can tell).

Simply right-click the au3 file and select compile with Options. Then click Compile Script.

Share this post


Link to post
Share on other sites
dragan

 

 I figured that the only way to do this is to put images of check boxes in the first column, then change the image when I wanted to check or uncheck the item or to change to have no check box at all.

 

Erm... not the only way:

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <WinAPI.au3>

$Form1 = GUICreate("Form1", 180, 600)
$ListView1 = GUICtrlCreateListView('Item', 0, 0, 180, 600, BitOR($LVS_SHOWSELALWAYS, $LVS_SINGLESEL), BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES, $LVS_EX_DOUBLEBUFFER))
_GUICtrlListView_SetColumnWidth(GUICtrlGetHandle($ListView1), 0, 150)
For $i = 0 to 49
    Local $curIndex = _GUICtrlListView_GetItemCount(GUICtrlGetHandle($ListView1))
    _GUICtrlListView_InsertItem(GUICtrlGetHandle($ListView1), 'Item ------------ #' & $i+1)

    ;disable checkbox for:
    ;    - item @ index 4 (item #5)
    ;    - item @ index 24 (item #25)
    ;    - item @ index 34 (item #35)
    ;    - all items between index 9(#10) and 19(#20) = {10, 11, 12, 13... 19, 20}
    ;    - item @ index 48 (item #49)
    Switch $i
        Case 4, 24, 34, 9 to 19, 48
            _RemoveCheckbox(GUICtrlGetHandle($ListView1), $i)
    EndSwitch
Next
GUISetState(@SW_SHOW)
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY") ;required for preventing checkboxes from re-apearing

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

Func _RemoveCheckbox($LVM, $nIndex)
    _GUICtrlListView_SetItemState($LVM, $nIndex, 0, $LVIS_STATEIMAGEMASK)
    _WinAPI_RedrawWindow($LVM)
EndFunc

Func WM_NOTIFY($hWndGUI, $MsgID, $WParam, $LParam)
    #forceref $hWndGUI, $MsgID, $wParam
    Local $tNMHDR, $hwndFrom, $code, $tInfo
    $tNMHDR = DllStructCreate($tagNMHDR, $LParam)
    $hwndFrom = DllStructGetData($tNMHDR, "hWndFrom")
    $code = DllStructGetData($tNMHDR, "Code")
    Local $hWndListView = $ListView1
    If Not IsHWnd($ListView1) Then $hWndListView = GUICtrlGetHandle($ListView1)
    Switch $hwndFrom
        Case $hWndListView
            Switch $code
                Case $NM_CLICK, $NM_DBLCLK, $NM_RCLICK, $NM_RDBLCLK
                    $tInfo = DllStructCreate($tagNMITEMACTIVATE, $LParam)
                    ;preventing checkboxes from re-apearing (same conditions as above)
                    Switch DllStructGetData($tInfo, "Index")
                        Case 4, 24, 34, 9 to 19, 48
                            Return True;intercept normal return message which would cause checkbox to re-apear
                    EndSwitch
            EndSwitch
    EndSwitch
    Return $GUI_RUNDEFMSG
EndFunc
Edited by dragan

Share this post


Link to post
Share on other sites
AndyS01

That's exactly what I was looking for.  I added those techniques to my test script and it worked beautifully.  Thank you.

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

  • Similar Content

    • Skysnake
      By Skysnake
      I am tracking this topic by @LarsJ.  It is very advanced and overkill for what I am currently trying to do.
       
      Problem is this.
      Listview contains columns, one of which is right aligned and gets populated by float values, such as 123.99.  Some do not have decimals ie 124.00 and on sort gets truncated to 124.  Its obviously still the same value, but the display has reset.
      ; line below is for list VIEW ;..................................0.........1......2............ $cListView = GUICtrlCreateListView("CUSTOMER|AMOUNT|DESCRIPTION", 8, 152, 764, 279) GUICtrlSetBkColor($cListView, $GUI_BKCOLOR_LV_ALTERNATE) ; alternate between the listview background color and the listview item background color GUICtrlSetBkColor($cListView, $LVStdClr) ; Set the background color for the listview _GUICtrlListView_SetColumnWidth($cListView, 0, 120) ; -- the client name _GUICtrlListView_SetColumnWidth($cListView, 1, 90) ;-- the amount _GUICtrlListView_JustifyColumn($cListView, 1, 1) ; 1 - Text is right aligned _GUICtrlListView_SetColumnWidth($cListView, 2, 200) ; the description What I am looking for is something native and simple like a 
          _GUICtrlListView_SetColumnFormat($cListView, 1, "%.2f") ;  1 - column is stringformatted to "%.2f"
      So that after each sort it will appear as it was in the original rendering.
      Is there something like this? I have not been able to find a simple solution.

      Thanks.
      Skysnake
    • Ambient
      By Ambient
      I have tried several way sto get this to work to no avail. Any help would be appreciated. #include <ListViewConstants.au3> #include <GuiListView.au3> #include "GuiListViewEx.au3" $idItem = GUICtrlCreateListViewItem($r & " | " & $c & $adoRs.Fields("TransactionAmount").value & " | " & $Timestamp & " | " & _StringProper($adoRs.Fields("Tillid").value) & @CRLF & @CRLF & "Card Number : " & $cardnum & " " , $idListView) ConsoleWrite( "IDITEM" & $idItem) If STRINGLEFT($adoRs.Fields("TransactionAmount").value,1)= "-" Then Consolewrite(" String is Negative" & @CRLF) ;Drops in Here as expected ;GUICtrlSetColor(-1, $COLOR_RED) ; Colour line if item is negative this didn' work $TxC= _GUICtrlListView_SetTextColor($hListView, $CLR_RED) ; I also tried $TxC= _GUICtrlListView_SetTextColor(-1, 0xFF0000) CONSOLEWRITE("TEXTCOLOUR RETURNED " & $TxC & @crlf) ; This is returning True ELSE Consolewrite(" String is NOT Negative" & @CRLF) EndIf  
    • Bilgus
      By Bilgus
      Example of Subclassing listviews using setwindowSubclass in order to intercept WM_KEYUP events
      Also pops context menu on  Shift + F10
      #include <Misc.au3> #include <ListViewConstants.au3> #include <GUIConstants.au3> #include <GuiMenu.au3> #include <WinAPIShellEx.au3> Global $g_hCB, $g_pCB, $g_ahProc[2][2] ;Stores the Data for subclassing listview Global $g_LVKEYUP = 0xFE00, $g_LVKEYDN = 0xFD00 ;Our Own Custom messages (Key Up/Dn) Global $g_iDummyData Global $g_hGui = GUICreate("test") Global $g_hList1 = GUICtrlCreateListView("#|x|y", 5, 24, 161, 70, $LVS_SHOWSELALWAYS Or $LVS_SINGLESEL) GUICtrlCreateListViewItem("text", $g_hList1) Global $g_hList1_LVN = GUICtrlCreateDummy() ;Recieves Messages from the callback Global $g_hContext1 = GUICtrlCreateContextMenu($g_hList1) GUICtrlCreateMenuItem("1", $g_hContext1) GUICtrlCreateMenuItem("2", $g_hContext1) Global $g_hList2 = GUICtrlCreateListView("#|x|y", 5, 100, 161, 70, $LVS_SHOWSELALWAYS Or $LVS_SINGLESEL) GUICtrlCreateListViewItem("text", $g_hList2) Global $g_hList2_LVN = GUICtrlCreateDummy() ;Recieves Messages from the callback Global $g_hContext2 = GUICtrlCreateContextMenu($g_hList2) GUICtrlCreateMenuItem("3", $g_hContext2) GUICtrlCreateMenuItem("4", $g_hContext2) GUISetState(@SW_SHOW) SubClassListView() ;Creates our subclass Func SubClassListView() OnAutoItExitRegister("Cleanup") ;to remove our subclass $g_hCB = DllCallbackRegister('_SubclassProc', 'lresult', 'hwnd;uint;wparam;lparam;uint_ptr;dword_ptr') $g_pCB = DllCallbackGetPtr($g_hCB) $g_ahProc[0][0] = $g_hList1 ;Add the Ids of the controls we'd like to subclass $g_ahProc[1][0] = $g_hList2 ;Set up the subclass _WinAPI_SetWindowSubclass ( $hWnd, $pSubclassProc, $idSubClass [, $pData = 0] ) $g_ahProc[0][1] = _WinAPI_SetWindowSubclass(GUICtrlGetHandle($g_ahProc[0][0]), $g_pCB, $g_ahProc[0][0], $g_hList1_LVN) $g_ahProc[1][1] = _WinAPI_SetWindowSubclass(GUICtrlGetHandle($g_ahProc[1][0]), $g_pCB, $g_ahProc[1][0], $g_hList2_LVN) EndFunc ;==>SubClassListView Func _SubclassProc($hWnd, $iMsg, $wParam, $lParam, $iID, $pData) #forceref $iID Local $iRtnMsg = 0 ;Events we'd like to intercept If $iMsg = $WM_KEYUP Or $iMsg = $WM_SYSKEYUP Then $iRtnMsg = $g_LVKEYUP ElseIf $iMsg = $WM_KEYDOWN Or $iMsg = $WM_SYSKEYDOWN Then $iRtnMsg = $g_LVKEYDN EndIf ;We Recieve the Id of the dummy through $pData and pass our RtnMsg to the dummy control If $iRtnMsg Then GUICtrlSendToDummy($pData, BitOR($iRtnMsg, $wParam)) ;Pass messages on to the default handler Return _WinAPI_DefSubclassProc($hWnd, $iMsg, $wParam, $lParam) EndFunc ;==>_SubclassProc Func Cleanup() For $i = 0 To UBound($g_ahProc) - 1 ;Remove Our Subclass' by setting it back to the original proc _WinAPI_RemoveWindowSubclass(GUICtrlGetHandle($g_ahProc[$i][0]), DllCallbackGetPtr($g_ahProc[$i][1]), $g_ahProc[$i][0]) Next DllCallbackFree($g_hCB) EndFunc ;==>Cleanup While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit Case $g_hList1_LVN ;This is just a dummy it only recieves events ConsoleWrite("LV1 EVENT 0x" & Hex($g_iDummyData, 4) & @CRLF) $g_iDummyData = GUICtrlRead($g_hList1_LVN) ;Retrieve the code that was sent Switch BitAND($g_iDummyData, 0xFF00) ;Get the keyup/dn status Case $g_LVKEYDN If BitAND($g_iDummyData, 0x00FF) = 0x79 And (_IsPressed("A0") Or _IsPressed("A1")) Then ;Right/ Left Shift & F10 ShowMenu($g_hGui, $g_hList1, $g_hContext1) Else ConsoleWrite("Lv1 KeyDn Vk: 0x" & Hex(BitAND($g_iDummyData, 0x00FF), 2) & @CRLF) ;Get the Virtual keycode EndIf Case $g_LVKEYUP ConsoleWrite("Lv1 KeyUp Vk: 0x" & Hex(BitAND($g_iDummyData, 0x00FF), 2) & @CRLF) ;Get the Virtual keycode EndSwitch Case $g_hList2_LVN $g_iDummyData = GUICtrlRead($g_hList2_LVN) ;Retrieve the code that was sent ConsoleWrite("LV2 EVENT 0x" & Hex($g_iDummyData, 4) & @CRLF) Switch BitAND($g_iDummyData, 0xFF00) ;Get the keyup/dn status Case $g_LVKEYDN ConsoleWrite("Lv2 KeyDn Vk: 0x" & Hex(BitAND($g_iDummyData, 0x00FF), 2) & @CRLF) ;Get the Virtual keycode Case $g_LVKEYUP ConsoleWrite("Lv2 KeyUp Vk: 0x" & Hex(BitAND($g_iDummyData, 0x00FF), 2) & @CRLF) ;Get the Virtual keycode EndSwitch EndSwitch WEnd Func ShowMenu($hWnd, $idCtrl, $idContext) Local $aPos, $iX, $iY Local $hMenu = GUICtrlGetHandle($idContext) $aPos = ControlGetPos($hWnd, "", $idCtrl) $iX = $aPos[0] $iY = $aPos[1] + $aPos[3] ClientToScreen($hWnd, $iX, $iY) ; Show at the given coordinates (x, y) the popup menu (hMenu) which belongs to a given GUI window (hWnd) _GUICtrlMenu_TrackPopupMenu($hMenu, $hWnd, $iX, $iY) EndFunc ;==>ShowMenu ; Convert the client (GUI) coordinates to screen (desktop) coordinates Func ClientToScreen($hWnd, ByRef $iX, ByRef $iY) Local $tPoint = DllStructCreate("int;int") DllStructSetData($tPoint, 1, $iX) DllStructSetData($tPoint, 2, $iY) DllCall("user32.dll", "int", "ClientToScreen", "hwnd", $hWnd, "struct*", $tPoint) $iX = DllStructGetData($tPoint, 1) $iY = DllStructGetData($tPoint, 2) ; release Struct not really needed as it is a local $tPoint = 0 EndFunc ;==>ClientToScreen  
      Old Code Using setWindowLong
       
    • Bilgus
      By Bilgus
      Literally just a list of listview styles / extended styles and WS / WSEX styles prints them in the console by their name
      ;Debug ;Debug_GetLvMStyles($g_hListView) ;Debug_GetHDStyles($g_hListView) ;Debug_GetWSStyles($g_hListView) ;Debug_GetWSStyles($g_hWnd) ;;#include <ListViewConstants.au3> Func Debug_GetLvMStyles($hListView) Local $LVStyle = _WinAPI_GetWindowLong($hListView, -16) Local $LVExStyle = _GUICtrlListView_GetExtendedListViewStyle($hListView) Local $sLVSTYLES Local $sLVExSTYLES If @error Then ConsoleWrite(" Error Debug_GetLvMStyles Couldn't retrieve Styles") Return EndIf If BitAND($LVStyle, $LVS_ALIGNLEFT) Then $sLVSTYLES &= "$LVS_ALIGNLEFT, " If BitAND($LVStyle, $LVS_ALIGNMASK) Then $sLVSTYLES &= "$LVS_ALIGNMASK, " If BitAND($LVStyle, $LVS_ALIGNTOP) Then $sLVSTYLES &= "$LVS_ALIGNTOP, " If BitAND($LVStyle, $LVS_AUTOARRANGE) Then $sLVSTYLES &= "$LVS_AUTOARRANGE, " If BitAND($LVStyle, $LVS_DEFAULT) Then $sLVSTYLES &= "LVS_DEFAULT," If BitAND($LVStyle, $LVS_EDITLABELS) Then $sLVSTYLES &= "LVS_EDITLABELS, " If BitAND($LVStyle, $LVS_ICON) Then $sLVSTYLES &= "LVS_ICON, " If BitAND($LVStyle, $LVS_LIST) Then $sLVSTYLES &= "LVS_LIST, " If BitAND($LVStyle, $LVS_NOCOLUMNHEADER) Then $sLVSTYLES &= "LVS_NOCOLUMNHEADER, " If BitAND($LVStyle, $LVS_NOLABELWRAP) Then $sLVSTYLES &= "LVS_NOLABELWRAP, " If BitAND($LVStyle, $LVS_NOSCROLL) Then $sLVSTYLES &= "LVS_NOSCROLL, " If BitAND($LVStyle, $LVS_NOSORTHEADER) Then $sLVSTYLES &= "LVS_NOSORTHEADER, " If BitAND($LVStyle, $LVS_OWNERDATA) Then $sLVSTYLES &= "LVS_OWNERDATA, " If BitAND($LVStyle, $LVS_OWNERDRAWFIXED) Then $sLVSTYLES &= "LVS_OWNERDRAWFIXED, " If BitAND($LVStyle, $LVS_REPORT) Then $sLVSTYLES &= "LVS_REPORT, " If BitAND($LVStyle, $LVS_SHAREIMAGELISTS) Then $sLVSTYLES &= "LVS_SHAREIMAGELISTS, " If BitAND($LVStyle, $LVS_SHOWSELALWAYS) Then $sLVSTYLES &= "LVS_SHOWSELALWAYS, " If BitAND($LVStyle, $LVS_SINGLESEL) Then $sLVSTYLES &= "LVS_SINGLESEL, " If BitAND($LVStyle, $LVS_SMALLICON) Then $sLVSTYLES &= "LVS_SMALLICON, " If BitAND($LVStyle, $LVS_SORTASCENDING) Then $sLVSTYLES &= "LVS_SORTASCENDING, " If BitAND($LVStyle, $LVS_SORTDESCENDING) Then $sLVSTYLES &= "LVS_SORTDESCENDING, " If BitAND($LVStyle, $LVS_TYPEMASK) Then $sLVSTYLES &= "LVS_TYPEMASK, " If BitAND($LVStyle, $LVS_TYPESTYLEMASK) Then $sLVSTYLES &= "LVS_TYPESTYLEMASK, " If BitAND($LVExStyle, $LVS_EX_AUTOAUTOARRANGE) Then $sLVExSTYLES &= "$LVS_EX_AUTOARRANGE, " If BitAND($LVExStyle, $LVS_EX_AUTOCHECKSELECT) Then $sLVExSTYLES &= "$LVS_EX_AUTOCHECKSELECT, " If BitAND($LVExStyle, $LVS_EX_AUTOSIZECOLUMNS) Then $sLVExSTYLES &= "$LVS_EX_AUTOSIZECOLUMNS, " If BitAND($LVExStyle, $LVS_EX_BORDERSELECT) Then $sLVExSTYLES &= "$LVS_EX_BORDERSELECT, " If BitAND($LVExStyle, $LVS_EX_CHECKBOXES) Then $sLVExSTYLES &= "$LVS_EX_CHECKBOXES, " If BitAND($LVExStyle, $LVS_EX_COLUMNOVERFLOW) Then $sLVExSTYLES &= "$LVS_EX_COLUMNOVERFLOW, " If BitAND($LVExStyle, $LVS_EX_COLUMNSNAPPOINTS) Then $sLVExSTYLES &= "$LVS_EX_COLUMNSNAPPOINTS, " If BitAND($LVExStyle, $LVS_EX_DOUBLEBUFFER) Then $sLVExSTYLES &= "$LVS_EX_DOUBLEBUFFER, " If BitAND($LVExStyle, $LVS_EX_FLATSB) Then $sLVExSTYLES &= "$LVS_EX_FLATSB, " If BitAND($LVExStyle, $LVS_EX_FULLROWSELECT) Then $sLVExSTYLES &= "$LVS_EX_FULLROWSELECT, " If BitAND($LVExStyle, $LVS_EX_GRIDLINES) Then $sLVExSTYLES &= "$LVS_EX_GRIDLINES, " If BitAND($LVExStyle, $LVS_EX_HEADERDRAGDROP) Then $sLVExSTYLES &= "$LVS_EX_HEADERDRAGDROP, " If BitAND($LVExStyle, $LVS_EX_HEADERINALLVIEWS) Then $sLVExSTYLES &= "$LVS_EX_HEADERINALLVIEWS, " If BitAND($LVExStyle, $LVS_EX_HIDELABELS) Then $sLVExSTYLES &= "$LVS_EX_HIDELABELS, " If BitAND($LVExStyle, $LVS_EX_INFOTIP) Then $sLVExSTYLES &= "$LVS_EX_INFOTIP, " If BitAND($LVExStyle, $LVS_EX_JUSTIFYCOLUMNS) Then $sLVExSTYLES &= "$LVS_EX_JUSTIFYCOLUMNS, " If BitAND($LVExStyle, $LVS_EX_LABELTIP) Then $sLVExSTYLES &= "$LVS_EX_LABELTIP, " If BitAND($LVExStyle, $LVS_EX_MULTIWORKAREAS) Then $sLVExSTYLES &= "$LVS_EX_MULTIWORKAREAS, " If BitAND($LVExStyle, $LVS_EX_ONECLICKACTIVATE) Then $sLVExSTYLES &= "$LVS_EX_ONECLICKACTIVATE, " If BitAND($LVExStyle, $LVS_EX_REGIONAL) Then $sLVExSTYLES &= "$LVS_EX_REGIONAL, " If BitAND($LVExStyle, $LVS_EX_SIMPLESELECT) Then $sLVExSTYLES &= "$LVS_EX_SIMPLESELECT, " If BitAND($LVExStyle, $LVS_EX_SNAPTOGRID) Then $sLVExSTYLES &= "$LVS_EX_SNAPTOGRID, " If BitAND($LVExStyle, $LVS_EX_SUBITEMIMAGES) Then $sLVExSTYLES &= "$LVS_EX_SUBITEMIMAGES, " If BitAND($LVExStyle, $LVS_EX_TRACKSELECT) Then $sLVExSTYLES &= "$LVS_EX_TRACKSELECT, " If BitAND($LVExStyle, $LVS_EX_TRANSPARENTBKGND) Then $sLVExSTYLES &= "$LVS_EX_TRANSPARENTBACKGROUND, " If BitAND($LVExStyle, $LVS_EX_TRANSPARENTSHADOWTEXT) Then $sLVExSTYLES &= "$LVS_EX_TRANSPARENTTEXTSHADOW, " If BitAND($LVExStyle, $LVS_EX_TWOCLICKACTIVATE) Then $sLVExSTYLES &= "$LVS_EX_TWOCLICKACTIVATE, " If BitAND($LVExStyle, $LVS_EX_UNDERLINECOLD) Then $sLVExSTYLES &= "$LVS_EX_UNDERLINECOLD, " If BitAND($LVExStyle, $LVS_EX_UNDERLINEHOT) Then $sLVExSTYLES &= "$LVS_EX_UNDERLINEHOT, " ConsoleWrite("Lv Styles= " & $sLVSTYLES & @CRLF) ConsoleWrite("Lv Ex Styles= " & $sLVExSTYLES & @CRLF) EndFunc ;==>Debug_GetLvMStyles ;;#include <HeaderConstants.au3> Func Debug_GetHDStyles($hListView) Local $hHeader = _GUICtrlListView_GetHeader($hListView) Local $HDStyle = _WinAPI_GetWindowLong($hHeader, -16) Local $sHDSTYLES If @error Then ConsoleWrite(" Error Debug_GetHDStyles Couldn't retrieve Styles") Return EndIf If BitAND($HDStyle, $HDS_BUTTONS) Then $sHDSTYLES &= "$HDS_STYLES, " ;0x00000002 ; Each item in the control looks and behaves like a push button If BitAND($HDStyle, $HDS_CHECKBOXES) Then $sHDSTYLES &= "$HDS_CHECKBOXES, " ;0x00000400 ; Allows the placing of checkbo ;es on header items on Vista If BitAND($HDStyle, $HDS_DRAGDROP) Then $sHDSTYLES &= "$HDS_DRAGDROP, " ;0x00000040 ; Allows drag-and-drop reordering of header items If BitAND($HDStyle, $HDS_FILTERBAR) Then $sHDSTYLES &= "$HDS_FILTERBAR, " ;0x00000100 ; Include a filter bar as part of the standard header control If BitAND($HDStyle, $HDS_FLAT) Then $sHDSTYLES &= "$HDS_FLAT, " ;0x00000200 ; Control is drawn flat when XP is running in classic mode If BitAND($HDStyle, $HDS_FULLDRAG) Then $sHDSTYLES &= "$HDS_FULLDRAG, " ;0x00000080 ; Column contents are displayed while the user resizes a column If BitAND($HDStyle, $HDS_HIDDEN) Then $sHDSTYLES &= "$HDS_HIDDEN, " ;0x00000008 ; Indicates a header control that is intended to be hidden If BitAND($HDStyle, $HDS_HORZ) Then $sHDSTYLES &= "$HDS_HORZ, " ;0x00000000 ; Creates a header control with a horizontal orientation If BitAND($HDStyle, $HDS_HOTTRACK) Then $sHDSTYLES &= "$HDS_HOTTRACK, " ;0x00000004 ; Enables hot tracking If BitAND($HDStyle, $HDS_NOSIZING) Then $sHDSTYLES &= "$HDS_NOSIZING, " ;0x0800 ; The user cannot drag the divider on the header control on Vista If BitAND($HDStyle, $HDS_OVERFLOW) Then $sHDSTYLES &= "$HDS_OVERFLOW, " ;0x1000 ; A button is displayed when not all items can be displayed within the header control's rectangle on Vista If BitAND($HDStyle, $HDS_DEFAULT) Then $sHDSTYLES &= "$HDS_DEFAULT, " ;0x00000046 ; Default header style $HDS_DRAGDROP + $HDS_HOTTRACK + $HDS_BUTTONS ConsoleWrite("Header Styles= " & $sHDSTYLES & @CRLF) EndFunc ;==>Debug_GetHDStyles Func Debug_GetWSStyles($hWnd) ;#include <WindowsConstants.au3> Local $WSStyle = _WinAPI_GetWindowLong($hWnd, -16) Local $sWSSTYLES Local $WSEXStyle = _WinAPI_GetWindowLong($hWnd, -20) ;_GUICtrlListView_GetExtendedListViewStyle($hListView); Local $sWSEXSTYLES If @error Then ConsoleWrite(" Error Debug_GetWSStyles Couldn't retrieve Styles") Return EndIf If BitAND($WSStyle, $WS_OVERLAPPED) Then $sWSSTYLES &= "$WS_OVERLAPPED, " If BitAND($WSStyle, $WS_TILED) Then $sWSSTYLES &= "$WS_TILED, " If BitAND($WSStyle, $WS_MAXIMIZEBOX) Then $sWSSTYLES &= "$WS_MAXIMIZEBOX, " ;0x00010000 If BitAND($WSStyle, $WS_MINIMIZEBOX) Then $sWSSTYLES &= "$WS_MINIMIZEBOX, " ;0x00020000 If BitAND($WSStyle, $WS_TABSTOP) Then $sWSSTYLES &= "$WS_TABSTOP, " ;0x00010000 If BitAND($WSStyle, $WS_GROUP) Then $sWSSTYLES &= "$WS_GROUP, " ;0x00020000 If BitAND($WSStyle, $WS_SIZEBOX) Then $sWSSTYLES &= "$WS_SIZEBOX, " ;0x00040000 If BitAND($WSStyle, $WS_THICKFRAME) Then $sWSSTYLES &= "$WS_THICKFRAME, " If BitAND($WSStyle, $WS_SYSMENU) Then $sWSSTYLES &= "$WS_SYSMENU, " ;0x00080000 If BitAND($WSStyle, $WS_HSCROLL) Then $sWSSTYLES &= "$WS_HSCROLL, " ;0x00100000 If BitAND($WSStyle, $WS_VSCROLL) Then $sWSSTYLES &= "$WS_VSCROLL, " ;0x00200000 If BitAND($WSStyle, $WS_DLGFRAME) Then $sWSSTYLES &= "$WS_DLGFRAME, " ;0x00400000 If BitAND($WSStyle, $WS_BORDER) Then $sWSSTYLES &= "$WS_BORDER, " ;0x00800000 If BitAND($WSStyle, $WS_CAPTION) Then $sWSSTYLES &= "$WS_CAPTION, " ;0x00C00000 If BitAND($WSStyle, $WS_OVERLAPPEDWINDOW) Then $sWSSTYLES &= "$WS_OVERLAPPEDWINDOW, " If BitAND($WSStyle, $WS_TILEDWINDOW) Then $sWSSTYLES &= "$WS_TILEDWINDOW, " If BitAND($WSStyle, $WS_MAXIMIZE) Then $sWSSTYLES &= "$WS_MAXIMIZE, " ;0x01000000 If BitAND($WSStyle, $WS_CLIPCHILDREN) Then $sWSSTYLES &= "$WS_CLIPCHILDREN, " ;0x02000000 If BitAND($WSStyle, $WS_CLIPSIBLINGS) Then $sWSSTYLES &= "$WS_CLIPSIBLINGS, " ;0x04000000 If BitAND($WSStyle, $WS_DISABLED) Then $sWSSTYLES &= "$WS_DISABLED, " ;0x08000000 If BitAND($WSStyle, $WS_VISIBLE) Then $sWSSTYLES &= "$WS_VISIBLE, " ;0x10000000 If BitAND($WSStyle, $WS_MINIMIZE) Then $sWSSTYLES &= "$WS_MINIMIZE, " ;0x20000000 If BitAND($WSStyle, $WS_ICONIC) Then $sWSSTYLES &= "$WS_ICONIC, " If BitAND($WSStyle, $WS_CHILD) Then $sWSSTYLES &= "$WS_CHILD, " ;0x40000000 If BitAND($WSStyle, $WS_CHILDWINDOW) Then $sWSSTYLES &= "$WS_CHILDWINDOW, " If BitAND($WSStyle, $WS_POPUP) Then $sWSSTYLES &= "$WS_POPUP, " ;0x80000000 If BitAND($WSStyle, $WS_POPUPWINDOW) Then $sWSSTYLES &= "$WS_POPUPWINDOW, " ;0x80880000 If BitAND($WSEXStyle, $WS_EX_ACCEPTFILES) Then $sWSEXSTYLES &= "$WS_EX_ACCEPTFILES, " ;0x00000010 If BitAND($WSEXStyle, $WS_EX_APPWINDOW) Then $sWSEXSTYLES &= "$WS_EX_APPWINDOW, " ;0x00040000 If BitAND($WSEXStyle, $WS_EX_COMPOSITED) Then $sWSEXSTYLES &= "$WS_EX_COMPOSITED, " ;0x02000000 If BitAND($WSEXStyle, $WS_EX_CONTROLPARENT) Then $sWSEXSTYLES &= "$WS_EX_CONTROLPARENT, " ;0x10000 If BitAND($WSEXStyle, $WS_EX_CLIENTEDGE) Then $sWSEXSTYLES &= "$WS_EX_CLIENTEDGE, " ;0x00000200 If BitAND($WSEXStyle, $WS_EX_CONTEXTHELP) Then $sWSEXSTYLES &= "$WS_EX_CONTEXTHELP, " ;0x00000400 If BitAND($WSEXStyle, $WS_EX_DLGMODALFRAME) Then $sWSEXSTYLES &= "$WS_EX_DLGMODALFRAME, " ;0x00000001 If BitAND($WSEXStyle, $WS_EX_LAYERED) Then $sWSEXSTYLES &= "$WS_EX_LAYERED, " ;0x00080000 If BitAND($WSEXStyle, $WS_EX_LAYOUTRTL) Then $sWSEXSTYLES &= "$WS_EX_LAYOUTRTL, " ;0x400000 If BitAND($WSEXStyle, $WS_EX_LEFT) Then $sWSEXSTYLES &= "$WS_EX_LEFT, " ;0x00000000 If BitAND($WSEXStyle, $WS_EX_LEFTSCROLLBAR) Then $sWSEXSTYLES &= "$WS_EX_LEFTSCROLLBAR, " ;0x00004000 If BitAND($WSEXStyle, $WS_EX_LTRREADING) Then $sWSEXSTYLES &= "$WS_EX_LTRREADING, " ;0x00000000 If BitAND($WSEXStyle, $WS_EX_MDICHILD) Then $sWSEXSTYLES &= "$WS_EX_MDICHILD, " ;0x00000040 If BitAND($WSEXStyle, $WS_EX_NOACTIVATE) Then $sWSEXSTYLES &= "$WS_EX_NOACTIVATE, " ;0x08000000 If BitAND($WSEXStyle, $WS_EX_NOINHERITLAYOUT) Then $sWSEXSTYLES &= "$WS_EX_NOINHERITLAYOUT, " ;0x00100000 If BitAND($WSEXStyle, $WS_EX_NOPARENTNOTIFY) Then $sWSEXSTYLES &= "$WS_EX_NOPARENTNOTIFY, " ;0x00000004 If BitAND($WSEXStyle, $WS_EX_RIGHT) Then $sWSEXSTYLES &= "$WS_EX_RIGHT, " ;0x00001000 If BitAND($WSEXStyle, $WS_EX_RIGHTSCROLLBAR) Then $sWSEXSTYLES &= "$WS_EX_RIGHTSCROLLBAR, " ;0x00000000 If BitAND($WSEXStyle, $WS_EX_RTLREADING) Then $sWSEXSTYLES &= "$WS_EX_RTLREADING, " ;0x2000 If BitAND($WSEXStyle, $WS_EX_STATICEDGE) Then $sWSEXSTYLES &= "$WS_EX_STATICEDGE, " ;0x00020000 If BitAND($WSEXStyle, $WS_EX_TOOLWINDOW) Then $sWSEXSTYLES &= "$WS_EX_TOOLWINDOW, " ;0x00000080 If BitAND($WSEXStyle, $WS_EX_TOPMOST) Then $sWSEXSTYLES &= "$WS_EX_TOPMOST, " ;0x00000008 If BitAND($WSEXStyle, $WS_EX_TRANSPARENT) Then $sWSEXSTYLES &= "$WS_EX_TRANSPARENT, " ;0x00000020 If BitAND($WSEXStyle, $WS_EX_WINDOWEDGE) Then $sWSEXSTYLES &= "$WS_EX_WINDOWEDGE, " ;0x00000100 If BitAND($WSEXStyle, $WS_EX_OVERLAPPEDWINDOW) Then $sWSEXSTYLES &= "$WS_EX_OVERLAPPEDWINDOW, " If BitAND($WSEXStyle, $WS_EX_PALETTEWINDOW) Then $sWSEXSTYLES &= "$WS_EX_PALETTEWINDOW, " ConsoleWrite("WS Styles= " & $sWSSTYLES & @CRLF) ConsoleWrite("WS EX Styles= " & $sWSEXSTYLES & @CRLF) EndFunc ;==>Debug_GetWSStyles  
    • rudi
      By rudi
      Hello,
       
      for some script I need to investigate the states checked/unchecked, hidden/shown, enabled/disabled to several checkbox controls.
       
      Any suggestions to this script to retrieve the information in a better way?
      ; Autoit Version 3.3.14.2 ; GuiCtrlCheckState.au3 #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> $CtrlW = 100 $CtrlH = 30 $GuiW = 250 $GuiH = 300 GUICreate("Test Checkbox Status", $GuiW, $GuiH) $Ctrl = GUICtrlCreateCheckbox("Checkbox", 10, 10, $CtrlW, $CtrlH) Opt("Guicoordmode", 2) $BtnDisable = GUICtrlCreateButton("Disable", -1, 10) $BtnEnable = GUICtrlCreateButton("Enable", -1, 1) $BtnHide = GUICtrlCreateButton("Hide", 10, -$CtrlH * 2 - 1) $BtnUnHide = GUICtrlCreateButton("Show (Unhide)", -1, 1) $BtnCheckChecked = GUICtrlCreateButton("IsChecked", -$CtrlW * 2 - 10, 40) $BtnCheckEnabled = GUICtrlCreateButton("IsEnabled", -1, 1) $BtnCheckHidden = GUICtrlCreateButton("IsHidden", -1, 1) GUISetState() While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE ExitLoop Case $BtnDisable GUICtrlSetState($Ctrl, $gui_disable) Case $BtnEnable GUICtrlSetState($Ctrl, $GUI_Enable) Case $BtnHide GUICtrlSetState($Ctrl, $GUI_Hide) Case $BtnUnHide GUICtrlSetState($Ctrl, $GUI_show) Case $BtnCheckChecked If CheckState($Ctrl, $GUI_CHECKED) Then ConsoleWrite("Checked" & @CRLF) Else ConsoleWrite("not checked" & @CRLF) EndIf Case $BtnCheckEnabled If CheckState($Ctrl, $GUI_Enable) Then ConsoleWrite("enabled" & @CRLF) Else ConsoleWrite("disabled" & @CRLF) EndIf Case $BtnCheckHidden If CheckState($Ctrl, $GUI_Hide) Then ConsoleWrite("Hidden" & @CRLF) Else ConsoleWrite("not hidden" & @CRLF) EndIf EndSwitch WEnd Func CheckState($_CtrlID, $_State = $GUI_CHECKED) ConsoleWrite("---------------------" & @CRLF) ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $_State to check = ' & $_State & @CRLF & '>Error code: ' & @error & @CRLF) ;### Debug Console Local $_Read = GUICtrlRead($_CtrlID) ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $_Read (GuiCtrlRead) = ' & $_Read & @CRLF & '>Error code: ' & @error & @CRLF) ;### Debug Console Local $_StateFound = GUICtrlGetState($_CtrlID) ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $_StateFound (GuiCtrlGetState) = ' & $_StateFound & @CRLF & '>Error code: ' & @error & @CRLF) ;### Debug Console If $_StateFound = -1 Then MsgBox(48, "Control-ID not defined", "Control-ID invalid") Return False ElseIf BitAND($_StateFound, $_State) = $_State Then Return True ElseIf BitAND($_Read, $_State) = $_State Then Return True Else Return False EndIf EndFunc ;==>CheckState Regards, Rudi.
×