在数据窗口中实现某一列的增量查询功能

在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) //将匹配行加亮显示

查看本文来源