如何在firemonkey中创建画笔资源答案

【问题标题】：how to create a brush resource in firemonkey如何在firemonkey中创建画笔资源
【发布时间】：2013-03-05 20:58:21
【问题描述】：

我是 firemonkey 新手，但从一年前开始使用 dxscene。在 dxscene 中，可以毫不费力地在资源对象中添加画笔资源（firemonkey 中的样式书）。但是 firemonkey 让我大吃一惊，embaracadero 的 docwiki 建议手动将其添加到我不知道如何的样式书中。

有人可以帮我在样式书中添加画笔资源以便查找它们吗？最好是一种涉及 GUI 的方式。

【问题讨论】：

标签： delphi firemonkey delphi-xe3

【解决方案1】：

样式书只能包含 TFMXObject 的后代，而 TBrush 直接来自 TPersistent，因此无法添加。 FMX.types 单元包含一个合适的 TBrushObject，但它似乎没有在任何地方注册，因此它在工具面板中不可用。

我建议创建一个注册它的包，因此可以选择坐。您需要在包中添加一个单元，例如：

unit RegisterBrushObject;
interface
uses FMX.Types;

procedure Register;

implementation
uses Classes;

procedure Register;
begin
  RegisterComponents('Custom', [TBrushObject]);
end;

initialization
  RegisterFMXClasses([TBrushObject]);
end;

将其添加到包后，右键单击项目管理器中的包（右上角）并选择安装。

【讨论】：

非常感谢您的帮助。我知道 FMX 中有一个 TBrushObject，在源代码中找到了它，但由于我之前从未制作过包/组件，所以不知道注册的事情。
对新手解决方案的错误更正是在使用块中添加“类”单元以避免未声明的标识符编译器错误。