ListView.st
changeset 4392 e1159af210b2
parent 4322 df5541649a5a
child 4403 8d32cc71fb3b
equal deleted inserted replaced
4391:c2344fec7ea4 4392:e1159af210b2
  2810     ^ max
  2810     ^ max
  2811 !
  2811 !
  2812 
  2812 
  2813 withoutAnyColorEmphasis:line
  2813 withoutAnyColorEmphasis:line
  2814     (line notNil and:[line isText]) ifTrue:[
  2814     (line notNil and:[line isText]) ifTrue:[
  2815         ^ line withoutForegroundColorEmphasis withoutBackgroundColorEmphasis
  2815         ^ line withoutAnyColorEmphasis
  2816     ].
  2816     ].
  2817     ^ line
  2817     ^ line
  2818 
  2818 
  2819     "
  2819     "
  2820      'hello' asText colorizeAllWith:Color red.
  2820      'hello' asText colorizeAllWith:Color red.
  2821      ('hello' asText colorizeAllWith:Color red) withoutForegroundColorEmphasis.
  2821      ('hello' asText colorizeAllWith:Color red) withoutForegroundColorEmphasis.
       
  2822      ('hello' asText colorizeAllWith:Color red) withoutAnyColorEmphasis.
  2822     "
  2823     "
       
  2824 
       
  2825     "Modified (comment): / 06-03-2012 / 18:16:41 / cg"
  2823 !
  2826 !
  2824 
  2827 
  2825 withoutBackgroundColorEmphasis:line
  2828 withoutBackgroundColorEmphasis:line
  2826     (line notNil and:[line isText]) ifTrue:[
  2829     (line notNil and:[line isText]) ifTrue:[
  2827         ^ line withoutBackgroundColorEmphasis
  2830         ^ line withoutBackgroundColorEmphasis
  2841     "/ otherwise blue text is not visible if selection-bg is blue
  2844     "/ otherwise blue text is not visible if selection-bg is blue
  2842 
  2845 
  2843     (line notNil
  2846     (line notNil
  2844     and:[line isText
  2847     and:[line isText
  2845     and:[fg ~= fgColor or:[bg ~= bgColor]]]) ifTrue:[
  2848     and:[fg ~= fgColor or:[bg ~= bgColor]]]) ifTrue:[
  2846         ^ line withoutForegroundColorEmphasis withoutBackgroundColorEmphasis
  2849         ^ line withoutAnyColorEmphasis
  2847     ].
  2850     ].
  2848     ^ line
  2851     ^ line
  2849 
  2852 
  2850     "Modified: / 15.12.1999 / 23:17:30 / cg"
  2853     "Created: / 15-12-1999 / 23:19:30 / cg"
  2851     "Created: / 15.12.1999 / 23:19:30 / cg"
       
  2852 !
  2854 !
  2853 
  2855 
  2854 xOfCol:col inVisibleLine:visLineNr
  2856 xOfCol:col inVisibleLine:visLineNr
  2855     "given a visible line- and colNr, return the x-coordinate in view"
  2857     "given a visible line- and colNr, return the x-coordinate in view"
  2856 
  2858 
  4641 ! !
  4643 ! !
  4642 
  4644 
  4643 !ListView class methodsFor:'documentation'!
  4645 !ListView class methodsFor:'documentation'!
  4644 
  4646 
  4645 version_CVS
  4647 version_CVS
  4646     ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.348 2011-10-05 14:12:37 az Exp $'
  4648     ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.349 2012-03-06 17:24:03 cg Exp $'
  4647 ! !
  4649 ! !