Delphi 10 Seattle TabControl Style 像 Windows 中的 android

Question

我在 Windows 8.1 的 Delphi 10 Seattle 上使用 TabControl。

Windows 风格：

Android 风格：

如何获取 Windows 中 TabControl 的 Android 样式？

Answer 1

1. 打开样式设计器（将样书添加到表单并双击）。
2. 加载您想要使用的移动样式（如果您想要上面的外观和感觉，您必须使用 AndroidLLight.fsf）。位于公共样式文件夹中。它以 *.fsf 结尾
3. 将其保存到您喜欢的位置。 （现在是文件扩展名 *.style）
4. 在文本编辑器中打开样式。
5. 搜索对象 TStyleDescription 并删除整个部分。
6. 在您的项目文件 (*.dpr) 中添加单元 FMX.Style 并在第一行代码 TStyleManager.SetStyleFromFile()。