--- a/UISelectionPanel.st Thu Jul 08 20:19:44 1999 +0200
+++ b/UISelectionPanel.st Thu Jul 08 22:17:11 1999 +0200
@@ -88,6 +88,7 @@
#('Menus' standardMenus)
#('Text' standardTexts)
#('Lists' standardLists)
+ #('Trees' standardTrees)
#('Groups' standardGroups)
#('Embed' standardEmbed)
#('Misc' standardMisc)
@@ -917,14 +918,10 @@
#(#WindowSpec
#label: 'Lists'
#name: 'Lists'
- #layout: #(#LayoutFrame 22 0 99 0 462 0 316 0)
- #level: 0
+ #layout: #(#LayoutFrame 61 0 96 0 501 0 313 0)
#min: #(#Point 10 10)
#max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 22 99 463 317)
- #usePreferredExtent: false
- #returnIsOKInDialog: true
- #escapeIsCancelInDialog: true
+ #bounds: #(#Rectangle 61 96 502 314)
)
#component:
#(#SpecCollection
@@ -943,19 +940,12 @@
#hasVerticalScrollBar: true
#has3Dsepartors: false
)
- #(#SelectionInTreeViewSpec
- #name: 'Tree List'
- #layout: #(#LayoutFrame 4 0 114 0 209 0 212 0)
+ #(#SelectionInListModelViewSpec
+ #name: 'New SelectionInListView'
+ #layout: #(#LayoutFrame 3 0 110 0 208 0 208 0)
#hasHorizontalScrollBar: true
#hasVerticalScrollBar: true
- #highlightMode: #line
- )
- #(#FileSelectionTreeSpec
- #name: 'File Tree List'
- #layout: #(#LayoutFrame 229 0 114 0 434 0 212 0)
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
- #highlightMode: #line
+ #useIndex: false
)
)
@@ -1302,6 +1292,62 @@
)
!
+standardTrees
+ "This resource specification was automatically generated
+ by the UIPainter of ST/X."
+
+ "Do not manually edit this!! If it is corrupted,
+ the UIPainter may not be able to read the specification."
+
+ "
+ UIPainter new openOnClass:UISelectionPanel andSelector:#standardTrees
+ UISelectionPanel new openInterface:#standardTrees
+ "
+
+ <resource: #canvas>
+
+ ^
+ #(#FullSpec
+ #name: #standardTrees
+ #window:
+ #(#WindowSpec
+ #label: 'Trees'
+ #name: 'Trees'
+ #layout: #(#LayoutFrame 61 0 96 0 501 0 313 0)
+ #min: #(#Point 10 10)
+ #max: #(#Point 1280 1024)
+ #bounds: #(#Rectangle 61 96 502 314)
+ )
+ #component:
+ #(#SpecCollection
+ #collection: #(
+ #(#SelectionInTreeViewSpec
+ #name: 'Tree List'
+ #layout: #(#LayoutFrame 4 0 3 0 209 0 101 0)
+ #hasHorizontalScrollBar: true
+ #hasVerticalScrollBar: true
+ #highlightMode: #line
+ )
+ #(#FileSelectionTreeSpec
+ #name: 'File Tree List'
+ #layout: #(#LayoutFrame 229 0 3 0 434 0 101 0)
+ #hasHorizontalScrollBar: true
+ #hasVerticalScrollBar: true
+ #highlightMode: #line
+ )
+ #(#HierarchicalListViewSpec
+ #name: 'New ModelTree List'
+ #layout: #(#LayoutFrame 4 0 110 0 209 0 208 0)
+ #hasHorizontalScrollBar: true
+ #hasVerticalScrollBar: true
+ #highlightMode: #line
+ )
+ )
+
+ )
+ )
+!
+
standardUserPanel
"this window spec was automatically generated by the ST/X UIPainter"