equal
deleted
inserted
replaced
245 ! ! |
245 ! ! |
246 |
246 |
247 !UIObjectView class methodsFor:'queries'! |
247 !UIObjectView class methodsFor:'queries'! |
248 |
248 |
249 isHorizontalResizable:aComponent |
249 isHorizontalResizable:aComponent |
250 "returns true if aComponent is horizontal resizeable |
250 "returns true if aComponent is horizontally resizable |
251 " |
251 " |
252 (aComponent isKindOf:ScrollBar) ifTrue:[ |
252 (aComponent isKindOf:ScrollBar) ifTrue:[ |
253 ^ aComponent orientation == #horizontal |
253 ^ aComponent orientation == #horizontal |
254 ]. |
254 ]. |
255 (aComponent isKindOf:Scroller) ifTrue:[ |
255 (aComponent isKindOf:Scroller) ifTrue:[ |
260 ]. |
260 ]. |
261 (aComponent isKindOf:(Smalltalk classNamed:#LineSegmentMorph)) ifTrue:[ |
261 (aComponent isKindOf:(Smalltalk classNamed:#LineSegmentMorph)) ifTrue:[ |
262 ^ false |
262 ^ false |
263 ]. |
263 ]. |
264 ^ true |
264 ^ true |
|
265 |
|
266 "Modified (comment): / 14-03-2018 / 20:23:39 / mawalch" |
265 ! |
267 ! |
266 |
268 |
267 isVerticalResizable:aComponent |
269 isVerticalResizable:aComponent |
268 "returns true if aComponent is vertical resizeable |
270 "returns true if aComponent is vertically resizable |
269 " |
271 " |
270 "/ (aComponent isKindOf:EditField) ifTrue:[ |
272 "/ (aComponent isKindOf:EditField) ifTrue:[ |
271 "/ ^ false |
273 "/ ^ false |
272 "/ ]. |
274 "/ ]. |
273 "/ (aComponent isKindOf:ComboBoxView) ifTrue:[ |
275 "/ (aComponent isKindOf:ComboBoxView) ifTrue:[ |
287 "/ ]. |
289 "/ ]. |
288 (aComponent isKindOf:(Smalltalk classNamed:#LineSegmentMorph)) ifTrue:[ |
290 (aComponent isKindOf:(Smalltalk classNamed:#LineSegmentMorph)) ifTrue:[ |
289 ^ false |
291 ^ false |
290 ]. |
292 ]. |
291 ^ true |
293 ^ true |
|
294 |
|
295 "Modified (comment): / 14-03-2018 / 20:25:53 / mawalch" |
292 ! |
296 ! |
293 |
297 |
294 layoutType:aViewOrComponent |
298 layoutType:aViewOrComponent |
295 "returns layout type of aView or nil" |
299 "returns layout type of aView or nil" |
296 |
300 |