[noob] Making a PasteUpMorph morph fill its container

Lic. Edgar J. De Cleene edgardec2001 at yahoo.com.ar
Sun Sep 25 13:03:17 UTC 2005


Steve:
I always used the same technic what Matej before, only variation could be
embed into Morph first as in:

BigWindow
³ You wish really big complex scrolling Morphs ? ³
| fondoA t aWindow m p s |
fondoA := Morph new.
    fondoA extent: 10000 @ 10000.
    fondoA color: Color paleYellow.
    t := TwoWayScrollPane new.
    t scroller addMorph: fondoA.
    aWindow := (SystemWindow labelled: 'Squeak - Mapa de Clases')
                model: nil.
    aWindow
        bounds: (fondoA position - (0 @ aWindow labelHeight + aWindow
borderWidth) corner: fondoA bottomRight + aWindow borderWidth).
    aWindow
        addMorph: t
        frame: (0 @ 0 extent: 1 @ 1).
    aWindow color: Color paleOrange.
    aWindow openCenteredInWorld.
p:= 0 at 0.

    99
        timesRepeat: [m := Morph new.
            m extent: 100 @ 100.
            m position: p.
            p := p + (100 @ 100) asPoint.
            s := StringMorph new.
            s contents: p asString.
            m addMorphCentered: s.
            fondoA addMorph: m].
^fondoA.

But searching morphic building examples in image , I think you should look
at:
NebraskaServerMorph

Hope this help.

Edgar
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20050925/72b50b28/attachment.htm


More information about the Squeak-dev mailing list