ViewVC Help

View File | Revision Log | View Changeset | Root Listing

root/Oni2/oup/current/FileClasses/_EmptyFile.pas

Comparing oup/current/FileClasses/_EmptyFile.pas (file contents):
Revision 214 by alloc, Tue Jun 12 17:35:56 2007 UTC vs.
Revision 215 by alloc, Tue Jun 12 20:31:54 2007 UTC

#	Line 7 | Line 7 | uses
7
8		type
9		TFile_Empty = class(TFile)
10	–	protected
11	–	procedure InitDatLinks; override;
12	–	procedure InitRawList; override;
10		public
11		procedure InitDataFields; override;
12		end;
#	Line 26 | Line 23 | begin
23		end;
24
25
29	–	procedure TFile_Empty.InitDatLinks;
30	–	begin
31	–	SetLength(FDatLinks, 0);
32	–	end;
33	–
34	–
35	–	procedure TFile_Empty.InitRawList;
36	–	begin
37	–	SetLength(FRawParts, 0);
38	–	end;
39	–
26		end.
27

Diff Legend

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