Button.st
changeset 4128 2fd581e2cf68
parent 4047 d6bc6e6fdc00
child 4173 63a4957ce918
equal deleted inserted replaced
4127:003405300276 4128:2fd581e2cf68
   727           b3 := Button label:'press for foo' in:panel.
   727           b3 := Button label:'press for foo' in:panel.
   728           b3 action:[ labelHolder value:'foo' ].
   728           b3 action:[ labelHolder value:'foo' ].
   729 
   729 
   730           top open.
   730           top open.
   731                                                                         [exEnd]
   731                                                                         [exEnd]
       
   732 
       
   733     the same, using a labelChannel:
       
   734                                                                         [exBegin]
       
   735           |b|
       
   736           b := Button new.
       
   737           b label:'hello'.
       
   738           b renderer:(ButtonRenderer new).
       
   739           b open.
       
   740                                                                         [exEnd]
       
   741 
   732 
   742 
   733     see 'doc/coding-examples' and 'doc/misc/quick_view_intro.doc' 
   743     see 'doc/coding-examples' and 'doc/misc/quick_view_intro.doc' 
   734     for more variations on this theme.
   744     for more variations on this theme.
   735 "
   745 "
   736 ! !
   746 ! !
  2262 
  2272 
  2263     "Modified: 1.4.1997 / 13:26:27 / cg"
  2273     "Modified: 1.4.1997 / 13:26:27 / cg"
  2264 !
  2274 !
  2265 
  2275 
  2266 redrawX:x y:y width:w height:h 
  2276 redrawX:x y:y width:w height:h 
  2267     self redraw.
  2277     self renderOrRedraw.
  2268 
  2278 
  2269     "Modified: 1.4.1997 / 13:26:31 / cg"
  2279     "Modified: 1.4.1997 / 13:26:31 / cg"
  2270 !
  2280 !
  2271 
  2281 
  2272 showActive
  2282 showActive
  2298 ! !
  2308 ! !
  2299 
  2309 
  2300 !Button class methodsFor:'documentation'!
  2310 !Button class methodsFor:'documentation'!
  2301 
  2311 
  2302 version
  2312 version
  2303     ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.148 2009-10-29 15:19:50 cg Exp $'
  2313     ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.149 2009-12-07 14:58:09 cg Exp $'
  2304 !
  2314 !
  2305 
  2315 
  2306 version_CVS
  2316 version_CVS
  2307     ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.148 2009-10-29 15:19:50 cg Exp $'
  2317     ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.149 2009-12-07 14:58:09 cg Exp $'
  2308 ! !
  2318 ! !