如何在 FM2 中更改 StringGrid 的字体大小答案

【问题标题】：How to change font size at StringGrid in FM2如何在 FM2 中更改 StringGrid 的字体大小
【发布时间】：2017-09-17 18:16:05
【问题描述】：

如何在 rad studio XE3 中更改 StringGrid 中的字体大小 - FM2 Firemonkey 2 而不是 firemonkey 1

【问题讨论】：

【解决方案1】：

我搜索了互联网，似乎没有办法将文本调整为 StringGrid。

您可以使用 FindStyleResource('header') 调整标题大小：

但不清楚使用什么（如果有）代替“header”，以便您可以更改行中的文本。 Delphi 帮助文件根本没有用，因为我找不到可以在 FindStyleResource 函数中使用的所有可用参数。

至于下面的答案：

StringGrid1。Cells[X,Y] 没有 StyleLookup 属性。

另外，有人建议使用 OnDrawCell 程序，但看起来 StringGrid 又缺少这个（至少在 Delphi XE3 Firemonkey ）。

【讨论】：

【解决方案2】：

StringGrid1.StyledSettings.Size := False;
StringGrid1.TextSettings.Font.Size := 18;

这在 FireMonkey XE6 上运行良好，但是您报告的关于 theader 的脚本在 XE6 上不起作用

【讨论】：

【解决方案3】：

他们似乎仍然没有让这件事变得容易。

单元格基本上是 TEdits，因此它们使用 EditStyle 进行样式设置。但是如果你改变它，你会改变所有的 TEdits。不是你想要的。

理想情况下会有一个“CellStyleLookup”属性。设置好，修改样式，然后就可以了。但是没有。

【讨论】：

你有什么问题？（我添加了一个应该存在的覆盖指令，并且可能导致您的问题）。
procedure TFontStringGrid.CreateCellControl: TStyledControl;(它必须是函数而不是 procudere) - 结果未定义 - 我应该在哪里写这段代码
是的，抱歉，它必须是一个函数。您需要创建一个 TStringGrid 的子组件，如答案所示。如果要在设计器中使用，可以按照标准方式在组件面板上注册。
你在 xe 3 中检查过你的代码吗？你能把你的代码写在这里吗
请发送示例文件以更改 radstudio xe 3- FM2 中的 stringgrid 字体大小