Smalltalk › Frameworks & Tools › Moose

Extensible labels

_‹ Previous Topic Next Topic _›

Classic

List

Threaded

1 message

abergel

Extensible labels

Hi!

Not sure everybody is aware of it. In case you need to make your label fit in a given space portion, you can use RTExtensibleLabel.

-=-=-=-=-=-=-=-=-=-=-=-=

v := RTView new.
s := RTExtensibleLabel new.
40 timesRepeat: [

e := s elementOn: 'Hello World'.
e extent: (50 atRandom + 10) @ (50 atRandom + 10).
v add: e. ].
RTFlowLayout on: v elements.
v

-=-=-=-=-=-=-=-=-=-=-=-=

--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.

_______________________________________________
Moose-dev mailing list
[hidden email]
https://www.iam.unibe.ch/mailman/listinfo/moose-dev