--- oup/current/Global/OniImgClass.pas 2007/03/23 03:07:58 124 +++ oup/current/Global/OniImgClass.pas 2007/03/23 17:14:40 127 @@ -617,6 +617,14 @@ begin y := y div 2; 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; end;