WindowsIconReader.st
changeset 430 50b841f4851d
parent 398 aef700d15416
child 445 899af8ff2a5d
--- a/WindowsIconReader.st	Fri Feb 14 21:34:49 1997 +0100
+++ b/WindowsIconReader.st	Mon Feb 17 11:10:50 1997 +0100
@@ -566,9 +566,12 @@
     width := header at:(6+1).
     height := header at:(7+1).
     nColor := header at:(8+1).
-    "10, 11, 12, 13, 14 ? (reserve)"
-    "15, 16, 17, 18       pixel array size"
-    "19, 20, 21, 22       offset        "
+    "/ reserved := header at:(9+1).
+    "/ nPlanes := header wordAt:(10+1).
+    "/ nBitsPerPel := header wordAt:(12+1).
+    "/ nBytesInResource := header doubleWordAt:(14+1).
+    "/ ordinal := header wordAt:(18+1).
+    "21, 22               ?"
     "23, ... , 62         ?"
 
     inDepth := header at:16r25.
@@ -639,12 +642,12 @@
      WindowsIconReader new fromWindowsICOFile:'/phys/clam2//LocalLibrary/Images/WIN_icons/ibm.ico'.
     "
 
-    "Modified: 7.6.1996 / 15:46:30 / cg"
+    "Modified: 15.2.1997 / 13:52:52 / cg"
 ! !
 
 !WindowsIconReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/WindowsIconReader.st,v 1.28 1997-02-01 14:07:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/WindowsIconReader.st,v 1.29 1997-02-17 10:10:50 cg Exp $'
 ! !
 WindowsIconReader initialize!