# HG changeset patch # User ca # Date 867427906 -7200 # Node ID bb569079ae6be645fcf04655ade266544ea7386a # Parent 8091a35bccf161c8b9b1151b3e0512023d5f9636 add ArbitraryComponentSpec diff -r 8091a35bccf1 -r bb569079ae6b UISelectionPanel.st --- a/UISelectionPanel.st Fri Jun 27 18:11:19 1997 +0200 +++ b/UISelectionPanel.st Fri Jun 27 18:11:46 1997 +0200 @@ -874,7 +874,7 @@ #(#LabelSpec #'name:' 'Text Label' #'layout:' #(#LayoutFrame 20 0 128 0 199 0 150 0) - #'label:' '' + #'label:' 'Label' ) #(#TextEditorSpec #'name:' 'EditTextView' @@ -933,19 +933,6 @@ #'resizeForLabel:' true #'canUIDrag:' false ) - #(#LabelSpec - #'name:' 'labelInLabel' - #'layout:' #(#AlignmentOrigin 24 0 139 0 0 0.5) - #'label:' 'Label' - #'style:' - #(#FontDescription - #helvetica #medium - #roman #'10' - ) - #'adjust:' #left - #'resizeForLabel:' true - #'canUIDrag:' false - ) ) ) ) @@ -1063,15 +1050,22 @@ #'resizeForLabel:' true #'canUIDrag:' false ) + #(#ArbitraryComponentSpec + #'name:' 'ArbitraryComponent' + #'layout:' #(#LayoutFrame 278 0 14 0 392 0 94 0) + #'hasHorizontalScrollBar:' false + #'hasVerticalScrollBar:' false + #'hasBorder:' false + ) #(#RegionSpec #'name:' 'Region' - #'layout:' #(#LayoutFrame 278 0 14 0 358 0 94 0) + #'layout:' #(#LayoutFrame 146 0 107 0 211 0 172 0) #'lineWidth:' 2 #'regionType:' #ellipse ) #(#LabelSpec #'name:' 'RegionLabel' - #'layout:' #(#AlignmentOrigin 319 0 54 0 0.5 0.5) + #'layout:' #(#AlignmentOrigin 181 0 140 0 0.5 0.5) #'label:' 'Region' #'style:' #(#FontDescription @@ -1081,6 +1075,19 @@ #'resizeForLabel:' true #'canUIDrag:' false ) + #(#LabelSpec + #'name:' 'ArbitraryComponentLabel' + #'layout:' #(#AlignmentOrigin 284 0 20 0 0 0) + #'label:' 'ArbitraryComponent' + #'style:' + #(#FontDescription + #helvetica #medium + #roman #'10' + ) + #'adjust:' #left + #'resizeForLabel:' true + #'canUIDrag:' false + ) ) ) ) @@ -1465,5 +1472,4 @@ version ^ '$Header$' - ! !