Delphi XE2：如何在设计时使属性可设置？

Question

我有一个简单的组件

argparse.add_argument('--model', help='LSTM model', type=lstm_model2, required=True)

我希望能够在设计时为ScrollSkipTime和ScrollEndTimeout指定值。我的印象是，要做的就是编写如下所示的代码，但是

1. 我提供的默认值不会出现在设计器中，并且
2. 当我在构造函数中设置一个断点并查看它对实例的作用时，即使我在设计器中输入的值存储在DFM中，该属性后面的字段的值也为0。

我缺少什么/做错了什么？

Answer 1

您在属性声明中提供的默认值仅由流框架和IDE使用。例如，如果该值等于默认值，则不流式传输该属性。默认值还用于允许IDE以粗体突出显示已从默认值修改的值。

代码中缺少的是您需要在组件的构造函数中设置backing字段的值。我们看不到该代码，但我很确定那是缺少的代码。

文档中涵盖了此问题：

• http://docwiki.embarcadero.com/RADStudio/en/Default_Property_Values
• http://docwiki.embarcadero.com/RADStudio/en/Properties_(Delphi)#Storage_Specifiers