delphi - 尝试在 TJvFormStorage 中存储 Integer 时出现无效的变体操作错误

Question

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

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

然后在运行时，我尝试为此StoredValueInteger分配一个值：

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

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

但是从上面的截图可以看出，StoredValue 的Value Type是明确定义为type 的！Integer

那么如何Integer为这个StoredValue 赋值呢？

Answer 1

该StoredValue[]属性提供对变量值的直接访问，因此设置这些值之一的值的正确方法是：

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