Home > database >  How to put the data window CHECKBOX selected some lines of writing data array
How to put the data window CHECKBOX selected some lines of writing data array

Time:09-24

Data type is LONG
Please help me each master!!!!!!

CodePudding user response:

The data window setfilter
Datastore typical vmlinux.lds
Typical vmlinux.lds=create datastore
Typical vmlinux.lds. Dataobject=dw_1. Dataobject
Typical vmlinux.lds. Importstring (dw_1. Object. The datawindow. Data)
Typical vmlinux.lds. Setfilter (" col_checkbox_sel=1 ")
Typical vmlinux.lds. Filter ()

Long ll_sel []
Ll_sel=typical vmlinux.lds. Object. Col_checkbox_sel. Primary

Destroy typical vmlinux.lds


You can also directly conducted on dw_1 setfilter and filter

CodePudding user response:

The data window setfilter
Datastore typical vmlinux.lds
Typical vmlinux.lds=create datastore
Typical vmlinux.lds. Dataobject=dw_1. Dataobject
Typical vmlinux.lds. Importstring (dw_1. Object. The datawindow. Data)
Typical vmlinux.lds. Setfilter (" col_checkbox_sel=1 ")
Typical vmlinux.lds. Filter ()

Long ll_sel []
Ll_sel=typical vmlinux.lds. Object. To write the columns of the array. Primary//if it is the combination of multiple columns, you can add a computed column in dw, written expression, and then to ll_sel=typical vmlinux.lds. Object. Add computed columns. Primary

Destroy typical vmlinux.lds


You can also directly conducted on dw_1 setfilter and filter

CodePudding user response:

If the disposable submitted, method is the most concise upstairs. If is the time to click on the chosen, choice, cancel the cancelled.
Define an install variable: long il_rows []
In the clicked event:
Long ll_frow
If this. Object. Check_object [row]=0 then
Ll_frow=of_exists (il_rows, row)
If ll_frow=0 then
Il_rows [upperbound (il_rows) + +]=row
End the if
The else
Ll_frow=of_exists (il_rows, row)
If ll_frow & gt; 0 then
Il_rows [ll_frow]=il_rows [upperbound (il_rows)]
Il_rows [upperbound (il_rows)]=setnull (ll_frow)
End the if
End the if

Of_exists (long args [], long row)
Long ll_row
Long ll_upper
Ll_upper=upperbound (args)
If ll_upper & lt; 1 then return 0
For ll_row=1 to ll_upper
If args [ll_row]=row then return ll_row
End for
return 0
  • Related