-
-
Notifications
You must be signed in to change notification settings - Fork 354
/
LabelledList.class.st
81 lines (65 loc) · 1.75 KB
/
LabelledList.class.st
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
"
I am a LabelledContainer specialized to manage a ListPresenter.
See LabelledContainer
self example
I provide the accessor list to be more intuitive than subwidget.
I provide shortcuts for the most common methods of the list api to avoid the use of the DoesNotUnderstand or the writing of long chain of accessors.
"
Class {
#name : #LabelledList,
#superclass : #LabelledContainer,
#category : #'Spec-PolyWidgets-Labelled'
}
{ #category : #'api-shortcuts' }
LabelledList >> beMultipleSelection [
^ self list beMultipleSelection
]
{ #category : #'api-shortcuts' }
LabelledList >> displayBlock: aBlock [
^self list displayBlock: aBlock
]
{ #category : #initialization }
LabelledList >> initializeWidgets [
super initializeWidgets.
self content: ListPresenter
]
{ #category : #'api-shortcuts' }
LabelledList >> items: aList [
^ self list items: aList
]
{ #category : #accessing }
LabelledList >> list [
^ self subwidget
]
{ #category : #'api-shortcuts' }
LabelledList >> listSize [
^ self list listSize
]
{ #category : #'api-shortcuts' }
LabelledList >> selectAll [
^ self list selectAll
]
{ #category : #'api-shortcuts' }
LabelledList >> selectedItem [
^ self list selectedItem
]
{ #category : #'api-shortcuts' }
LabelledList >> selectedItems [
^ self list selectedItems
]
{ #category : #'api-shortcuts' }
LabelledList >> sortingBlock: aBlock [
^self list sortingBlock: aBlock
]
{ #category : #'events-shortcuts' }
LabelledList >> whenSelectedItemChanged: aBlock [
self list whenSelectedItemChanged: aBlock
]
{ #category : #'events-shortcuts' }
LabelledList >> whenSelectionChanged: aBlock [
self list whenSelectionChanged: aBlock
]
{ #category : #'events-shortcuts' }
LabelledList >> whenSelectionIndexChanged: aBlock [
self list whenSelectionIndexChanged: aBlock
]