ViewVC Help
View File | Revision Log | View Changeset | Root Listing
root/Oni2/oup/current/FileClasses/TXMP.pas
(Generate patch)

Comparing oup/current/FileClasses/TXMP.pas (file contents):
Revision 232 by alloc, Thu Jun 28 09:24:08 2007 UTC vs.
Revision 233 by alloc, Fri Jun 29 12:38:24 2007 UTC

# Line 15 | Line 15 | type
15   implementation
16  
17   uses
18 <  ConnectionManager, Math, Classes, TypeDefs, _DataTypes, ExtCtrls, StdCtrls,
18 >  ConnectionManager, Math, Classes, TypeDefs, _DataTypes, ExtCtrls, StdCtrls,
19    Controls, Forms;
20  
21   { TFile_TXMP }
# Line 104 | Line 104 | begin
104      AddField(TUnused, $A4, 'Unused', '', @tempi);
105    end;
106    templist.Free;
107 +  FFileStream.Free;
108 +  FFileStream := nil;
109   end;
110  
111  
# Line 136 | Line 138 | begin
138   end;
139  
140   end.
139

Diff Legend

Removed lines
+ Added lines
< Changed lines (old)
> Changed lines (new)