--- oup/current/DataAccess/Access_OniArchive.pas	2007/05/02 13:19:40	173
+++ oup/current/DataAccess/Access_OniArchive.pas	2007/05/24 17:48:18	192
@@ -52,7 +52,7 @@ type
 implementation
 
 uses
-  SysUtils, StrUtils, Data, Functions, RawList, DatLinks;
+  SysUtils, StrUtils, Data, Functions, RawList, DatLinks, Math;
 
 
 (*
@@ -559,7 +559,7 @@ begin
         Fraw_file := TFileStream.Create(AnsiReplaceStr(FFileName, '.dat', '.raw'),
           fmOpenReadWrite);
       Fraw_file.Seek(raw_info.RawAddr, soFromBeginning);
-      Fraw_file.CopyFrom(Src, raw_info.RawSize);
+      Fraw_file.CopyFrom(Src, Min(raw_info.RawSize, Src.Size));
       if UnloadWhenUnused then
       begin
         FRawOpened := False;