Radio Buttons in Listview?

[MikelSevrel]

I want a listview with radio buttons. But I can't figure it out. Here's what I ahve, but multiple boxes are selectable.

$every = GUICtrlCreateListView("radio", 200, 160, 180, 40, BitOR($LVS_SHOWSELALWAYS, $LVS_SINGLESEL, $LVS_NOCOLUMNHEADER, $LVS_REPORT))
_GUICtrlListViewSetColumnWidth ($every, 0, 175)
GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_GRIDLINES, $LVS_EX_GRIDLINES)
GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_FULLROWSELECT, $LVS_EX_FULLROWSELECT)
GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_SINGLESEL, $LVS_SINGLESEL)
GUICtrlCreateListViewItem("Weekly", $every)
GUICtrlCreateListViewItem("Only For the Next Week", $every)
GUISetState()

[GaryFrost]

I want a listview with radio buttons. But I can't figure it out. Here's what I ahve, but multiple boxes are selectable.

$every = GUICtrlCreateListView("radio", 200, 160, 180, 40, BitOR($LVS_SHOWSELALWAYS, $LVS_SINGLESEL, $LVS_NOCOLUMNHEADER, $LVS_REPORT))
_GUICtrlListViewSetColumnWidth ($every, 0, 175)
GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_GRIDLINES, $LVS_EX_GRIDLINES)
GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_FULLROWSELECT, $LVS_EX_FULLROWSELECT)
GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_SINGLESEL, $LVS_SINGLESEL)
GUICtrlCreateListViewItem("Weekly", $every)
GUICtrlCreateListViewItem("Only For the Next Week", $every)
GUISetState()

Radio? no, CheckBoxes, yes

GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_CHECKBOXES, $LVS_EX_CHECKBOXES)

Edited February 25, 2006 by gafrost

[MikelSevrel]

Yeah, I can do that, ut I need only one to be selectable at a time.

[greenmachine]

Well, if radios aren't available, couldn't you just use some commands to make the checkbox act like a radio? Like, if ___ is checked, uncheck all these others.

[MikelSevrel]

Can you help with that,everything I've tried doesn't seeem to work.

I'm not sure how to make this function:

Func _weekly()
    $every2 = GUIctrlread(GUIctrlread($every))
Select
Case StringInStr($every2, "Weekly")
    I don't know what to put here
Case StringInStr($every2, "Only")
    I don't know what to put here
EndSelect
GUISetState()
EndFunc

[greenmachine]

I knew I could figure this out eventually... it was more complicated than I thought, because I didn't realize ListViews were so... different. Anyway, here's a result.

GUICreate ("")
$every = GUICtrlCreateListView("radio", 200, 160, 180, 40, BitOR($LVS_SHOWSELALWAYS, $LVS_SINGLESEL, $LVS_NOCOLUMNHEADER, $LVS_REPORT))
_GUICtrlListViewSetColumnWidth ($every, 0, 175)
GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_GRIDLINES, $LVS_EX_GRIDLINES)
GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_FULLROWSELECT, $LVS_EX_FULLROWSELECT)
GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_SINGLESEL, $LVS_SINGLESEL)
GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_CHECKBOXES, $LVS_EX_CHECKBOXES)
$ListViewItemWeekly = GUICtrlCreateListViewItem("Weekly", $every)
$ListViewItemNextWeek = GUICtrlCreateListViewItem("Only For the Next Week", $every)
GUISetState()

While 1
    $msg = GUIGetMsg()
    If $msg = $ListViewItemWeekly Then
        _GUICtrlListViewSetCheckState ($every, 1, 0)
    ElseIf $msg = $ListViewItemNextWeek Then
        _GUICtrlListViewSetCheckState ($every, 0, 0)
    ElseIf $msg = $GUI_EVENT_CLOSE Then
        Exit
    EndIf
    Sleep (1)
WEnd

[MikelSevrel]

THanks, that finished it up perfectly!

[MikelSevrel]

I needed to modify the code slightly to

