Delphi 11 FMX项目如何可视化添加TSearchBox组件？

方法一：手动加载组件包到组件面板 #

• 打开Delphi，右键组件面板空白处选择**"Install Packages..."**
• 在弹出的对话框里，找到并勾选FireMonkey Components包（通常是FMXComponents.bpl），确认TSearchBox所属包已加载
• 若找不到该包，点击**"Add..."**，定位到Delphi安装目录的bin文件夹，选择FMXComponents.bpl完成安装
• 重启Delphi后，TSearchBox会出现在组件面板的**"Standard"或"Search"**分类下

方法二：将TEdit转换为TSearchBox #

• 在窗体上放置一个TEdit控件，切换到代码视图，把控件声明从TEdit改成TSearchBox：

  // 原声明
  Edit1: TEdit;
  // 修改后
  Edit1: TSearchBox;
  

• 返回设计视图，控件会自动转为TSearchBox，此时可在属性面板直接设置StyleLookup为目标样式（比如searchboxstyle）
• 若样式未显示，右键控件选择**"Apply Style..."**，在样式管理器里手动选中WedgewoodLight的搜索框样式

方法三：通过DFM代码导入组件 #

• 打开控件示例项目，找到含TSearchBox的窗体，右键控件选择**"View as Text"**
• 复制该控件的DFM代码片段，示例如下：

  object SearchBox1: TSearchBox
    Position.X = 16.000000000000000000
    Position.Y = 16.000000000000000000
    Size.Width = 250.000000000000000000
    Size.Height = 40.000000000000000000
    StyleLookup = 'searchboxstyle'
  end
  

• 切换到自己项目的窗体文本视图（右键窗体选"View as Text"），把复制的代码粘贴到合适位置，再切回设计视图，TSearchBox就会显示在窗体上

额外注意事项 #

• 确保项目已引用FMX.SearchBox单元，若未引用，在代码的uses段手动添加：

  uses FMX.SearchBox;
  

• 若WedgewoodLight样式未生效，进入**"Project" -> "Options" -> "Application" -> "Appearance"**，重新选择并应用该样式

内容的提问来源于stack exchange，提问作者David U