View Issue Details

IDProjectCategoryView StatusLast Update
0005249JEDI VCL00 JVCL Componentspublic2011-06-23 13:02
ReportervezAssigned Toobones 
PrioritynormalSeveritycrashReproducibilityalways
Status resolvedResolutionfixed 
Product VersionDaily / GIT 
Target VersionFixed in Version 
Summary0005249: JvPropertyStorage bug on CBuilder 6
DescriptionIf the TPropertyStorage is using for CB6 application, it produces AV on the application exit.
Additional InformationTo fix this bug I have to comments a part of the JvPropertyStorage.pas:
procedure TJvPropertyStorage.WriteProperty(const APath, AStorageName: string; const PersObj: TPersistent; const PropName: {$IFDEF RTL200_UP}ShortString{$ELSE}string{$ENDIF RTL200_UP});
begin
  if Assigned(AppStorage) then
    //if (PropType(PersObj, string(PropName)) = tkClass) and (GetObjectProp(PersObj, string(PropName)) is TComponent) then
    // AppStorage.WriteString(AppStorage.ConcatPaths([APath, AppStorage.TranslatePropertyName(PersObj, AStorageName, False)]), TComponent(GetObjectProp(PersObj, string(PropName))).Name)
    //else
      AppStorage.WriteProperty(AppStorage.ConcatPaths([APath, AppStorage.TranslatePropertyName(PersObj, AStorageName, False)]), PersObj, string(PropName), True);
end;
TagsNo tags attached.

Relationships

related to 0005261 resolvedobones Latest JVCL SVN, TJvFormStorage and AV 

Activities

jfudickar

2011-06-19 15:54

developer   ~0018781

Could you please test it with the last svn version?

Regards
Jens

vez

2011-06-23 12:52

reporter   ~0018803

It seems that the last svn version works well for CB6

jfudickar

2011-06-23 13:02

developer   ~0018804

Good to knw.

Thanks for informing us.

Regards
Jens

Issue History

Date Modified Username Field Change
2010-05-24 12:42 vez New Issue
2010-06-07 09:44 obones Assigned To => obones
2010-06-07 10:34 obones Status new => assigned
2010-06-09 10:06 obones Relationship added related to 0005261
2011-06-19 15:54 jfudickar Note Added: 0018781
2011-06-23 12:52 vez Note Added: 0018803
2011-06-23 13:02 jfudickar Note Added: 0018804
2011-06-23 13:02 jfudickar Status assigned => resolved
2011-06-23 13:02 jfudickar Resolution open => fixed