OptionBox.st
changeset 2476 7fb8b94e650c
parent 2449 b9bf97bf089d
child 2523 c10ebb01ab09
equal deleted inserted replaced
2475:7e388ecc43ab 2476:7fb8b94e650c
   293 
   293 
   294 formLabel
   294 formLabel
   295     "return the label-view which displays a bitmap"
   295     "return the label-view which displays a bitmap"
   296 
   296 
   297     ^ formLabel
   297     ^ formLabel
       
   298 !
       
   299 
       
   300 image:aFormOrImage
       
   301     "set the image shown in the label-view"
       
   302 
       
   303     self form:aFormOrImage
       
   304 
       
   305     "Created: / 16.11.2001 / 15:20:02 / cg"
   298 !
   306 !
   299 
   307 
   300 textLabel
   308 textLabel
   301     "return the label-view which displays a message string"
   309     "return the label-view which displays a message string"
   302 
   310 
   450 ! !
   458 ! !
   451 
   459 
   452 !OptionBox class methodsFor:'documentation'!
   460 !OptionBox class methodsFor:'documentation'!
   453 
   461 
   454 version
   462 version
   455     ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.49 2001-10-18 16:51:55 cg Exp $'
   463     ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.50 2001-11-16 14:29:37 cg Exp $'
   456 ! !
   464 ! !