"Trygve Reenskaug" <trygver at ifi.uio.no> wrote
<snip>
> I want to display a number of pictures on aForm scaled and moved to fit
> within given rectangles.
</snip>
<snip>
> Here's the code. The resulting red and blue rectangles are o different in
> both size and position.
>
>
> buildObjectsCompositeForm2
>     " R23CompositeMorph buildObjectsCompositeForm2 "
>     | form frames |
>     frames :=  { 6 at 2   corner: 449 at 238.
>                186 at 210 corner: 434 at 390.
>                505 at 218 corner: 653 at 388. }.
>     form := Form extent:  700 at 500 depth: 8.
>     form fillWithColor: Color yellow.
>    frames  do:
>        [:frame || subForm |
>        subForm := Form extent: frame extent depth: 8.
>        subForm fillWithColor: Color red.
>        subForm
>           displayOn: form
>           transformation:
>              (WindowingTransformation window: subForm boundingBox
viewport:
> frame)
>           clippingBox: (form boundingBox)].
>    frames  do:
>        [:frame || subForm |
>        subForm := Form extent: frame extent * 2 depth: 8.
>        subForm fillWithColor: Color blue.
>        subForm
>           displayOn: form
>           transformation:
>              (WindowingTransformation window: subForm boundingBox
viewport:
> frame)
>           clippingBox: (form boundingBox)].
>
>     form displayAt: 10 at 10.
>

#displayOn:transformation:clippingBox:
is inherited from DisplayObject, it calls

Form>>displayOn: transformation:clippingBox:
align:with:rule:fuillColor.

I think the align:with: is not what you need. At this
moment I fell myself unable to give you an example
where the alignment is helpful.
.
For better results, please try
  subForm
   displayOn: form
          transformation:
             (WindowingTransformation window: subForm boundingBox viewport:
frame)
          clippingBox: (form boundingBox)
          align: 0 at 0
          with: 0 at 0
          rule: Form over
          fillColor: nil


Greetings, Boris