From: <el...@us...> - 2006-06-28 19:29:18
|
Revision: 10757 Author: elahn Date: 2006-06-28 12:29:08 -0700 (Wed, 28 Jun 2006) ViewCVS: http://svn.sourceforge.net/jvcl/?rev=10757&view=rev Log Message: ----------- Mantis #3348: AV when same object is referenced twice. Modified Paths: -------------- trunk/jvcl/run/JvInspector.pas Modified: trunk/jvcl/run/JvInspector.pas =================================================================== --- trunk/jvcl/run/JvInspector.pas 2006-06-28 19:08:15 UTC (rev 10756) +++ trunk/jvcl/run/JvInspector.pas 2006-06-28 19:29:08 UTC (rev 10757) @@ -11281,9 +11281,10 @@ procedure TJvInspectorPropData.NotifyRemoveData(const Instance: TJvCustomInspectorData); begin - if (Instance <> nil) and (Instance <> Self) and (Instance.TypeInfo.Kind = tkClass) and - (TObject(Instance.AsOrdinal) = Self.Instance) then - Free; +// The following is commented out due to Mantis #3348: +// if (Instance <> nil) and (Instance <> Self) and (Instance.TypeInfo.Kind = tkClass) and +// (TObject(Instance.AsOrdinal) = Self.Instance) then +// Free; end; procedure TJvInspectorPropData.SetAsFloat(const Value: Extended); This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |