DSVColumnView.st
changeset 5639 f3534ebb5c13
parent 5603 974a4c6a7656
child 5664 8eb2ee9eb548
equal deleted inserted replaced
5638:df7b96c04c11 5639:f3534ebb5c13
   419         super level:aLevel.
   419         super level:aLevel.
   420 "/        labelView level:aLevel.
   420 "/        labelView level:aLevel.
   421     ]
   421     ]
   422 !
   422 !
   423 
   423 
   424 modifiedChannel
       
   425     ^ modifiedChannel
       
   426 
       
   427     "Created: / 30.1.2000 / 12:10:57 / cg"
       
   428 !
       
   429 
       
   430 modifiedChannel:something
       
   431     modifiedChannel := something.
       
   432 
       
   433     "Created: / 30.1.2000 / 12:10:57 / cg"
       
   434 !
       
   435 
       
   436 preferredLabelViewHeight
   424 preferredLabelViewHeight
   437     ^ labelView preferredHeight "/ + (labelView margin + self verticalSpacing * 2).
   425     ^ labelView preferredHeight "/ + (labelView margin + self verticalSpacing * 2).
   438 !
   426 !
   439 
   427 
   440 rowFontAscent
   428 rowFontAscent
   738      list should be sent to the model. The default is its index."
   726      list should be sent to the model. The default is its index."
   739     
   727     
   740     useIndex := aBool
   728     useIndex := aBool
   741 ! !
   729 ! !
   742 
   730 
   743 !DSVColumnView methodsFor:'accessing-colors'!
   731 !DSVColumnView methodsFor:'accessing-channels'!
       
   732 
       
   733 modifiedChannel
       
   734     ^ modifiedChannel
       
   735 
       
   736     "Created: / 30.1.2000 / 12:10:57 / cg"
       
   737 !
       
   738 
       
   739 modifiedChannel:something
       
   740     modifiedChannel := something.
       
   741 
       
   742     "Created: / 30.1.2000 / 12:10:57 / cg"
       
   743 ! !
       
   744 
       
   745 !DSVColumnView methodsFor:'accessing-color & font'!
   744 
   746 
   745 backgroundColor
   747 backgroundColor
   746     "get the background color of the rows"
   748     "get the background color of the rows"
   747     
   749     
   748     ^ bgColor
   750     ^ bgColor