equal
deleted
inserted
replaced
7 inclusion of the above copyright notice. This software may not |
7 inclusion of the above copyright notice. This software may not |
8 be provided or otherwise made available to, or used by, any |
8 be provided or otherwise made available to, or used by, any |
9 other person. No title to or ownership of the software is |
9 other person. No title to or ownership of the software is |
10 hereby transferred. |
10 hereby transferred. |
11 " |
11 " |
12 |
|
13 |
|
14 |
|
15 |
|
16 "{ Package: 'stx:libwidg2' }" |
12 "{ Package: 'stx:libwidg2' }" |
17 |
13 |
18 ScrollableView subclass:#DataSetView |
14 ScrollableView subclass:#DataSetView |
19 instanceVariableNames:'labelView rememberedTopOffsetOfScrolledView' |
15 instanceVariableNames:'labelView rememberedTopOffsetOfScrolledView' |
20 classVariableNames:'' |
16 classVariableNames:'' |
72 bool := true. |
68 bool := true. |
73 rdWtSel := #( #at: #at:put: ). |
69 rdWtSel := #( #at: #at:put: ). |
74 |
70 |
75 1 to:1000 do:[:i||n| |
71 1 to:1000 do:[:i||n| |
76 n := i printString. |
72 n := i printString. |
77 rows add:(Array with:('text: ', n) with:('input: ', n) with:bool). |
73 rows add:(Array with:('text: ', n) with:('input: ', n) with:bool with:(i==20)). |
78 bool := bool not. |
74 bool := bool not. |
79 ]. |
75 ]. |
80 |
76 |
81 columns add:(DataSetColumnSpec label:'Text' editorType:#None selector:rdWtSel). |
77 columns add:(DataSetColumnSpec label:'Text' editorType:#None selector:rdWtSel). |
82 columns add:(DataSetColumnSpec label:'Input' editorType:#InputField selector:rdWtSel). |
78 columns add:(DataSetColumnSpec label:'Input' editorType:#InputField selector:rdWtSel). |
83 columns add:(DataSetColumnSpec label:'Toggle' editorType:#CheckToggle selector:rdWtSel). |
79 columns add:(DataSetColumnSpec label:'Toggle' editorType:#CheckToggle selector:rdWtSel). |
|
80 columns add:(DataSetColumnSpec label:'Radio' editorType:#RadioButton selector:rdWtSel). |
84 |
81 |
85 scr columnDescriptors:columns. |
82 scr columnDescriptors:columns. |
86 scr list:rows. |
83 scr list:rows. |
87 top open. |
84 top open. |
88 [exEnd] |
85 [exEnd] |
386 ! ! |
383 ! ! |
387 |
384 |
388 !DataSetView class methodsFor:'documentation'! |
385 !DataSetView class methodsFor:'documentation'! |
389 |
386 |
390 version |
387 version |
391 ^ '$Header: /cvs/stx/stx/libwidg2/DataSetView.st,v 1.41 2006-01-31 14:07:34 cg Exp $' |
388 ^ '$Header: /cvs/stx/stx/libwidg2/DataSetView.st,v 1.42 2008-07-25 12:43:54 cg Exp $' |
392 ! ! |
389 ! ! |