equal
deleted
inserted
replaced
16 classVariableNames:'' |
16 classVariableNames:'' |
17 poolDictionaries:'' |
17 poolDictionaries:'' |
18 category:'Views-Layout' |
18 category:'Views-Layout' |
19 ! |
19 ! |
20 |
20 |
21 !PanelView class methodsFor:'documentation'! |
21 !PanelView class methodsFor:'documentation'! |
22 |
22 |
23 copyright |
23 copyright |
24 " |
24 " |
25 COPYRIGHT (c) 1989 by Claus Gittinger |
25 COPYRIGHT (c) 1989 by Claus Gittinger |
26 All Rights Reserved |
26 All Rights Reserved |
84 By default, this is false. |
84 By default, this is false. |
85 |
85 |
86 [author:] |
86 [author:] |
87 Claus Gittinger |
87 Claus Gittinger |
88 " |
88 " |
89 ! |
89 ! ! |
|
90 |
|
91 !PanelView class ignoredMethodsFor:'documentation'! |
90 |
92 |
91 examples |
93 examples |
92 " |
94 " |
93 fill a panel with many buttons (see what happens on resize): |
95 fill a panel with many buttons (see what happens on resize): |
94 [exBegin] |
96 [exBegin] |
169 |
171 |
170 addSubView:newView after:aView |
172 addSubView:newView after:aView |
171 "redefined to recompute layout when a subview is added" |
173 "redefined to recompute layout when a subview is added" |
172 |
174 |
173 super addSubView:newView after:aView. |
175 super addSubView:newView after:aView. |
174 self addedView:aView |
176 self addedView:newView |
|
177 |
|
178 "Modified: 15.7.1996 / 10:15:04 / cg" |
175 ! |
179 ! |
176 |
180 |
177 addSubView:newView before:aView |
181 addSubView:newView before:aView |
178 "redefined to recompute layout when a subview is added" |
182 "redefined to recompute layout when a subview is added" |
179 |
183 |
180 super addSubView:newView before:aView. |
184 super addSubView:newView before:aView. |
181 self addedView:aView |
185 self addedView:newView |
|
186 |
|
187 "Modified: 15.7.1996 / 10:14:39 / cg" |
182 ! |
188 ! |
183 |
189 |
184 removeSubView:aView |
190 removeSubView:aView |
185 "redefined to recompute layout when a subview is removed" |
191 "redefined to recompute layout when a subview is removed" |
186 |
192 |
249 |
255 |
250 addedView:aView |
256 addedView:aView |
251 "added a new element" |
257 "added a new element" |
252 |
258 |
253 elementsChangeSize ifTrue:[ |
259 elementsChangeSize ifTrue:[ |
254 aView addDependent:self |
260 aView addDependent:self |
|
261 ]. |
|
262 aView resize. |
|
263 explicitExtent ~~ true ifTrue:[ |
|
264 self resize |
255 ]. |
265 ]. |
256 self layoutChanged |
266 self layoutChanged |
|
267 |
|
268 "Modified: 15.7.1996 / 11:16:53 / cg" |
257 ! |
269 ! |
258 |
270 |
259 layoutChanged |
271 layoutChanged |
260 "called whenever repositioning is required. If the panel view is |
272 "called whenever repositioning is required. If the panel view is |
261 already visible, reposition elements right now. Otherwise, remember |
273 already visible, reposition elements right now. Otherwise, remember |
318 ]. |
330 ]. |
319 ]. |
331 ]. |
320 mustRearrange := false |
332 mustRearrange := false |
321 ! ! |
333 ! ! |
322 |
334 |
323 !PanelView class methodsFor:'documentation'! |
335 !PanelView class methodsFor:'documentation'! |
324 |
336 |
325 version |
337 version |
326 ^ '$Header: /cvs/stx/stx/libwidg/PanelView.st,v 1.16 1996-04-27 18:20:32 cg Exp $' |
338 ^ '$Header: /cvs/stx/stx/libwidg/PanelView.st,v 1.17 1996-07-15 10:10:05 cg Exp $' |
327 ! ! |
339 ! ! |