Posts: 151
Threads: 90
Joined: Aug 2014
Hello.
Thank you, who always helping.
Please help me to.
ex:
Grid of checkboxes 0, 2, 4, 10 and 15 checked.
If "All Remove" button clicked.
I want to output 0,2,4,10,15.
How can I get info?
Posts: 12,072
Threads: 140
Joined: Dec 2002
Function
Dialog168
\Dialog_Editor
str dd=
;BEGIN DIALOG
;0 "" 0x90C80AC8 0x0 0 0 224 136 "Dialog"
;3 QM_Grid 0x56031041 0x200 0 0 226 112 "0x20,0,0,0x0,0x0[]A,,,[]B,,,"
;4 Button 0x54032000 0x0 8 116 60 14 "Get checked"
;1 Button 0x54030001 0x4 116 116 48 14 "OK"
;2 Button 0x54030000 0x4 168 116 48 14 "Cancel"
;END DIALOG
;DIALOG EDITOR: "" 0x2040300 "*" "" "" ""
str controls = "3"
str qmg3x
if(!ShowDialog(dd &sub.DlgProc &controls)) ret
#sub DlgProc
function# hDlg message wParam lParam
DlgGrid g.Init(hDlg 3)
sel message
,case WM_INITDIALOG
,_s=
,;a1,b1
,;a2,b2
,;a3,b3
,g.FromCsv(_s ",")
,
,case WM_DESTROY
,case WM_COMMAND goto messages2
ret
;messages2
sel wParam
,case 4 ;;Get checked
,out "Checked items:"
,int i
,for i 0 g.RowsCountGet
,,if g.RowIsChecked(i)
,,,out i
,
,case IDOK
,case IDCANCEL
ret 1