DSVColumnView.st
changeset 2237 1da5501b1248
parent 2226 4478e2919bd2
child 2246 5d59b5e2e00c
equal deleted inserted replaced
2236:988ca38e0cd6 2237:1da5501b1248
  2325      when the pointer enters can do so by redefining this
  2325      when the pointer enters can do so by redefining this
  2326      to return true"
  2326      to return true"
  2327 
  2327 
  2328     |pref|
  2328     |pref|
  2329 
  2329 
       
  2330     editView ifNotNil:[^ false].
       
  2331 
  2330     pref := UserPreferences current focusFollowsMouse.
  2332     pref := UserPreferences current focusFollowsMouse.
  2331     (pref ~~ false
  2333     (pref ~~ false
  2332     and:[(styleSheet at:#'selection.requestFocusOnPointerEnter' default:true)
  2334     and:[(styleSheet at:#'selection.requestFocusOnPointerEnter' default:true)
  2333     ]) ifTrue:[
  2335     ]) ifTrue:[
  2334         list size > 0 ifTrue:[
  2336         list size > 0 ifTrue:[
  3330     ((v := self detectViewAt:aPoint ignoreInvisible:true) notNil 
  3332     ((v := self detectViewAt:aPoint ignoreInvisible:true) notNil 
  3331     and:[v ~~ self])
  3333     and:[v ~~ self])
  3332     ifTrue:[
  3334     ifTrue:[
  3333         p := device translatePoint:aPoint fromView:self toView:v.
  3335         p := device translatePoint:aPoint fromView:self toView:v.
  3334         "/ simulate clicking into the editor
  3336         "/ simulate clicking into the editor
  3335         self sensor pushEvent:(WindowEvent buttonPress:#select x:p x y:p y view:v)
  3337         self sensor pushEvent:(WindowEvent buttonPress:#select x:p x y:p y view:v).
       
  3338         self sensor pushEvent:(WindowEvent buttonRelease:#select x:p x y:p y view:v)
  3336     ].
  3339     ].
  3337 !
  3340 !
  3338 
  3341 
  3339 selectRowIndex:something
  3342 selectRowIndex:something
  3340     "set selection of rows
  3343     "set selection of rows
  3618 ! !
  3621 ! !
  3619 
  3622 
  3620 !DSVColumnView class methodsFor:'documentation'!
  3623 !DSVColumnView class methodsFor:'documentation'!
  3621 
  3624 
  3622 version
  3625 version
  3623     ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.147 2002-09-27 12:09:42 penk Exp $'
  3626     ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.148 2002-10-01 17:48:23 ca Exp $'
  3624 ! !
  3627 ! !