Bladeren bron

Null wrapped stream on Delete.

woollybah 6 jaren geleden
bovenliggende
commit
d41f973433
1 gewijzigde bestanden met toevoegingen van 4 en 0 verwijderingen
  1. 4 0
      stream.mod/stream.bmx

+ 4 - 0
stream.mod/stream.bmx

@@ -563,6 +563,10 @@ Type TStreamWrapper Extends TStream
 		_stream.WriteObject obj
 		_stream.WriteObject obj
 	End Method
 	End Method
 	
 	
+	Method Delete()
+		_stream = Null
+	End Method
+
 End Type	
 End Type	
 
 
 Type TStreamStream Extends TStreamWrapper
 Type TStreamStream Extends TStreamWrapper