--- oup/current/DataAccess/DataAccess.pas 2007/02/21 03:12:33 109 +++ oup/current/DataAccess/DataAccess.pas 2007/02/26 22:57:02 116 @@ -43,6 +43,8 @@ type procedure UpdateDatFilePart(FileID, Offset, Size: Integer; Src: TStream); overload; virtual; abstract; procedure UpdateDatFilePart(FileID, Offset, Size: Integer; Src: Pointer); overload; + function GetDatLinks(FileID: Integer): TDatLinkList; virtual; abstract; + function GetDatLink(FileID, DatOffset: Integer): TDatLink; virtual; abstract; function GetRawList(FileID: Integer): TRawDataList; virtual; abstract; function GetRawInfo(FileID, DatOffset: Integer): TRawDataInfo; virtual; abstract; @@ -271,7 +273,7 @@ begin data := TMemoryStream.Create; data.Write(Src[0], Length(Src)); data.Seek(0, soFromBeginning); - AppendRawFile(LocSep, data); + Result := AppendRawFile(LocSep, data); data.Free; end; @@ -282,7 +284,7 @@ begin data := TMemoryStream.Create; data.Write(Src^, Size); data.Seek(0, soFromBeginning); - AppendRawFile(LocSep, data); + Result := AppendRawFile(LocSep, data); data.Free; end;