View Issue Details

IDProjectCategoryView StatusLast Update
0004979JEDI VCL00 JVCL Componentspublic2009-10-20 00:10
ReporterviniciusAssigned Tojfudickar 
PrioritynormalSeveritymajorReproducibilityalways
Status resolvedResolutionfixed 
Product Version3.38 
Target VersionFixed in Version 
Summary0004979: Problem restoring parameters.
DescriptionThe TJvFormStorage component doesn't restore the query parameters.
We solve the problem with the attached unit.

Please verify.
TagsNo tags attached.

Activities

2009-10-15 15:50

 

JvAppStorage.pas (132,660 bytes)

ZENsan

2009-10-16 11:26

reporter   ~0016774

Better to provide DIFF file and not such file where you formatted text. Obones will not accept this and will ask you for diff file in the best situation.. :)
It is at least immposible to find the changes really made with your file, because you changed indentation and so on..(or pressed ctrl+d in D2010 which do not works so good as DelForEx).

vinicius

2009-10-16 17:47

reporter   ~0016776

Attached the patch.

2009-10-16 17:47

 

JvAppStorage.patch (538 bytes)
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);
JvAppStorage.patch (538 bytes)

jfudickar

2009-10-20 00:10

developer   ~0016790

Changed in svn repository

Issue History

Date Modified Username Field Change
2009-10-15 15:50 vinicius New Issue
2009-10-15 15:50 vinicius File Added: JvAppStorage.pas
2009-10-16 11:26 ZENsan Note Added: 0016774
2009-10-16 17:47 vinicius Note Added: 0016776
2009-10-16 17:47 vinicius File Added: JvAppStorage.patch
2009-10-20 00:10 jfudickar Note Added: 0016790
2009-10-20 00:10 jfudickar Status new => resolved
2009-10-20 00:10 jfudickar Resolution open => fixed
2009-10-20 00:10 jfudickar Assigned To => jfudickar