View Issue Details

IDProjectCategoryView StatusLast Update
0004016JEDI VCL00 JVCL Componentspublic2007-06-19 08:27
ReporterTraptakAssigned Tojfudickar 
PrioritynormalSeverityminorReproducibilityalways
Status resolvedResolutionfixed 
Product VersionDaily / GIT 
Target VersionFixed in Version3.31 
Summary0004016: Problem with loading docked forms using TJvAppDBStorage component
DescriptionI have problem with loading saved docked form using TJvAppDBStorage. Calling LoadDockTreeFromAppStorage just don't works.
Additional InformationI have solve this problem changing TJvCustomAppDBStorage.PathExistsInt.
I think it should looks like:
function TJvCustomAppDBStorage.PathExistsInt(const Path: string): Boolean;
begin
  { TODO -oJVCL -cTESTING : Is this correct implementation? }
  Result := SectionExists(StrEnsureNoPrefix('\', Path), True);
end;
Without StrEnsureNoPrefix function PathExistsInt always return False.
TagsNo tags attached.

Activities

2006-12-11 16:15

 

JvAppDBStorage.patch (708 bytes)
Index: JvAppDBStorage.pas
===================================================================
--- JvAppDBStorage.pas	(revision 11076)
+++ JvAppDBStorage.pas	(working copy)
@@ -138,7 +138,7 @@
 implementation
 
 uses
-  JclMime,
+  JclMime, JclStrings,
   JvJCLUtils, JvResources;
 
 constructor TJvCustomAppDBStorage.Create(AOwner: TComponent);
@@ -325,7 +325,7 @@
 function TJvCustomAppDBStorage.PathExistsInt(const Path: string): Boolean;
 begin
   { TODO -oJVCL -cTESTING : Is this correct implementation? }
-  Result := SectionExists(Path, True);
+  Result := SectionExists(StrEnsureNoPrefix('\', Path), True);
 end;
 
 function TJvCustomAppDBStorage.ReadValue(const Section, Key: string): string;
JvAppDBStorage.patch (708 bytes)

jfudickar

2007-03-02 15:57

developer   ~0011269

Changed in SVN. Please have a look for it.

obones

2007-06-19 08:26

administrator   ~0013459

No news, this is assumed to be fixed.

Issue History

Date Modified Username Field Change
2006-12-11 16:15 Traptak New Issue
2006-12-11 16:15 Traptak File Added: JvAppDBStorage.patch
2007-03-02 15:55 jfudickar Status new => assigned
2007-03-02 15:55 jfudickar Assigned To => jfudickar
2007-03-02 15:57 jfudickar Note Added: 0011269
2007-03-02 15:57 jfudickar Status assigned => feedback
2007-06-19 08:26 obones Status feedback => resolved
2007-06-19 08:26 obones Fixed in Version => 3.31
2007-06-19 08:26 obones Resolution open => fixed
2007-06-19 08:26 obones Note Added: 0013459