equal
deleted
inserted
replaced
9 |
9 |
10 !UIPainter class methodsFor:'documentation'! |
10 !UIPainter class methodsFor:'documentation'! |
11 |
11 |
12 documentation |
12 documentation |
13 " |
13 " |
14 not yet finished, not yet published, not yet released. |
14 GUI-Builder: |
|
15 this class allows the user to build its own applications providing a graphical |
|
16 user interface to buildin components and to define the behavior of the components |
|
17 during runtime. The resulting specifications can be installed as methods on |
|
18 classes, typically subclasses of an ApplicationModel. These specifications |
|
19 are used by the UIBuilder to generate the application window and its component |
|
20 structues when open the application. |
15 |
21 |
16 [start with:] |
22 [start with:] |
17 UIPainter open |
23 UIPainter open |
|
24 |
|
25 [see also:] |
|
26 UIBuilder |
|
27 ApplicationModel |
|
28 UISpecification |
18 " |
29 " |
19 |
30 |
20 ! ! |
31 ! ! |
21 |
32 |
22 !UIPainter class methodsFor:'instance creation'! |
33 !UIPainter class methodsFor:'instance creation'! |
359 #(#FullSpec |
370 #(#FullSpec |
360 #'window:' |
371 #'window:' |
361 #(#WindowSpec |
372 #(#WindowSpec |
362 #'name:' 'uIPainterView' |
373 #'name:' 'uIPainterView' |
363 #'layout:' #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0) |
374 #'layout:' #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0) |
364 #'label:' 'unnamed' |
375 #'label:' 'unnamed canvas' |
365 #'bounds:' #(#Rectangle 0 0 300 223) |
376 #'bounds:' #(#Rectangle 0 0 300 223) |
366 ) |
377 ) |
367 #'component:' |
378 #'component:' |
368 #(#SpecCollection |
379 #(#SpecCollection |
369 #'collection:' |
380 #'collection:' |
1003 (specSelector notNil ifTrue:[specSelector] |
1014 (specSelector notNil ifTrue:[specSelector] |
1004 ifFalse:[#windowSpec]) asValue |
1015 ifFalse:[#windowSpec]) asValue |
1005 ). |
1016 ). |
1006 |
1017 |
1007 painterView := StandardSystemView new. |
1018 painterView := StandardSystemView new. |
1008 painterView label:'unnamed'. |
1019 painterView label:'unnamed canvas'. |
1009 painterView extent:300@300. |
1020 painterView extent:300@300. |
1010 |
1021 |
1011 painter := UIPainterView in:painterView. |
1022 painter := UIPainterView in:painterView. |
1012 painter layout:(0.0 @ 0.0 corner:1.0 @ 1.0) asLayout. |
1023 painter layout:(0.0 @ 0.0 corner:1.0 @ 1.0) asLayout. |
1013 |
1024 |