DSVColumnView.st
changeset 5666 88930c01d31b
parent 5664 8eb2ee9eb548
child 5670 9aea34629aea
equal deleted inserted replaced
5665:45468b027cc5 5666:88930c01d31b
  4700 !
  4700 !
  4701 
  4701 
  4702 selectColIndex:aColNr rowIndex:aRowNr openEditor:openEditor
  4702 selectColIndex:aColNr rowIndex:aRowNr openEditor:openEditor
  4703     "change selection with notification"
  4703     "change selection with notification"
  4704 
  4704 
  4705     |oC oR|
  4705     |oldCol oldRow|
  4706 
  4706 
  4707     oC := self selectedColIndex.
  4707     oldCol := self selectedColIndex.
  4708     oR := self selectedRowIndex.
  4708     oldRow := self selectedRowIndex.
  4709 
  4709 
  4710     self setSelectColIndex:aColNr rowIndex:aRowNr openEditor:openEditor.
  4710     self setSelectColIndex:aColNr rowIndex:aRowNr openEditor:openEditor.
  4711 
  4711 
  4712     (oC ~~ self selectedColIndex or:[oR ~= self selectedRowIndex]) ifTrue:[
  4712     (oldCol ~~ self selectedColIndex 
       
  4713     or:[oldRow ~= self selectedRowIndex
       
  4714     or:[ignoreReselect == false]]) ifTrue:[
  4713         self selectionChanged:aColNr
  4715         self selectionChanged:aColNr
  4714     ].
  4716     ].
  4715 !
  4717 !
  4716 
  4718 
  4717 selectRow:something
  4719 selectRow:something
  4967         multipleSelectOk ifTrue:[
  4969         multipleSelectOk ifTrue:[
  4968             oldRow := oldRow at:1
  4970             oldRow := oldRow at:1
  4969         ].
  4971         ].
  4970         self updateColumnFromEditValueAndDestroyEditView.
  4972         self updateColumnFromEditValueAndDestroyEditView.
  4971     ].
  4973     ].
  4972     rowNr ~= selectedRowIndex ifTrue:[
  4974 
       
  4975     (rowNr ~= selectedRowIndex
       
  4976     or:[ignoreReselect == false]) ifTrue:[
  4973         selectedRowIndex := rowNr.
  4977         selectedRowIndex := rowNr.
  4974         self selectionChanged:colNr.
  4978         self selectionChanged:colNr.
  4975     ].
  4979     ].
  4976     self selectedColIndex:colNr.
  4980     self selectedColIndex:colNr.
  4977     shown ifFalse:[ ^ self ].
  4981     shown ifFalse:[ ^ self ].