equal
deleted
inserted
replaced
42 |
42 |
43 aGroup with:values do:[:item :value | |
43 aGroup with:values do:[:item :value | |
44 self addItem:item value:value |
44 self addItem:item value:value |
45 ]. |
45 ]. |
46 ! |
46 ! |
|
47 |
|
48 groupSizes |
|
49 "return the value of the instance variable 'groupSizes' (automatically generated)" |
|
50 |
|
51 ^ groupSizes! |
|
52 |
|
53 groupSizes:something |
|
54 "set the value of the instance variable 'groupSizes' (automatically generated)" |
|
55 |
|
56 groupSizes := something.! |
47 |
57 |
48 labels |
58 labels |
49 "return a collection of labels from my items" |
59 "return a collection of labels from my items" |
50 |
60 |
51 ^ items collect:[:anItem | anItem label] |
61 ^ items collect:[:anItem | anItem label] |
268 !Menu methodsFor:'startup'! |
278 !Menu methodsFor:'startup'! |
269 |
279 |
270 createPopUpMenu |
280 createPopUpMenu |
271 "create a popUpMenu for the receiver" |
281 "create a popUpMenu for the receiver" |
272 |
282 |
273 |menuView val index labels | |
283 |menuView val index labels values| |
274 |
284 |
275 "/ for now, use PopUpMenu .... |
285 "/ for now, use PopUpMenu .... |
276 "/ ... eventually, MenuView will handle me directly |
286 "/ ... eventually, MenuView will handle me directly |
277 |
287 |
278 labels := self labels. |
288 labels := self labels. |
279 |
289 values := self values. |
280 menuView := PopUpMenu labels:labels. |
290 |
|
291 menuView := PopUpMenu labels:labels selectors:values. |
281 |
292 |
282 "/ manually convert subMenus ... |
293 "/ manually convert subMenus ... |
283 |
294 |
284 items keysAndValuesDo:[:idx :anItem | |
295 items keysAndValuesDo:[:idx :anItem | |
285 |sub m| |
296 |sub m| |
338 ! ! |
349 ! ! |
339 |
350 |
340 !Menu class methodsFor:'documentation'! |
351 !Menu class methodsFor:'documentation'! |
341 |
352 |
342 version |
353 version |
343 ^ '$Header: /cvs/stx/stx/libview2/Menu.st,v 1.7 1997-03-06 14:16:03 cg Exp $' |
354 ^ '$Header: /cvs/stx/stx/libview2/Menu.st,v 1.8 1997-05-20 07:08:02 ca Exp $' |
344 ! ! |
355 ! ! |