在数据窗口中实现某一列的增量查询功能
在PB的数据窗口中怎样实现某一列的增量查询功能,就是说在单行编辑器控件中每输入一个字符,数据窗口能找到这一列值左边部分与单行编辑器中内容相等的行,并加亮显示。
要完成上述增量查询功能,实现的关键有两点:一是单行编辑器能实时响应键盘的输入,捕捉每一个按键,获得其中的文本;二是数据窗口的模糊查询功能,即能够找到列ID左边文本与单行编辑器文本相等的行,这可以用“like”来实现。
下面给出具体方法:
1.定义单行编辑器的用户事件ue_enchange,事件的ID为:pbm_enchange。这个事件能响应键盘的输入。
2.在单行编辑器的ue_enchange事件中编写如下脚本:
long ll_found_row
string ls_find
ls_find = ″string(id) like ″ + ″′″ + this.text + ″%′″ //查找条件(左部分与单行编辑器文本相等)
ll_found_row = dw_name.Find(ls_find, 1, dw_name.RowCount()) //查找符合条件的行
if ll_found_row <= 0 then return
dw_name.ScrollToRow(ll_found_row) //滚动到相匹配的行
dw_name.SelectRow(0 , false)
dw_name.SelectRow(ll_found_row , true) //将匹配行加亮显示