links to this page:    
View this PageEdit this PageUploads to this PageHistory of this PageTop of the SwikiRecent ChangesSearch the SwikiHelp Guide
Last updated at 2:15 am UTC on 15 September 2016
 	| window scrollPane pasteUpMorph point textMorph |
 	window := SystemWindow new.
 	scrollPane := ScrollPane new.
 	pasteUpMorph := PasteUpMorph new.
 	pasteUpMorph extent: 1000@1000.
 	scrollPane scroller addMorph: pasteUpMorph.
 	window addMorph: scrollPane frame: (0@0 corner: 1@1).
 	0 to: 1000 by: 100 do: 
 		[:x | 0 to: 1000 by: 100 do:
 			[:y |
 				point :=  x@y.
 				textMorph := TextMorph new contents: point asString.
 				textMorph position: point.
 				pasteUpMorph addMorph: textMorph
 	window openInWorld.

Views on a map
Recipe: Create a window with scrollable contents