OptionBox.st
changeset 3260 274ba11c1789
parent 3211 54cb5fb7fd2f
child 3613 0a1963025199
equal deleted inserted replaced
3259:a75ffd181625 3260:274ba11c1789
   433 !
   433 !
   434 
   434 
   435 numberOfOptions:nOptions
   435 numberOfOptions:nOptions
   436     "set the number of options - this is a private interface"
   436     "set the number of options - this is a private interface"
   437 
   437 
   438     buttons := (OrderedCollection new:nOptions) grow:nOptions.
   438     buttons := OrderedCollection withSize:nOptions.
   439     actions := (OrderedCollection new:nOptions) grow:nOptions
   439     actions := OrderedCollection withSize:nOptions
   440 
   440 
   441     "Modified: 18.10.1996 / 14:54:30 / cg"
   441     "Modified: 18.10.1996 / 14:54:30 / cg"
   442 ! !
   442 ! !
   443 
   443 
   444 !OptionBox methodsFor:'accessing-components'!
   444 !OptionBox methodsFor:'accessing-components'!
   657 ! !
   657 ! !
   658 
   658 
   659 !OptionBox class methodsFor:'documentation'!
   659 !OptionBox class methodsFor:'documentation'!
   660 
   660 
   661 version
   661 version
   662     ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.62 2005-10-11 11:45:52 cg Exp $'
   662     ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.63 2006-02-20 21:30:35 cg Exp $'
   663 ! !
   663 ! !