Index: oup/current/Global/OniImgClass.pas
===================================================================
--- oup/current/Global/OniImgClass.pas	(revision 124)
+++ oup/current/Global/OniImgClass.pas	(revision 127)
@@ -618,4 +618,12 @@
       size := size + (x * y * bpp) div 8;
     until (x = minside) or (y = minside);
+    if FStoreType = 9 then
+    begin
+      repeat
+        x    := x div 2;
+        y    := y div 2;
+        size := size + (x * y * 16) div 8;
+      until (x = 1) or (y = 1);
+    end;
   end;
   Result := size;
Index: oup/current/Global/RawList.pas
===================================================================
--- oup/current/Global/RawList.pas	(revision 124)
+++ oup/current/Global/RawList.pas	(revision 127)
@@ -345,4 +345,12 @@
       datasize := datasize + (x * y * bpp) div 8;
     until (x = minside) or (y = minside);
+    if storetype = 9 then
+    begin
+      repeat
+        x    := x div 2;
+        y    := y div 2;
+        datasize := datasize + (x * y * 16) div 8;
+      until (x = 1) or (y = 1);
+    end;
   end;