首页 > 代码库 > 数据窗口字段编辑时过滤下拉数据窗口
数据窗口字段编辑时过滤下拉数据窗口
前提:将数据窗口的下tab键用回车键取代。
// event editchangeddatawindowchild ldw_tempString ls_filterLong ll_startIf dwo.Name = ‘syjsf02‘ Then This.GetChild(‘syjsf02‘,ldw_temp) If Trim(Data)=‘‘ Or IsNull(Data) Then ls_filter = "" Else ls_filter = "(szzxm01 LIKE ‘" + Upper(Data) + "%‘) OR (szzxm08 LIKE ‘" + Upper(Data) + "%‘ ) or (szzxm09 like ‘" + Upper(Data) + "%‘ ) OR (szzxm02 LIKE ‘%" + Upper(Data) + "%‘)" End IF ldw_temp.SetFilter(ls_filter) ldw_temp.Filter() ll_start = This.SelectedStart() This.SelectText(ll_start,0) Return 1END IF
//event itemchangeddatawindowchild ldw_tempdec ldec_djif dwo.name = ‘syjsf02‘ then This.GetChild(‘syjsf02‘, ldw_temp) IF ldw_temp.RowCount() <= 0 THEN This.SetItem(This.GetRow(),‘syjsf02‘,‘‘) ldw_temp.SETFILter("") ldw_temp.FIlter() setitem(row,‘dj‘,0) RETURN 1 else This.object.syjsf02[row] = ldw_temp.getitemstring(ldw_temp.getrow() , ‘szzxm01‘) ldec_dj = ldw_temp.getItemNumber(ldw_temp.getrow(),‘nzzxm07‘) setitem(row,‘dj‘,ldec_dj) ldw_temp.SETFILter("") ldw_temp.FIlter() return 2 END IFend if
// ue_enterdatawindowchild ldw_tempThis.GetChild(‘syjsf02‘,ldw_temp)ldw_temp.SETFILter("")ldw_temp.FIlter()this.setredraw(true)
数据窗口字段编辑时过滤下拉数据窗口
声明:以上内容来自用户投稿及互联网公开渠道收集整理发布,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任,若内容有误或涉及侵权可进行投诉: 投诉/举报 工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。