android - 德尔福 XE5 安卓。ListView 设置 SearchString？

Question

我需要在 Delphi FM.Android TListView 中设置搜索字符串。当我设置 ListView.SearchVisible = true 时显示此框。但是没有像“SerchString”这样的属性。我怎样才能重新使用它或在代码中设置它？可能吗？如果没有，可能是其他方式来过滤ListView吗？

Answer 1

如果我理解你的问题，

它是自动工作的，只需在列表框中添加一些项目并尝试搜索框，它将在项目的 itemtext 上工作，并仅显示您在搜索框中输入的过滤字符串的项目。

Answer 2

function FindSearchBox(const ARootControl: TControl): TSearchBox;
var
  Child: TControl;
begin
  Result := nil;
  for Child in ARootControl.Controls do
    if Child is TSearchBox then
      Exit(TSearchBox(Child));
end;


procedure TFormAdd.SpeedButton1Click(Sender: TObject);
var
  SearchBox: TSearchBox;
begin
  SearchBox:=FindSearchBox(FormMain.ListView1);
  if SearchBox <> nil then
  begin
    SearchBox.Text:=''; // set text here
  end;
end;