DDDW自动过滤符合值 光标的问题
dw_1中有一个hs_no字段
在dw_1的editchanged事件中 如下代码
If dwo.name = 'hs_no' Then
dw_1.object.hs_no.dddw.showlist = true//显示下拉
Long ll_Found
DataWindowChild ldwc_name
This.GetChild('hs_no',ldwc_name)
ldwc_name.SetTransObject(SQLCA)
If len(data) = 0 Then
ldwc_name.SetFilter('') ///清除过滤
ldwc_name.Filter()
Return
End If
ldwc_name.SetFilter("hs_name like '%"+data+"%'")
ldwc_name.Filter()
if ldwc_name.rowcount()=0 then return
ldwc_name.SelectRow(1,TRUE) //滚到制定行
end If
