removed container
authorca
Sat, 21 Jun 1997 14:33:31 +0200
changeset 169 3a8b51cfb609
parent 168 8a79add2260f
child 170 bbb0a5c29671
removed container
UIPainterTreeView.st
--- a/UIPainterTreeView.st	Sat Jun 21 12:21:22 1997 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,134 +0,0 @@
-"
- COPYRIGHT (c) 1995 by Claus Gittinger
-              All Rights Reserved
-
- This software is furnished under a license and may be used
- only in accordance with the terms of that license and with the
- inclusion of the above copyright notice.   This software may not
- be provided or otherwise made available to, or used by, any
- other person.  No title to or ownership of the software is
- hereby transferred.
-"
-
-
-
-ApplicationModel subclass:#UIPainterTreeView
-	instanceVariableNames:'listHolder'
-	classVariableNames:''
-	poolDictionaries:''
-	category:'Interface-UIPainter'
-!
-
-!UIPainterTreeView class methodsFor:'documentation'!
-
-copyright
-"
- COPYRIGHT (c) 1995 by Claus Gittinger
-              All Rights Reserved
-
- This software is furnished under a license and may be used
- only in accordance with the terms of that license and with the
- inclusion of the above copyright notice.   This software may not
- be provided or otherwise made available to, or used by, any
- other person.  No title to or ownership of the software is
- hereby transferred.
-"
-
-
-!
-
-documentation
-"
-    not yet finished, not yet published, not yet released.
-"
-
-! !
-
-!UIPainterTreeView class methodsFor:'instance creation'!
-
-listHolder:aListHolder
-     |appl|
-
-     appl := UIPainterTreeView new.
-     appl listHolder:aListHolder.
-     appl openInterface:#windowSpec.
-   ^ appl
-
-! !
-
-!UIPainterTreeView class methodsFor:'interface specs'!
-
-windowSpec
-    "this window spec was automatically generated by the ST/X UIPainter"
-
-    "do not manually edit this - the painter/builder may not be able to
-     handle the specification if its corrupted."
-
-    "
-     UIPainter new openOnClass:UIPainterTreeView andSelector:#windowSpec
-     UIPainterTreeView new openInterface:#windowSpec
-    "
-
-    <resource: #canvas>
-
-    ^
-     
-       #(#FullSpec
-          #'window:' 
-           #(#WindowSpec
-              #'name:' 'treeView'
-              #'layout:' #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
-              #'label:' 'Tree-View'
-              #'bounds:' #(#Rectangle 0 0 192 479)
-          )
-          #'component:' 
-           #(#SpecCollection
-              #'collection:' 
-               #(
-                 #(#SequenceViewSpec
-                    #'name:' 'selectionInList'
-                    #'layout:' #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
-                    #'menu:' #listMenu
-                    #'model:' #listHolder
-                    #'callbacksSpec:' 
-                     #(#UIEventCallbackSubSpec
-                        #'doubleClickSelector:' #doubleClick
-                    )
-                    #'hasHorizontalScrollBar:' true
-                    #'hasVerticalScrollBar:' true
-                    #'miniScrollerHorizontal:' false
-                    #'miniScrollerVertical:' false
-                    #'isMultiSelect:' true
-                )
-              )
-          )
-      )
-! !
-
-!UIPainterTreeView methodsFor:'aspects'!
-
-doubleClick
-    listHolder selectGroup
-!
-
-listHolder
-    ^ listHolder
-
-!
-
-listHolder:aListHolder
-    listHolder := aListHolder
-!
-
-listMenu
-    "returns a block which returns the menu
-    "
-    ^ [listHolder painter menu]
-! !
-
-!UIPainterTreeView class methodsFor:'documentation'!
-
-version
-    ^ '$Header$'
-
-! !