# HG changeset patch # User Claus Gittinger # Date 860453208 -7200 # Node ID 105fe34f32bcf794d692c5f548eee65952357ee1 # Parent 6c3ff07212486cce60ff91249cdfc159d9d12d6f checkin from browser diff -r 6c3ff0721248 -r 105fe34f32bc UISelectionPanel.st --- a/UISelectionPanel.st Mon Apr 07 17:49:18 1997 +0200 +++ b/UISelectionPanel.st Tue Apr 08 00:46:48 1997 +0200 @@ -544,68 +544,6 @@ ) ! -textSpec - "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:UISelectionPanel andSelector:#textSpec - UISelectionPanel new openInterface:#textSpec - " - - - - ^ - - #(#FullSpec - #'window:' - #(#WindowSpec - #'name:' 'uIPainterView' - #'layout:' #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0) - #'label:' 'unnamed' - #'bounds:' #(#Rectangle 0 0 450 100) - ) - #'component:' - #(#SpecCollection - #'collection:' - #( - #(#InputFieldSpec - #'name:' 'EditField' - #'layout:' #(#LayoutFrame 13 0 11 0 117 0 29 0) - #'immediateAccept:' false - #'acceptOnLeave:' true - #'acceptOnReturn:' true - #'acceptOnTab:' true - #'acceptOnLostFocus:' true - #'hasBorder:' false - ) - #(#TextEditorSpec - #'name:' 'EditTextView' - #'layout:' #(#LayoutFrame 171 0 11 0 275 0 91 0) - ) - #(#SequenceViewSpec - #'name:' 'SelectionInListView' - #'layout:' #(#LayoutFrame 329 0 11 0 433 0 91 0) - #'hasHorizontalScrollBar:' true - #'hasVerticalScrollBar:' true - ) - #(#LabelSpec - #'name:' 'Text Label' - #'layout:' #(#LayoutFrame 13 0 41 0 117 0 57 0) - #'label:' 'Text Label' - #'initiallyInvisible:' false - #'translateLabel:' false - #'level:' 0 - #'adjust:' #center - #'hasCharacterOrientedLabel:' true - ) - ) - ) - ) -! - viewsSpec "this window spec was automatically generated by the ST/X UIPainter" @@ -691,6 +629,88 @@ ) ! ! +!UISelectionPanel class methodsFor:'interface specs'! + +textSpec + "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:UISelectionPanel andSelector:#textSpec + UISelectionPanel new openInterface:#textSpec + " + + + + ^ + + #(#FullSpec + #'window:' + #(#WindowSpec + #'name:' 'uIPainterView' + #'layout:' #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0) + #'label:' 'unnamed' + #'bounds:' #(#Rectangle 0 0 573 264) + ) + #'component:' + #(#SpecCollection + #'collection:' + #( + #(#InputFieldSpec + #'name:' 'EditField' + #'layout:' #(#LayoutFrame 13 0 11 0 117 0 33 0) + #'immediateAccept:' false + #'acceptOnLeave:' true + #'acceptOnReturn:' true + #'acceptOnTab:' true + #'acceptOnLostFocus:' true + #'hasBorder:' false + ) + #(#LabelSpec + #'name:' 'Text Label' + #'layout:' #(#LayoutFrame 13 0 41 0 117 0 57 0) + #'label:' 'Text Label' + #'initiallyInvisible:' false + #'translateLabel:' false + #'level:' 0 + #'adjust:' #center + #'hasCharacterOrientedLabel:' true + ) + #(#TextEditorSpec + #'name:' 'EditTextView' + #'layout:' #(#LayoutFrame 127 0 11 0 231 0 91 0) + #'hasHorizontalScrollBar:' true + #'hasVerticalScrollBar:' true + ) + #(#TextEditorSpec + #'name:' 'EditTextView miniH' + #'layout:' #(#LayoutFrame 243 0 11 0 347 0 91 0) + #'hasHorizontalScrollBar:' true + #'hasVerticalScrollBar:' true + #'miniScrollerHorizontal:' true + ) + #(#SequenceViewSpec + #'name:' 'SelectionInListView miniH' + #'layout:' #(#LayoutFrame 243 0 122 0 347 0 202 0) + #'hasHorizontalScrollBar:' true + #'hasVerticalScrollBar:' true + #'miniScrollerHorizontal:' true + ) + #(#SequenceViewSpec + #'name:' 'SelectionInListView' + #'layout:' #(#LayoutFrame 127 0 122 0 231 0 202 0) + #'hasHorizontalScrollBar:' true + #'hasVerticalScrollBar:' true + ) + ) + ) + ) + + "Modified: 8.4.1997 / 00:19:25 / cg" +! ! + !UISelectionPanel methodsFor:'accessing'! labels:labels selectors:selectors receiver:receiver