zoukankan      html  css  js  c++  java
  • DevExpress控件TExtLookupComboBox实现多列模糊匹配输入的方法

    本方案不需要修改控件源码,是完美解决支持多列模糊匹配快速输入的最佳方案!!

     本实例应用于 CXGRID

    1、把列的Properties属性设置为ExtLookupComboBox。

    Properties.IncrementalFiltering := False;
    Properties.CaseSensitiveSearch := False; 
    Properties.DropDownListStyle := lsEditList;

    当然,接着要完成设置Properties.View,Properties.KeyFieldNames和Properties.ListFieldItem。

      // 本案例的列是:cxGridDBTableView1VENDOR_ID: TcxGridDBColumn;绑定服务商ID自动。

    2、Properties.OnChange事件代码:

    procedure TFormcxLookupCombox.cxGridDBTableView1VENDOR_IDPropertiesChange(Sender: TObject);

    var
      iCol: Integer;
      vInputText: String;
    begin
      // 注:cxGridDBTableView1VENDOR_ID: TcxGridDBColumn;
      (Sender as TcxExtLookupComboBox).Properties.IncrementalSearch := False; //必需
      (Sender as TcxExtLookupComboBox).Properties.CaseInsensitive := True;    //必需
      //(Sender as TcxExtLookupComboBox).Properties.IncrementalFiltering := False;//设计期在Properties中设置好.
      //(Sender as TcxExtLookupComboBox).Properties.CaseSensitiveSearch := False; //设计期在Properties中设置好.
      //(Sender as TcxExtLookupComboBox).Properties.DropDownListStyle := lsEditList;//设计期在Properties中设置好
      vInputText := (Sender as TcxExtLookupComboBox).EditText;
      // with (cxGrid1DBTableView1VENDOR_ID.Properties as TcxExtLookupComboBoxProperties) do
      with (Sender as TcxExtLookupComboBox).Properties do    // 改为通用写法.
      begin
        View.DataController.Filter.Options := [fcoCaseInsensitive];
        View.DataController.Filter.Clear;
        View.DataController.Filter.Root.Clear;
        // view中所有可视列都用于模糊检索.
        for iCol := 0 to View.VisibleItemCount - 1 do
        begin
          if iCol > 0 then View.DataController.Filter.Root.BoolOperatorKind := fboOR;
          View.DataController.Filter.Root.AddItem(View.VisibleItems[iCol], foLike,
           '%' + vInputText + '%', '%' + vInputText + '%');
        end;
        View.DataController.Filter.Active := True;
      end;
    end;

    3、Properties.OnCloseUp事件代码:
    procedure TFormcxLookupCombox.cxGridDBTableView1VENDOR_IDPropertiesCloseUp(Sender: TObject);
    begin
      (Sender as TcxExtLookupComboBox).Properties.View.DataController.Filter.Clear;

    end;

    如果不是在cxGrid的列中编辑数据,则可以用TcxDBExtLookupComboBox控件实现,方法与上述雷同!

     

  • 相关阅读:
    TSQL常用查询语句
    团队开发注意事项
    SQLServer2005 XML数据类型操作
    Nunit学习笔记
    服务器架构工具表
    JQuery 做的下拉文本框
    面向对象和结构化程序设计的区别
    AFX_MSG是什么意思
    DECLARE_MESSAGE_MAP()
    AfxBeginThread的介绍/基本用法
  • 原文地址:https://www.cnblogs.com/yclizq/p/11443150.html
Copyright © 2011-2022 走看看