# HG changeset patch # User ca # Date 864644802 -7200 # Node ID 95070ea7ae4295d678e9637fd56c4c238eefeb64 # Parent cf76b1df047343e5ce1dcedf3b7d4725e6f3fbe6 update layout from view diff -r cf76b1df0473 -r 95070ea7ae42 UIPainter.st --- a/UIPainter.st Mon May 26 13:00:29 1997 +0200 +++ b/UIPainter.st Mon May 26 13:06:42 1997 +0200 @@ -11,10 +11,21 @@ documentation " - not yet finished, not yet published, not yet released. + GUI-Builder: + this class allows the user to build its own applications providing a graphical + user interface to buildin components and to define the behavior of the components + during runtime. The resulting specifications can be installed as methods on + classes, typically subclasses of an ApplicationModel. These specifications + are used by the UIBuilder to generate the application window and its component + structues when open the application. [start with:] UIPainter open + + [see also:] + UIBuilder + ApplicationModel + UISpecification " ! ! @@ -361,7 +372,7 @@ #(#WindowSpec #'name:' 'uIPainterView' #'layout:' #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0) - #'label:' 'unnamed' + #'label:' 'unnamed canvas' #'bounds:' #(#Rectangle 0 0 300 223) ) #'component:' @@ -1005,7 +1016,7 @@ ). painterView := StandardSystemView new. - painterView label:'unnamed'. + painterView label:'unnamed canvas'. painterView extent:300@300. painter := UIPainterView in:painterView.