View Issue Details

IDProjectCategoryView StatusLast Update
0002611JEDI VCL00 JVCL Componentspublic2005-02-21 13:50
ReporterwestphalAssigned Tojfudickar 
PrioritynormalSeveritymajorReproducibilityalways
Status resolvedResolutionfixed 
Product Version3.00 BETA 2 
Target VersionFixed in Version3.00 
Summary0002611: jvAppStorage do not reload saved stringlist in registry and perhaps the others
Descriptionfunction TJvCustomAppStorage.ReadStringList call the wrong function i think:


actually (line 1956 of JvAppStorage):
if not ValueStoredInt(Path) and StorageOptions.DefaultIfValueNotExists then

should be and is working:
if not ListStoredInt(Path) and StorageOptions.DefaultIfValueNotExists then
TagsNo tags attached.

Relationships

related to 0002612 resolvedjfudickar App Storage breaks again 

Activities

remkobonte

2005-02-12 18:07

developer   ~0006475

Another related issue:

var
  S: string;
  SS: TStringList;
begin
  with TJvAppXMLFileStorage.Create(nil) do
  try
    FileName := 'temp.xml';
    Path := '\path1';
    SS := TStringList.Create;
    try
      SS.Add('Item0');
      WriteStringList('path2', SS);
      SS.Clear;
      ReadStringList('path2', SS);
      ShowMessage(IntToStr(SS.Count));
      // Exp: SS.Count = 1
      // Act: SS.Count = 0
      S := ReadString('\path1\path2\Item0');
      ShowMessage(S);
      // Exp: S = 'Item0'
      // Act: S = '';
      S := ReadString('\path1\path1\path2\Item0');
      ShowMessage(S);
      // Exp: S = ''
      // Act: S = 'Item0';
    finally
      SS.Free;
    end;
  finally
    Free;
  end;
end;

jfudickar

2005-02-15 16:43

developer   ~0006499

Both problems fixed in CVS, please try it and give me feedback

remkobonte

2005-02-16 12:43

developer   ~0006508

Yup, works now. Thanks!

Issue History

Date Modified Username Field Change
2005-02-09 05:33 westphal New Issue
2005-02-09 08:59 jfudickar Relationship added related to 0002612
2005-02-09 09:00 jfudickar Status new => assigned
2005-02-09 09:00 jfudickar Assigned To => jfudickar
2005-02-12 18:07 remkobonte Note Added: 0006475
2005-02-15 16:43 jfudickar Note Added: 0006499
2005-02-15 16:43 jfudickar Status assigned => feedback
2005-02-16 12:43 remkobonte Note Added: 0006508
2005-02-21 13:50 jfudickar Status feedback => resolved
2005-02-21 13:50 jfudickar Fixed in Version => 3.00
2005-02-21 13:50 jfudickar Resolution open => fixed