Changeset 233 for oup/current/FileClasses/TXPC.pas

Timestamp:

Jun 29, 2007, 2:38:24 PM (17 years ago)

Author:

alloc

Message:

 

File:

• oup/current/FileClasses/TXPC.pas (modified) (1 diff)

oup/current/FileClasses/TXPC.pas

@@ -28 +28 @@
     AddField(TLevelID, $04, 'LevelID', '', nil);
   end;
+  FFileStream.Free;
+  FFileStream := nil;
 end;
 
 
 end.
-