ViewVC Help

View File | Revision Log | View Changeset | Root Listing

root/Oni2/oup/current/DataAccess/DataAccess.pas

Comparing oup/current/DataAccess/DataAccess.pas (file contents):
Revision 112 by alloc, Wed Feb 21 03:12:33 2007 UTC vs.
Revision 113 by alloc, Sun Feb 25 17:20:22 2007 UTC

#	Line 43 | Line 43 | type
43		procedure UpdateDatFilePart(FileID, Offset, Size: Integer; Src: TStream); overload; virtual; abstract;
44		procedure UpdateDatFilePart(FileID, Offset, Size: Integer; Src: Pointer); overload;
45
46	+	function GetDatLinks(FileID: Integer): TDatLinkList; virtual; abstract;
47		function GetRawList(FileID: Integer): TRawDataList; virtual; abstract;
48		function GetRawInfo(FileID, DatOffset: Integer): TRawDataInfo; virtual; abstract;
49
#	Line 271 | Line 272 | begin
272		data := TMemoryStream.Create;
273		data.Write(Src[0], Length(Src));
274		data.Seek(0, soFromBeginning);
275	<	AppendRawFile(LocSep, data);
275	>	Result := AppendRawFile(LocSep, data);
276		data.Free;
277		end;
278
#	Line 282 | Line 283 | begin
283		data := TMemoryStream.Create;
284		data.Write(Src^, Size);
285		data.Seek(0, soFromBeginning);
286	<	AppendRawFile(LocSep, data);
286	>	Result := AppendRawFile(LocSep, data);
287		data.Free;
288		end;
289

Diff Legend

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