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

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

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



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

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

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

但是，如您从上面的屏幕快照中所见，StoredValue的值类型明确定义为Integer类型！

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

最佳答案

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

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