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

减小字体 增大字体 作者:佚名  来源:本站整理  发布时间:2017-06-13 17:05:06

  问:请问在PB的数据窗口中怎样实现某一列的增量查询功能,就是说在单行编辑器控件中每输入一个字符,数据窗口能找到这一列值左边部分与单行编辑器中内容相等的行,并加亮显示。
例如数据窗口是按整型字段“ID”升序排列的,用户在单行编辑器中输入1,则数据窗口滚动到ID字段第一位为“1”的第一行并加亮显示;再在1后输入0,则数据窗口滚动到ID字段前两位为“10”的第一行,依次类推。

  答:增量查询功能实现的关键有两点,一是单行编辑器能实时响应键盘的输入,捕捉每一个按键,获得其中的文本;二是数据窗口的模糊查询功能,即能够找到列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) //将匹配行加亮显示


Tags:

作者:佚名
分享到: 微信 更多