Delphi移动端运行时创建TListItemTextButton不显示问题排查

你的代码里按钮不显示，核心问题出在FireMonkey ListView的虚拟化机制和Item布局逻辑上，我帮你拆解几个关键原因：

1. 控件没有正确挂载到Item的Content容器 #

你创建TListItemTextButton时把Item作为Owner，但没有明确设置它的Parent为Item.Content——这是FireMonkey控件显示的必要条件，没有Parent的控件不会被渲染到可视树里。

2. 缺少布局约束，按钮位置/尺寸未生效 #

即使设置了Width，没有给按钮添加布局约束（比如对齐方式、边距），ListView的虚拟化布局系统可能无法正确计算按钮的位置，导致它被挤出可视区域或者尺寸为0。

3. Item.Purpose设置错误 #

你把Item.Purpose设为TListItemPurpose.None，这会让Item使用无模板的空布局，没有预设的容器结构来承载自定义控件。应该设置为TListItemPurpose.Custom，告诉ListView这是一个自定义布局的Item。

4. 未触发ListView刷新 #

动态修改Item内容后，需要手动触发ListView的刷新，让它重新渲染Item的布局和控件状态。

修正后的代码示例 #

var
  MyListView: TListView;
  Item: TListViewItem;
  LinkButton: TListItemTextButton;
begin
  Item := MyListView.Items.Add;
  // 关键：设置为Custom Purpose
  Item.Purpose := TListItemPurpose.Custom;
  
  if Item.Objects.FindObject('MyButton') = nil then
  begin
    LinkButton := TListItemTextButton.Create(Item);
    // 核心：绑定到Item的Content容器
    LinkButton.Parent := Item.Content;
    LinkButton.Text := 'MyText';
    LinkButton.Width := 300;
    LinkButton.Name := 'MyButton';
    LinkButton.Visible := True;
    LinkButton.OnSelect := MyLinkClickProc;
    
    // 添加布局约束，确保按钮在Item内可见
    LinkButton.Align := TAlignLayout.Center; // 或者根据需求设置Left/Top等
    LinkButton.Margins.Left := 10;
    LinkButton.Margins.Right := 10;
    
    Item.Objects.Add(LinkButton);
  end;
  
  // 触发Item刷新
  Item.Refresh;
  // 或者全局刷新ListView（如果批量修改的话）
  // MyListView.UpdateItems(Item.Index, Item.Index);
end;

关于设计时隐藏再显示无效的补充 #

设计时添加的按钮属于ListView的Item模板，而ListView的虚拟化机制会复用Item对象。直接通过FindObjectT修改Visible状态，可能因为Item被回收复用后状态丢失，或者模板的控件没有正确关联到运行时的Item实例。正确的做法是通过绑定字段或者在Item的OnUpdateObjects事件里动态控制控件状态，而不是直接修改单个Item的控件。

比如在ListView的OnUpdateObjects事件里处理：

procedure TForm1.MyListViewUpdateObjects(const Sender: TObject;
  const AItem: TListViewItem);
var
  LinkButton: TListItemTextButton;
begin
  LinkButton := AItem.Objects.FindObjectT<TListItemTextButton>('MyButton');
  if Assigned(LinkButton) then
  begin
    // 根据你的条件设置Visible
    LinkButton.Visible := (你的条件);
  end;
end;

这样每次Item被复用渲染时，都会重新设置控件状态，避免虚拟化导致的状态丢失问题。

内容的提问来源于stack exchange，提问作者Mi.Ko