delphi – 创建与VCL和FMX兼容的新组件

我正在做一些组件,我想为VCL和FMX做兼容.所以我有一个遵循这种模式的结构：

General_dpk(使用TCustomMyClass)VCL_dpk(使用TMyClass)FMX_dpk(使用TMyClassFMX)

每个包都有注册程序,注册其组件.在组件面板中出现两个组件(VCL和FMX).如何做只出现根据所选项目类型(VCL或FMX)的组件,如其他Delphi组件？

谢谢

好吧,经过长时间的搜索,我在Embarcadero论坛上提出过要求.在那里,雷米亲切地告诉我答案(当你知道它时很容易).问题是您需要将GroupDescendentsWith函数调用到这样的注册过程中

// para componentes VCL
GroupDescendentsWith(TMyClass, Vcl.Controls.TControl);

// para componentes FMX
GroupDescendentsWith(TMyClassFMX, Fmx.Types.TControl);

关于Embarcadero论坛here的答案