Index: JvAppStorage.pas
===================================================================
--- JvAppStorage.pas	(revisão 12557)
+++ JvAppStorage.pas	(cópia de trabalho)
@@ -2617,7 +2617,7 @@
         SetOrdProp(PersObj, PropName, TmpValue);
       end;
     tkVariant:
-      SetStrProp(PersObj, PropName, ReadString(Path, GetVariantProp(PersObj, PropName)));
+      SetVariantProp(PersObj, PropName, ReadString(Path, GetVariantProp(PersObj, PropName)));
     tkSet:
       begin
         TmpValue := GetOrdProp(PersObj, PropName);