Select
Case  _GUICtrlListViewGetCheckedState($every, 0) = 1
    _GUICtrlListViewSetCheckState ($every, 1, 0)
    $every2 = "Only For the Next Week"
Case _GUICtrlListViewGetCheckedState($every, 1) = 1 
    _GUICtrlListViewSetCheckState ($every, 0, 0)
    $every2 = "Weekly"
EndSelect

And now, one I select Weekly, I cannot change my selection. Is there any way around this?

[GaryFrost]

#include <GuiConstants.au3>
#include <GuiListView.au3>

GUICreate ("")
$every = GUICtrlCreateListView("radio", 200, 160, 180, 40, BitOR($LVS_SHOWSELALWAYS, $LVS_SINGLESEL, $LVS_NOCOLUMNHEADER, $LVS_REPORT))
_GUICtrlListViewSetColumnWidth ($every, 0, 175)
GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_GRIDLINES, $LVS_EX_GRIDLINES)
GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_FULLROWSELECT, $LVS_EX_FULLROWSELECT)
GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_SINGLESEL, $LVS_SINGLESEL)
GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_CHECKBOXES, $LVS_EX_CHECKBOXES)
$ListViewItemWeekly = GUICtrlCreateListViewItem("Weekly", $every)
$ListViewItemNextWeek = GUICtrlCreateListViewItem("Only For the Next Week", $every)
GUISetState()

While 1
    $msg = GUIGetMsg()
    If $msg = $ListViewItemWeekly Then
        _GUICtrlListViewSetCheckState ($every, 0, 1)
        _GUICtrlListViewSetCheckState ($every, 1, 0)
    ElseIf $msg = $ListViewItemNextWeek Then
        _GUICtrlListViewSetCheckState ($every, 0, 0)
        _GUICtrlListViewSetCheckState ($every, 1, 1)
    ElseIf $msg = $GUI_EVENT_CLOSE Then
        Exit
    EndIf
    Sleep (1)
WEnd

[MikelSevrel]

Thanks.

Edited February 26, 2006 by MikelSevrel

[GaryFrost]

$file = FileOpen("blankfile.txt", 1)

; Check if file opened for writing OK

If $file = -1 Then

MsgBox(0, "Error", "Unable to open file.")

Exit

EndIf

FileClose($file)

[jennico]

I know, this is an old thread, but i am working on this issue and maybe someone looking for a way to seperate checkbox and itemstates completely (checkbox only checked when clicked, but not on item selected) might find this slight variant useful:

#include<GuiConstants.au3>
#include<GuiListView.au3>

GUICreate ("")
$every = GUICtrlCreateListView("radio", 200, 160, 180, 40, BitOR($LVS_SHOWSELALWAYS, $LVS_SINGLESEL, $LVS_NOCOLUMNHEADER, $LVS_REPORT))
_GUICtrlListViewSetColumnWidth ($every, 0, 175)
GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_BORDERSELECT, $LVS_EX_BORDERSELECT)
GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_SINGLESEL, $LVS_SINGLESEL)
GUICtrlSendMsg($every, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_CHECKBOXES, $LVS_EX_CHECKBOXES)
$ListViewItemWeekly = GUICtrlCreateListViewItem("Weekly", $every)
$ListViewItemNextWeek = GUICtrlCreateListViewItem("Only For the Next Week", $every)
GUISetState()

While 1
    $msg = GUIGetMsg()
    If $msg = $ListViewItemWeekly Then
        If _GUICtrlListViewGetCheckedState($every,0) Then _GUICtrlListViewSetCheckState ($every, 1, 0)
    ElseIf $msg = $ListViewItemNextWeek Then
        If _GUICtrlListViewGetCheckedState($every,1) Then _GUICtrlListViewSetCheckState ($every, 0, 0)
    ElseIf $msg = $GUI_EVENT_CLOSE Then
        Exit
    EndIf
    Sleep (1)
WEnd

good night

j.

Edited January 13, 2008 by jennico