Delphi 修改源码,用cxgrid的FindPanel做数据表的过滤,并在本地保存过滤方案
效果图:
1、把4个文件放在程序目录下
2、调用(过滤方案文件 *.flt 保存在程序目录下的 flt/文件夹名称 里面)
//cxGrid 加载 flt 过滤文件
gtvICMO.Filtering.LoadFilterFile('E:\未命名.flt');
//调用过滤方案界面,过滤方案存本地文件夹
gtvICMO.Filtering.RunCustomizeDialogEx(nil,'文件夹名称');
//调用过滤方案界面,过滤方案存本地文件夹,数据表直接调用FindPanel过滤条件(数据表使用RO 的 TDAMemDataTable,使用其他数据表要自行修改)
先打开数据表,再调用过滤窗口,不然cxgrid的filter获取不到字段名,会报错。
数据表.activity:=true;
gtvICMO.Filtering.RunCustomizeDialogExTb(nil,'文件夹名称',数据表);
附下载链接:
https://download.csdn.net/download/qq_17820893/20452946