equal
deleted
inserted
replaced
253 ! ! |
253 ! ! |
254 |
254 |
255 !FramedBox methodsFor:'accessing'! |
255 !FramedBox methodsFor:'accessing'! |
256 |
256 |
257 font:aFont |
257 font:aFont |
258 "set the frame labelstrings font" |
258 "set the frame labelstrings font. |
|
259 CAVEAT: with the addition of Text objects, |
|
260 this method is going to be obsoleted by a textStyle |
|
261 method, which allows specific control over |
|
262 normalFont/boldFont/italicFont parameters." |
259 |
263 |
260 (font ~= aFont) ifTrue:[ |
264 (font ~= aFont) ifTrue:[ |
261 super font:aFont. |
265 super font:aFont. |
262 self redrawIfShown |
266 self redrawIfShown |
263 ] |
267 ] |
|
268 |
|
269 "Modified: 22.5.1996 / 12:36:20 / cg" |
264 ! |
270 ! |
265 |
271 |
266 foregroundColor |
272 foregroundColor |
267 "return the frame labels foreground color" |
273 "return the frame labels foreground color" |
268 |
274 |
632 ! ! |
638 ! ! |
633 |
639 |
634 !FramedBox class methodsFor:'documentation'! |
640 !FramedBox class methodsFor:'documentation'! |
635 |
641 |
636 version |
642 version |
637 ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.23 1996-04-30 15:37:59 cg Exp $' |
643 ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.24 1996-05-22 11:18:22 cg Exp $' |
638 ! ! |
644 ! ! |