VisualComponent.st
changeset 4024 54beadcf89bb
parent 3928 bf6f6f75212f
child 4210 7a88a5080e6b
equal deleted inserted replaced
4023:27a1f500ec02 4024:54beadcf89bb
    91     ^ self == VisualComponent.
    91     ^ self == VisualComponent.
    92 ! !
    92 ! !
    93 
    93 
    94 !VisualComponent methodsFor:'accessing'!
    94 !VisualComponent methodsFor:'accessing'!
    95 
    95 
    96 backgroundColor
       
    97     ^ Color white
       
    98 
       
    99     "Created: / 18.6.1998 / 16:01:00 / cg"
       
   100 !
       
   101 
       
   102 backgroundColor:aColor
       
   103     "ignored here"
       
   104 
       
   105     "Created: / 18.6.1998 / 16:15:28 / cg"
       
   106 !
       
   107 
       
   108 container:someContainer
    96 container:someContainer
   109     "ignored here"
    97     "ignored here"
   110 
    98 
   111     "Created: 9.5.1996 / 00:48:54 / cg"
    99     "Created: 9.5.1996 / 00:48:54 / cg"
   112 !
       
   113 
       
   114 defaultFont
       
   115     ^ SimpleView defaultFont
       
   116 
       
   117     "Created: / 18.6.1998 / 16:13:56 / cg"
       
   118 !
       
   119 
       
   120 font:aFont
       
   121     "ignored here"
       
   122 
       
   123     "Created: / 18.6.1998 / 16:14:39 / cg"
       
   124 !
       
   125 
       
   126 foregroundColor
       
   127     ^ Color black
       
   128 
       
   129     "Created: / 18.6.1998 / 16:01:07 / cg"
       
   130 !
       
   131 
       
   132 foregroundColor:aColor
       
   133     "ignored here"
       
   134 
       
   135     "Created: / 18.6.1998 / 16:14:53 / cg"
       
   136 !
   100 !
   137 
   101 
   138 geometryLayout
   102 geometryLayout
   139     "ignored here"
   103     "ignored here"
   140 
   104 
   232     ^ true
   196     ^ true
   233 !
   197 !
   234 
   198 
   235 viewBackground
   199 viewBackground
   236     ^ self backgroundColor
   200     ^ self backgroundColor
       
   201 ! !
       
   202 
       
   203 !VisualComponent methodsFor:'accessing-color & font'!
       
   204 
       
   205 backgroundColor
       
   206     ^ Color white
       
   207 
       
   208     "Created: / 18.6.1998 / 16:01:00 / cg"
       
   209 !
       
   210 
       
   211 backgroundColor:aColor
       
   212     "ignored here"
       
   213 
       
   214     "Created: / 18.6.1998 / 16:15:28 / cg"
       
   215 !
       
   216 
       
   217 defaultFont
       
   218     ^ SimpleView defaultFont
       
   219 
       
   220     "Created: / 18.6.1998 / 16:13:56 / cg"
       
   221 !
       
   222 
       
   223 font:aFont
       
   224     "ignored here"
       
   225 
       
   226     "Created: / 18.6.1998 / 16:14:39 / cg"
       
   227 !
       
   228 
       
   229 foregroundColor
       
   230     ^ Color black
       
   231 
       
   232     "Created: / 18.6.1998 / 16:01:07 / cg"
       
   233 !
       
   234 
       
   235 foregroundColor:aColor
       
   236     "ignored here"
       
   237 
       
   238     "Created: / 18.6.1998 / 16:14:53 / cg"
   237 ! !
   239 ! !
   238 
   240 
   239 !VisualComponent methodsFor:'accessing-dimensions'!
   241 !VisualComponent methodsFor:'accessing-dimensions'!
   240 
   242 
   241 bottom
   243 bottom