equal
deleted
inserted
replaced
17 classVariableNames:'' |
17 classVariableNames:'' |
18 poolDictionaries:'' |
18 poolDictionaries:'' |
19 category:'Interface-Support' |
19 category:'Interface-Support' |
20 ! |
20 ! |
21 |
21 |
22 !EventListener class methodsFor:'documentation'! |
22 !EventListener class methodsFor:'documentation'! |
23 |
23 |
24 copyright |
24 copyright |
25 " |
25 " |
26 COPYRIGHT (c) 1995 by Claus Gittinger |
26 COPYRIGHT (c) 1995 by Claus Gittinger |
27 All Rights Reserved |
27 All Rights Reserved |
110 ^ false |
110 ^ false |
111 |
111 |
112 "Modified: 23.4.1996 / 21:58:11 / cg" |
112 "Modified: 23.4.1996 / 21:58:11 / cg" |
113 ! |
113 ! |
114 |
114 |
|
115 mouseWheelMotion:amount state:state view:aView |
|
116 "not handled here - can be redefined in a concrete subclass" |
|
117 |
|
118 ^ false |
|
119 |
|
120 "Modified: / 23.4.1996 / 21:57:54 / cg" |
|
121 "Created: / 21.5.1999 / 13:07:13 / cg" |
|
122 ! |
|
123 |
115 pointerEnter:state x:x y:y view:view |
124 pointerEnter:state x:x y:y view:view |
116 "not handled here - should be redefined in a concrete subclass" |
125 "not handled here - should be redefined in a concrete subclass" |
117 |
126 |
118 ^ false |
127 ^ false |
119 |
128 |
128 "Modified: 23.4.1996 / 21:58:17 / cg" |
137 "Modified: 23.4.1996 / 21:58:17 / cg" |
129 ! ! |
138 ! ! |
130 |
139 |
131 !EventListener methodsFor:'events - window creation'! |
140 !EventListener methodsFor:'events - window creation'! |
132 |
141 |
|
142 postCreateView:aView |
|
143 "invoked right after a view was physically created." |
|
144 |
|
145 ^ self |
|
146 ! |
|
147 |
133 preCreateView:aView origin:org |
148 preCreateView:aView origin:org |
134 "invoked right before a view is about to be physically created. |
149 "invoked right before a view is about to be physically created. |
135 May return a new origin." |
150 May return a new origin." |
136 |
151 |
137 ^ org |
152 ^ org |
138 ! |
|
139 |
|
140 postCreateView:aView |
|
141 "invoked right after a view was physically created." |
|
142 |
|
143 ^ self |
|
144 ! ! |
153 ! ! |
145 |
154 |
146 !EventListener methodsFor:'listen'! |
155 !EventListener methodsFor:'listen'! |
147 |
156 |
148 listen |
157 listen |
164 "uninstall myself as listener" |
173 "uninstall myself as listener" |
165 |
174 |
166 WindowSensor eventListener:nil |
175 WindowSensor eventListener:nil |
167 ! ! |
176 ! ! |
168 |
177 |
169 !EventListener class methodsFor:'documentation'! |
178 !EventListener class methodsFor:'documentation'! |
170 |
179 |
171 version |
180 version |
172 ^ '$Header: /cvs/stx/stx/libview2/EventListener.st,v 1.13 1997-05-07 13:09:22 cg Exp $' |
181 ^ '$Header: /cvs/stx/stx/libview2/EventListener.st,v 1.14 1999-05-21 11:22:53 cg Exp $' |
173 ! ! |
182 ! ! |