这种令人惊讶的行为的原因是什么,这似乎是在我将 Delphi 从 XE2 升级到 10.4.2 之后开始的,即空字符串属性值存储到 .DFM 文件中?
空字符串应该是属性的内置自动默认值,即不存储。
这发生在从 TWinControl 派生的两个组件中名为 Text 的字符串属性(一个直接,另一个通过 TCustomEdit)。可能是因为 TWinControl 派生自 TControl,它也有一个名为 Text 的属性,但类型为 TCaption 而不是字符串类型?这在 XE2 中是相同的,但与当时相比,现在 10.4 中“隐藏其他属性的属性”的处理方式可能不同?
我可以通过添加一个存储Text = ''
的指令 + 一个函数来解决我的 .DFM 文件中不必要的问题——但我认为我真的不应该这样做,不是吗?
property Text: string read GetText write SetText stored IsTextStored;
function TMyComponent.IsTextStored: Boolean;
begin
Result := Text <> '';
end;