如何修改Delphi FireMonkey中TListView的滑动删除按钮文本？

当然可以修改这个滑动删除按钮的文本！FireMonkey的TListView默认把这个按钮文本设为了"Delete"，但我们有两种简单的方式来改成你想要的内容，下面给你详细说明：

这种方法适合静态修改文本，一次设置完所有列表项的删除按钮都生效：

• 选中你的TListView控件，在Object Inspector里找到StyleBook属性，要么绑定一个已有的StyleBook，要么直接新建一个。
• 双击StyleBook进入样式编辑界面，找到ListView对应的样式节点，展开后定位到SwipeDeleteButton（就是那个滑动时显示的删除按钮控件）。
• 选中这个按钮，在右侧属性面板里把Text改成你需要的内容，比如“删除”或者其他自定义文字。
• 保存样式后回到Form，运行程序滑动列表项，就能看到修改后的按钮文本啦。

如果需要在运行时根据不同场景切换按钮文本，就适合用这种方式：
你可以在Form的OnCreate事件里添加代码，或者在ListView的OnItemAppearanceNeeded事件里处理，示例代码如下：

procedure TMainForm.FormCreate(Sender: TObject);
var
  SwipeDeleteBtn: TButton;
begin
  // 查找ListView中的滑动删除按钮
  SwipeDeleteBtn := TButton(ListView1.FindStyleResource('SwipeDeleteButton'));
  if Assigned(SwipeDeleteBtn) then
  begin
    SwipeDeleteBtn.Text := '移除'; // 替换成你想要的自定义文本
  end;
end;

• 小提醒：如果你的ListView用了自定义的ItemAppearance，要确认FindStyleResource的参数和样式里的按钮名称一致，不然会找不到控件。
• 这种方法在Android和iOS平台都能正常工作，不需要额外写平台特定代码。

额外小提示 #

如果在样式编辑器里找不到SwipeDeleteButton，可以尝试搜索"Delete"相关的控件，不同Delphi版本的样式命名可能略有差异，但核心都是滑动触发的那个按钮控件。

内容的提问来源于stack exchange，提问作者Zayn Barcktu