Image.st
changeset 649 38e6d0015137
parent 622 565e2301c064
child 650 14fc51fc3a4e
--- a/Image.st	Mon May 06 23:33:10 1996 +0200
+++ b/Image.st	Tue May 07 19:25:07 1996 +0200
@@ -163,6 +163,52 @@
     [author:]
         Claus Gittinger
 "
+!
+
+examples
+"
+    reading from a file (many formats are supported):
+                                                                        [exBegin]
+        (Image fromFile:'bitmaps/claus.gif') inspect
+                                                                        [exEnd]
+                                                                        [exBegin]
+        (Image fromFile:'bitmaps/SmalltalkX.xbm') inspect
+                                                                        [exEnd]
+                                                                        [exBegin]
+        (Image fromFile:'bitmaps/okSmily_up.bmp') inspect
+                                                                        [exEnd]
+
+    storing (only a few formats are currently supported):
+                                                                        [exBegin]
+        |img|
+
+        img := Image fromFile:'bitmaps/okSmily_up.bmp'.
+        img saveOn:'myImage.tiff'.
+        (Image fromFile:'myImage.tiff') inspect
+                                                                        [exEnd]
+    magnifying (any factor):
+                                                                        [exBegin]
+        ((Image fromFile:'bitmaps/claus.gif') 
+            magnifiedTo:(48@48))
+                inspect
+                                                                        [exEnd]
+                                                                        [exBegin]
+        ((Image fromFile:'bitmaps/claus.gif') 
+            magnifiedBy:0.7)
+                inspect
+                                                                        [exEnd]
+    rotating (currently, only multiples of 90 degrees are supported):
+                                                                        [exBegin]
+        ((Image fromFile:'bitmaps/claus.gif') 
+            rotated:90)
+                inspect
+                                                                        [exEnd]
+                                                                        [exBegin]
+        (((Image fromFile:'bitmaps/claus.gif') 
+            magnifiedBy:0.3@0.7) rotated:270)
+                inspect
+                                                                        [exEnd]
+"
 ! !
 
 !Image class methodsFor:'initialization'!
@@ -3524,5 +3570,5 @@
 !Image class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.65 1996-04-29 08:44:47 cg Exp $'! !
+    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.66 1996-05-07 17:25:07 cg Exp $'! !
 Image initialize!