如何解决为什么我的 .dfm 文件中会出现 Text = '' ?空字符串,作为默认值,不应该被存储
这种令人惊讶的行为的原因是什么,这似乎是在我将 Delphi 从 XE2 升级到 10.4.2 之后开始的,即将空字符串属性值存储到 .DFM 文件中?
这发生在从 TWinControl 派生的两个组件中名为 Text 的字符串属性(一个直接,另一个通过 TCustomEdit)。可能是因为 TWinControl 派生自 TControl,它也有一个名为 Text 的属性,但类型是 TCaption 而不是字符串类型?这在 XE2 中是一样的,但也许“隐藏其他属性的属性”在 10.4 中的处理方式与当时相比有所不同?
我可以通过添加一个 stored 指令 + 一个函数来解决我的 .DFM 文件中不必要的 Text = ''
的问题——但我认为我真的不应该这样做,对吗?
property Text: string read GetText write SetText stored IsTextStored;
function TMyComponent.IsTextStored: Boolean;
begin
Result := Text <> '';
end;
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。