equal
deleted
inserted
replaced
7 inclusion of the above copyright notice. This software may not |
7 inclusion of the above copyright notice. This software may not |
8 be provided or otherwise made available to, or used by, any |
8 be provided or otherwise made available to, or used by, any |
9 other person. No title to or ownership of the software is |
9 other person. No title to or ownership of the software is |
10 hereby transferred. |
10 hereby transferred. |
11 " |
11 " |
12 |
|
13 "{ Package: 'stx:libwidg' }" |
12 "{ Package: 'stx:libwidg' }" |
14 |
13 |
15 View subclass:#Label |
14 View subclass:#Label |
16 instanceVariableNames:'logo labelWidth labelHeight labelOriginX labelOriginY adjust |
15 instanceVariableNames:'logo labelWidth labelHeight labelOriginX labelOriginY adjust |
17 hSpace vSpace bgColor fgColor etchedFgColor fixSize labelMsg |
16 hSpace vSpace bgColor fgColor etchedFgColor fixSize labelMsg |
1472 ] |
1471 ] |
1473 ] |
1472 ] |
1474 ]. |
1473 ]. |
1475 |
1474 |
1476 numberOfLines isNil ifTrue:[ |
1475 numberOfLines isNil ifTrue:[ |
|
1476 "logo is neither a String nor a StringCollection" |
1477 (logo respondsTo:#preferredBounds) ifTrue:[ |
1477 (logo respondsTo:#preferredBounds) ifTrue:[ |
1478 b := logo preferredBounds. |
1478 b := logo preferredBounds. |
1479 labelWidth := b width. |
1479 labelWidth := b width. |
1480 labelHeight := b height. |
1480 labelHeight := b height. |
1481 ] ifFalse:[ |
1481 ] ifFalse:[ |
1833 ! ! |
1833 ! ! |
1834 |
1834 |
1835 !Label class methodsFor:'documentation'! |
1835 !Label class methodsFor:'documentation'! |
1836 |
1836 |
1837 version |
1837 version |
1838 ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.127 2005-11-24 16:12:10 cg Exp $' |
1838 ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.128 2007-06-22 13:30:54 stefan Exp $' |
1839 ! ! |
1839 ! ! |