[Instantobjects-cvscommit] SF.net SVN: instantobjects: [627] trunk/Source/Core/InstantPresentation.pas

[<sr...@us...>]

Revision: 627
Author:   srmitch
Date:     2006-02-25 15:29:17 -0800 (Sat, 25 Feb 2006)
ViewCVS:  http://svn.sourceforge.net/instantobjects?rev=627&view=rev

Log Message:
-----------
Fix for bug:
[1437815] Exposer.RemoveObject messes up TDataSet data.

Modified Paths:
--------------
    trunk/Source/Core/InstantPresentation.pas
Modified: trunk/Source/Core/InstantPresentation.pas
===================================================================
--- trunk/Source/Core/InstantPresentation.pas	2006-02-25 00:10:30 UTC (rev 626)
+++ trunk/Source/Core/InstantPresentation.pas	2006-02-25 23:29:17 UTC (rev 627)
@@ -3799,6 +3799,7 @@
   Result := InternalRemoveObject(AObject);
   if Result <> -1 then
     Refresh;
+  FRemovedObject := nil;  
 end;
 
 procedure TInstantCustomExposer.Reset;