QM_Grid copy

[felps23]

It's possible to copy a selected row in QM_Grid when the user click on a button? Like in this example.

Code:

Copy      Help

Macro [b]Macro3[/b] [help1][/help1]
[code]
str dd=
;BEGIN DIALOG
;0 "" 0x90C80AC8 0x0 0 0 354 200 "Dialog" "4"
;3 Button 0x54032000 0x0 300 3 48 14 "Copy"
;4 QM_Grid 0x56031041 0x200 5 3 288 191 "0x0,0,0,0x0,0x0[]A,,7,[]B,,7,"
;END DIALOG
;DIALOG EDITOR: "" 0x2040B00 "*" "" "" ""

str controls = "4"
str qmg4x
if(!ShowDialog(dd &sub.DlgProc &controls)) ret


#sub DlgProc
function# hDlg message wParam lParam

DlgGrid g.Init(hDlg 4)
sel message
,case WM_INITDIALOG
,_s=
,;1, 2
,;3, 4
,;5, 6
,g.FromCsv(_s ",")
,
,case WM_DESTROY
,case WM_COMMAND goto messages2
ret
;messages2
sel wParam
,case IDOK
,case IDCANCEL
ret 1

[/code]