GraphicsContext.st
branchjv
changeset 7723 620e91f9b082
parent 7722 1387e5aedc55
parent 7703 ed5256740f66
child 7855 46203abe7d57
equal deleted inserted replaced
7722:1387e5aedc55 7723:620e91f9b082
   980 	self paint:fgColor.
   980 	self paint:fgColor.
   981     ].
   981     ].
   982     bgPaint := bgColor
   982     bgPaint := bgColor
   983 
   983 
   984     "Modified: 12.5.1996 / 19:40:43 / cg"
   984     "Modified: 12.5.1996 / 19:40:43 / cg"
       
   985 !
       
   986 
       
   987 setDevice:aDevice
       
   988     device := aDevice
   985 !
   989 !
   986 
   990 
   987 viewOrigin
   991 viewOrigin
   988     "return the drawables visible origin (for scrolling)"
   992     "return the drawables visible origin (for scrolling)"
   989 
   993