--- a/SimpleView.st Fri Feb 24 13:56:48 2006 +0100
+++ b/SimpleView.st Fri Feb 24 13:58:39 2006 +0100
@@ -501,7 +501,7 @@
an MDI child:
[exBegin]
- |top v|
+ |top v1 v2|
top := StandardSystemView new.
top extent:450 @ 300.
@@ -509,12 +509,17 @@
top beMDIClientView.
top open.
- v := View new.
- v viewBackground:Color red.
- v origin:50 @ 50 corner:150 @ 100.
- v beMDIChildView.
-
- top addSubView:v.
+ v1 := View new.
+ v1 viewBackground:Color red.
+ v1 origin:50 @ 50 corner:150 @ 100.
+ v1 beMDIChildView.
+ top addSubView:v1.
+
+ v2 := View new.
+ v2 viewBackground:Color green.
+ v2 origin:50 @ 50 corner:150 @ 100.
+ v2 beMDIChildView.
+ top addSubView:v2.
[exEnd]
"
!
@@ -9738,7 +9743,7 @@
!SimpleView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.544 2006-02-24 12:56:48 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.545 2006-02-24 12:58:39 cg Exp $'
! !
SimpleView initialize!