Hi Sean,
the thing is clipped. as you can see here:
morph := Morph new
                topLeft: 200@400;
                openInWorld.
outputRect := (0@0) corner: (250.0@220.0).
        canvas := Display defaultCanvasClass extent: outputRect extent depth:
Display depth.
        scale := 0.5.
        t := MorphicTransform offset: outputRect topLeft angle: 0 scale: scale.
        clipRect := outputRect translateBy: outputRect topLeft negated.
        canvas transformBy: t clippingTo: clipRect during: [ :aCanvas |
                aCanvas fullDrawMorph: morph ].
        canvas form asMorph openInWindow.

werner

Reply via email to