尝试在TJvFormStorage中存储Integer时，变量操作错误无效

Question

在Delphi 10.1.2的VCL应用程序中，我使用TJvFormStorage组件来持久存储和恢复数据。

因此，在设计时的 JvFormStorage1 中，我创建了一个 StoredValue 来保存Integer值：

然后在运行时，我尝试为此 StoredValue 分配Integer值：

JvFormStorage1.StoredValue['ToolbarLabelFontSize'].Value := 8;

这会导致无效的变种操作错误！

但是从上面的屏幕截图中可以看出， StoredValue 的值类型明确定义为Integer类型！

那么如何为此 StoredValue 分配Integer值？

Answer 1

StoredValue[]属性提供access to the variant values directly，因此设置其中一个值的正确方法是：

JvFormStorage1.StoredValue['ToolbarLabelFontSize'] := 8;