--- oup/current/DataAccess/DataAccess.pas 2007/02/21 03:12:33 109 +++ oup/current/DataAccess/DataAccess.pas 2007/02/25 17:20:22 113 @@ -43,6 +43,7 @@ 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 GetRawList(FileID: Integer): TRawDataList; virtual; abstract; function GetRawInfo(FileID, DatOffset: Integer): TRawDataInfo; virtual; abstract; @@ -271,7 +272,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 +283,7 @@ begin data := TMemoryStream.Create; data.Write(Src^, Size); data.Seek(0, soFromBeginning); - AppendRawFile(LocSep, data); + Result := AppendRawFile(LocSep, data); data.Free; end;