--- oup/rewrite/Global/RawList.pas 2007/02/20 20:43:29 101 +++ oup/current/Global/RawList.pas 2007/02/25 17:20:22 113 @@ -1,7 +1,5 @@ unit RawList; - interface - uses TypeDefs; type @@ -17,6 +15,7 @@ type private FRawListHandlers: TRawListHandlers; public + property RawListHandlers: TRawListHandlers read FRawListHandlers; procedure InsertRawListHandler(ext: String; needed: Boolean; handler: THandler); function GetRawList(ConnectionID, FileID: Integer): TRawDataList; function GetRawInfo(ConnectionID, FileID, DatOffset: Integer): TRawDataInfo; @@ -141,8 +140,6 @@ function SUBT(ConnectionID, FileID: Inte var baselink, lastlink: Integer; links: Integer; - j, k: Integer; -// Data: TByteData; Data: TStream; begin ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $18, 4, @baselink);