DataSetLabel.st
changeset 3772 7875f39d446d
parent 3768 5fd0a628d63f
child 3885 602f5ef8532a
equal deleted inserted replaced
3771:0640570dcd43 3772:7875f39d446d
    10  hereby transferred.
    10  hereby transferred.
    11 "
    11 "
    12 "{ Package: 'stx:libwidg2' }"
    12 "{ Package: 'stx:libwidg2' }"
    13 
    13 
    14 Object subclass:#DataSetLabel
    14 Object subclass:#DataSetLabel
    15         instanceVariableNames:'label selector argument adjust font fgColor bgColor
    15 	instanceVariableNames:'label selector argument adjust font fgColor bgColor
    16                 preferredHeight preferredWidth description'
    16 		preferredHeight preferredWidth description'
    17         classVariableNames:''
    17 	classVariableNames:''
    18         poolDictionaries:''
    18 	poolDictionaries:''
    19         category:'Views-DataSet'
    19 	category:'Views-DataSet'
    20 !
    20 !
    21 
    21 
    22 !DataSetLabel class methodsFor:'documentation'!
    22 !DataSetLabel class methodsFor:'documentation'!
    23 
    23 
    24 copyright
    24 copyright
   233 
   233 
   234 preferredWidth
   234 preferredWidth
   235     "returns my preferred width
   235     "returns my preferred width
   236     "
   236     "
   237     ^ preferredWidth
   237     ^ preferredWidth
   238 ! !
       
   239 
       
   240 !DataSetLabel methodsFor:'actions'!
       
   241 
       
   242 sendClickMsgTo:aReceiver
       
   243     "inform the receiver of a button release notification
       
   244     "
       
   245 
       
   246     (aReceiver notNil and:[selector notNil]) ifTrue:[
       
   247         aReceiver perform:selector withOptionalArgument:argument
       
   248     ].
       
   249 
       
   250     self isSortable ifTrue:[
       
   251         self halt
       
   252     ].
       
   253 ! !
   238 ! !
   254 
   239 
   255 !DataSetLabel methodsFor:'drawing'!
   240 !DataSetLabel methodsFor:'drawing'!
   256 
   241 
   257 redrawX:xLeft w:width h:height inset:inset on:aLabelView
   242 redrawX:xLeft w:width h:height inset:inset on:aLabelView
   522 ! !
   507 ! !
   523 
   508 
   524 !DataSetLabel class methodsFor:'documentation'!
   509 !DataSetLabel class methodsFor:'documentation'!
   525 
   510 
   526 version
   511 version
   527     ^ '$Header: /cvs/stx/stx/libwidg2/DataSetLabel.st,v 1.27 2009-10-19 08:50:53 cg Exp $'
   512     ^ '$Header: /cvs/stx/stx/libwidg2/DataSetLabel.st,v 1.28 2009-10-19 11:22:49 cg Exp $'
   528 !
   513 !
   529 
   514 
   530 version_CVS
   515 version_CVS
   531     ^ '$Header: /cvs/stx/stx/libwidg2/DataSetLabel.st,v 1.27 2009-10-19 08:50:53 cg Exp $'
   516     ^ '$Header: /cvs/stx/stx/libwidg2/DataSetLabel.st,v 1.28 2009-10-19 11:22:49 cg Exp $'
   532 ! !
   517 ! !