禁用TListViewItem

时间:2016-05-18 12:14:06

标签: delphi firemonkey delphi-xe8

有没有人知道是否可以在FireMonkey TListView中禁用单个项目?

1 个答案:

答案 0 :(得分:0)

因为我是以编程方式构建列表视图,所以当我的应用程序中发生某些事件时,该项目将不会包含在列表视图中,否则将包含该项目。

procedure Tform1.BuildListView;
var LItem : TListViewItem;
begin
  ListView1.BeginUpdate;
  try
    ListView1.ClearItems;

  if (SOMETHING HAPPENS) then
  begin
    LItem := ListView1.Items.Add;
    LItem.Text := 'Item 1';
    LItem.Tag := 0;
  end;

  LItem := ListView1.Items.Add;
  LItem.Text := 'Item 2';
  LItem.Tag := 1;

  LItem := ListView1.Items.Add;
  LItem.Text := 'Item 3';
  LItem.Tag := 2;

  LItem := ListView1.Items.Add;
  LItem.Text := 'Item 4';
  LItem.Tag := 3;

  finally
    ListView1.EndUpdate;
  end;
end;