DataSetBuilder.st
changeset 1562 5bf39bbb2eb4
parent 1553 1d7fd5dde600
child 1569 782fa8f8e64c
equal deleted inserted replaced
1561:dde6c4539acd 1562:5bf39bbb2eb4
  2585     ^true
  2585     ^true
  2586 
  2586 
  2587 !
  2587 !
  2588 
  2588 
  2589 labelFromColumn:aColumn
  2589 labelFromColumn:aColumn
  2590 
  2590     |label|
  2591     ^ aColumn rendererType == #rowSelector ifFalse:[aColumn label]
  2591 
  2592                                            ifTrue: ['Row Selector'].
  2592     aColumn rendererType == #rowSelector ifTrue:[
       
  2593         ^ 'Row Selector'
       
  2594     ].
       
  2595     label := aColumn label.
       
  2596     label ifNil:[^ nil].
       
  2597 
       
  2598     label isString ifTrue:[^ label].
       
  2599 
       
  2600     label size > 0 ifTrue:[
       
  2601          label := label at:1.
       
  2602     ].
       
  2603     ^ label printString
  2593 !
  2604 !
  2594 
  2605 
  2595 labelInPreviewPressed:anIndex
  2606 labelInPreviewPressed:anIndex
  2596    (builder componentAt:#labelAndColumns) selection:anIndex
  2607    (builder componentAt:#labelAndColumns) selection:anIndex
  2597 !
  2608 !