#include "SoundGetSetQuery.au3"
#include "ListViewConstants.au3"
#include <GuiListView.au3>
; #include <Array.au3>
Dim $aM[22]
; _ArrayDisplay( $a, "Информация о регуляторах в микшере" )
GUICreate("SoundQuery Results", 300, 550)
$hListView = GUICtrlCreateListView("MixerID|ComponentType|CompInst", 10, 10, 280, 530, $LVS_NOCOLUMNHEADER, $LVS_EX_CHECKBOXES)
GUICtrlSendMsg($hListView, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_FULLROWSELECT, $LVS_EX_FULLROWSELECT)
GUICtrlSendMsg($hListView, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_TRACKSELECT, $LVS_EX_TRACKSELECT)
For $i = 0 to 21
$aM[$i]=GUICtrlCreateListViewItem('1|2|3', $hListView)
Next
GUISetState ()
While 1
$msg = GUIGetMsg()
For $i = 0 to 21
If $msg = $aM[$i] Then
If _GUICtrlListView_GetItemChecked($hListView,ControlListView("SoundQuery Results", "", "SysListView321", "GetSelected"))=1 Then
_GUICtrlListView_SetItemChecked($hListView,ControlListView("SoundQuery Results", "", "SysListView321", "GetSelected"), False)
Else
_GUICtrlListView_SetItemChecked($hListView,ControlListView("SoundQuery Results", "", "SysListView321", "GetSelected"), True)
EndIf
EndIf
Next
Select
Case $msg = -3
Exit
EndSelect
WEnd |
