Tools__ViewTreeApplication.st
changeset 3184 7ff3f8fb0b79
parent 3183 cd02c3731897
child 3185 3592ea3afb9e
equal deleted inserted replaced
3183:cd02c3731897 3184:7ff3f8fb0b79
  2606             x0 := x0 + 1.
  2606             x0 := x0 + 1.
  2607         ].
  2607         ].
  2608     ].
  2608     ].
  2609 !
  2609 !
  2610 
  2610 
  2611 displayOn:aGC x:x y:y h:h
  2611 displayOn:aGC x:x y:y h:h isHighlightedAsSelected:isHighlightedAsSelected
  2612     |labelHeight additionalName label isValidAndShown|
  2612     |labelHeight additionalName label isValidAndShown|
  2613 
  2613 
  2614     label := self label.
  2614     label := self label.
  2615     label isEmptyOrNil ifTrue:[^ self].
  2615     label isEmptyOrNil ifTrue:[^ self].
  2616 
  2616 
  2628         label := Text string:label emphasis:#italic.
  2628         label := Text string:label emphasis:#italic.
  2629         label colorizeAllWith:Color gray.
  2629         label colorizeAllWith:Color gray.
  2630     ].
  2630     ].
  2631 
  2631 
  2632     labelHeight := self heightOn:aGC.
  2632     labelHeight := self heightOn:aGC.
  2633     self displayLabel:label h:labelHeight on:aGC x:x y:y h:h.
  2633     self displayLabel:label h:labelHeight on:aGC x:x y:y h:h isHighlightedAsSelected:isHighlightedAsSelected.
  2634 
  2634 
  2635     xOffsetAdditionalName notNil ifTrue:[
  2635     xOffsetAdditionalName notNil ifTrue:[
  2636         additionalName := self additionalLabelForItem:self.
  2636         additionalName := self additionalLabelForItem:self.
  2637 
  2637 
  2638         additionalName notNil ifTrue:[
  2638         additionalName notNil ifTrue:[