equal
deleted
inserted
replaced
1471 ]. |
1471 ]. |
1472 ]. |
1472 ]. |
1473 ^ m |
1473 ^ m |
1474 ! ! |
1474 ! ! |
1475 |
1475 |
|
1476 !Label methodsFor:'native widget support'! |
|
1477 |
|
1478 nativeWindowType |
|
1479 "return a symbol describing my native window type |
|
1480 (may be used internally by the device as a native window creation hint)" |
|
1481 |
|
1482 self class == Label ifTrue:[ |
|
1483 ^ #Label |
|
1484 ]. |
|
1485 ^ nil |
|
1486 ! ! |
|
1487 |
1476 !Label methodsFor:'others'! |
1488 !Label methodsFor:'others'! |
1477 |
1489 |
1478 rawLabelSizeOf:aLogo |
1490 rawLabelSizeOf:aLogo |
1479 "compute the extent needed to hold aLogo; aForm or aString" |
1491 "compute the extent needed to hold aLogo; aForm or aString" |
1480 |
1492 |
1957 ! ! |
1969 ! ! |
1958 |
1970 |
1959 !Label class methodsFor:'documentation'! |
1971 !Label class methodsFor:'documentation'! |
1960 |
1972 |
1961 version |
1973 version |
1962 ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.153 2014-02-18 16:46:07 stefan Exp $' |
1974 ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.154 2014-08-03 12:28:17 cg Exp $' |
1963 ! |
1975 ! |
1964 |
1976 |
1965 version_CVS |
1977 version_CVS |
1966 ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.153 2014-02-18 16:46:07 stefan Exp $' |
1978 ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.154 2014-08-03 12:28:17 cg Exp $' |
1967 ! ! |
1979 ! ! |
1968 |
1980 |