UIPainter.st
changeset 952 c6408190dc6d
parent 950 3e227dc788be
child 964 476235fbb312
equal deleted inserted replaced
951:457d94e33e93 952:c6408190dc6d
  2234     self valueOfCanPasteWithKeepingLayout value: (canPaste "&  self canKeepLayoutInSelection").
  2234     self valueOfCanPasteWithKeepingLayout value: (canPaste "&  self canKeepLayoutInSelection").
  2235 
  2235 
  2236     "Modified: / 16.7.1998 / 19:13:30 / cg"
  2236     "Modified: / 16.7.1998 / 19:13:30 / cg"
  2237 ! !
  2237 ! !
  2238 
  2238 
       
  2239 !UIPainter methodsFor:'defaults'!
       
  2240 
       
  2241 aboutImage
       
  2242     "the image to be displayed in my about-box;
       
  2243      If nil is returned, thhe ST/X default image is used."
       
  2244 
       
  2245     ^ Image fromFile:'bitmaps/xpmBitmaps/misc_tools/setup_windows.xpm'
       
  2246 
       
  2247     "Created: / 13.8.1998 / 20:33:05 / cg"
       
  2248 ! !
       
  2249 
  2239 !UIPainter methodsFor:'event handling'!
  2250 !UIPainter methodsFor:'event handling'!
  2240 
  2251 
  2241 doesNotUnderstand:aMessage
  2252 doesNotUnderstand:aMessage
  2242     "if does not understand incoming messages, detour them to painter"
  2253     "if does not understand incoming messages, detour them to painter"
  2243 
  2254