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

Question

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

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

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

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

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

但是从上面的截图中可以看到，StoredValue的Value Type被明确定义为Integer类型!

那么我如何为这个StoredValue分配一个Integer值？

Answer 1

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

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