Squeak
  links to this page:    
View this PageEdit this PageUploads to this PageHistory of this PageTop of the SwikiRecent ChangesSearch the SwikiHelp Guide
AlignmentMorph newColumn example with EllipseMorph
Last updated at 10:04 am UTC on 31 August 2017
 | m m1 m2 m3 |
 m := AlignmentMorph newColumn cellPositioning: #topLeft; color: Color gray.


 m1 := EllipseMorph new extent: 70@70; color: Color red.
 m addMorphBack: m1.

 m2 := EllipseMorph new extent: 70@70; color: Color orange.
 m addMorphBack: m2.

 m3 := EllipseMorph new extent: 70@70; color: Color green.
 m addMorphBack: m3.

PNGReadWriter
	putForm: m imageForm 
	onFileNamed: 'myImage.png'.
	
m openInHand.