equal
deleted
inserted
replaced
14 |
14 |
15 In contrast to a PopUpList or ComboListView, the string can still be edited - |
15 In contrast to a PopUpList or ComboListView, the string can still be edited - |
16 the list is actually only a set of values for the convenience of the user. |
16 the list is actually only a set of values for the convenience of the user. |
17 |
17 |
18 Not yet finished. |
18 Not yet finished. |
|
19 |
|
20 [see also:] |
|
21 ComboListView |
19 " |
22 " |
20 ! |
23 ! |
21 |
24 |
22 examples |
25 examples |
23 " |
26 " |
|
27 [exBegin] |
24 |top b| |
28 |top b| |
25 |
29 |
26 top := StandardSystemView new. |
30 top := StandardSystemView new. |
27 top extent:(300 @ 200). |
31 top extent:(300 @ 200). |
28 |
32 |
30 b origin:(0.0 @ 0.0) corner:(1.0 @ 0.0). |
34 b origin:(0.0 @ 0.0) corner:(1.0 @ 0.0). |
31 b bottomInset:(b preferredExtent y negated). |
35 b bottomInset:(b preferredExtent y negated). |
32 |
36 |
33 b list:#('hello' 'world' 'this' 'is' 'st/x'). |
37 b list:#('hello' 'world' 'this' 'is' 'st/x'). |
34 top open. |
38 top open. |
|
39 [exEnd] |
35 |
40 |
36 |
41 |
37 |
42 |
38 model operation: |
43 model operation: |
39 |
44 [exBegin] |
40 |model top b| |
45 |model top b| |
41 |
46 |
42 model := 'foo' asValue. |
47 model := 'foo' asValue. |
43 |
48 |
44 top := StandardSystemView new. |
49 top := StandardSystemView new. |
51 b list:#('hello' 'world' 'this' 'is' 'st/x'). |
56 b list:#('hello' 'world' 'this' 'is' 'st/x'). |
52 b model:model. |
57 b model:model. |
53 |
58 |
54 top openModal. |
59 top openModal. |
55 Transcript showCr:('comboBox''s value: ' , model value). |
60 Transcript showCr:('comboBox''s value: ' , model value). |
|
61 [exEnd] |
56 |
62 |
57 |
63 |
58 in a dialog: |
64 in a dialog: |
59 |
65 [exBegin] |
60 |model1 model2 dialog b| |
66 |model1 model2 dialog b| |
61 |
67 |
62 model1 := 'foo' asValue. |
68 model1 := 'foo' asValue. |
63 model2 := 'bar' asValue. |
69 model2 := 'bar' asValue. |
64 |
70 |
78 |
84 |
79 dialog open. |
85 dialog open. |
80 |
86 |
81 Transcript showCr:('1st comboBox''s value: ' , model1 value). |
87 Transcript showCr:('1st comboBox''s value: ' , model1 value). |
82 Transcript showCr:('2nd comboBox''s value: ' , model2 value). |
88 Transcript showCr:('2nd comboBox''s value: ' , model2 value). |
|
89 [exEnd] |
83 " |
90 " |
84 ! ! |
91 ! ! |
85 |
92 |
86 !ComboBoxView methodsFor:'accessing-components'! |
93 !ComboBoxView methodsFor:'accessing-components'! |
87 |
94 |
158 ! ! |
165 ! ! |
159 |
166 |
160 !ComboBoxView class methodsFor:'documentation'! |
167 !ComboBoxView class methodsFor:'documentation'! |
161 |
168 |
162 version |
169 version |
163 ^ '$Header: /cvs/stx/stx/libwidg2/Attic/ComboBoxV.st,v 1.6 1996-03-05 00:21:59 cg Exp $' |
170 ^ '$Header: /cvs/stx/stx/libwidg2/Attic/ComboBoxV.st,v 1.7 1996-05-14 11:09:18 cg Exp $' |
164 ! ! |
171 ! ! |