(18)Lazarus学习ListViewFilterEdit1过滤ListView1数据

参考自带Demo例子：C:\lazarus\examples\filteredits

也可 以参考我写的 过滤 例子，带历史记忆，并模糊带出功能的Edit

链接：https://pan.baidu.com/s/1Q7v5EWNBJIF37aKePAvaHA
提取码：cjyv

放一个ListView1和ListViewFilterEdit1

procedure TListViewFilterForm.AddLVItem(St1, St2 : string);
var
    ListItem: TListViewDataItem;
begin
    ListItem.Data := Nil;
    SetLength(ListItem.StringArray, 2);
    ListItem.StringArray[0] := St1;
    ListItem.StringArray[1] := St2;
    {%H-}ListViewFilterEdit1.Items.Add(ListItem);
end;

//给ListView1添加数据

procedure TListViewFilterForm.FormCreate(Sender: TObject);
begin
    AddLVItem('String1',  'String2');
    AddLVItem('String3',  'String4');
    AddLVItem('A String', 'another String');
    AddLVItem('x string', 'Extra String');
    ListViewFilterEdit1.ResetFilter;
end;   

 

 可以设置是不是大小写 敏感 

从头匹配等

 是不是 对 所有 列 过滤

 关于ListView1的相关设置：

 

 获得选中数据