--- a/UILayoutTool.st Wed Sep 04 21:52:31 2013 +0200
+++ b/UILayoutTool.st Wed Sep 04 21:52:50 2013 +0200
@@ -191,161 +191,165 @@
<resource: #canvas>
^
- #(FullSpec
- name: layoutOriginSpec
- window:
- (WindowSpec
- label: 'UILayoutTool'
- name: 'UILayoutTool'
- min: (Point 10 10)
- bounds: (Rectangle 0 0 345 107)
- )
- component:
- (SpecCollection
- collection: (
- (FramedBoxSpec
- label: 'Origin'
- name: 'FramedBox'
- layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 108 0)
- labelPosition: topLeft
- translateLabel: true
- component:
- (SpecCollection
- collection: (
- (LabelSpec
- label: 'Relative:'
- name: 'labelRelative'
- layout: (Point 103 6)
- translateLabel: true
- )
- (LabelSpec
- label: 'Offset:'
- name: 'labelAbsolute'
- layout: (Point 203 6)
- translateLabel: true
- )
- (LabelSpec
- label: 'Left:'
- name: 'labelLeft'
- layout: (AlignmentOrigin 68 0 27 0 1 0)
- translateLabel: true
- )
- (ActionButtonSpec
- label: 'imageFractX'
- name: 'actionRelativeLeft'
- layout: (LayoutFrame 77 0 24 0 99 0 46 0)
- activeHelpKey: makeLeftRelative
- hasCharacterOrientedLabel: false
- tabable: true
- model: relativeLeft
- )
- (InputFieldSpec
- name: 'fieldLeftFraction'
- layout: (LayoutFrame 102 0 25 0 152 0 47 0)
- activeHelpKey: leftRelative
- tabable: true
- model: leftFraction
- group: inputGroup
- type: numberOrNil
- acceptChannel: acceptChannel
- modifiedChannel: modifiedChannel
- acceptOnPointerLeave: false
- )
- (ActionButtonSpec
- label: 'imageAbsX'
- name: 'actionAbsoluteLeft'
- layout: (LayoutFrame 178 0 24 0 200 0 46 0)
- activeHelpKey: makeLeftAbsolute
- hasCharacterOrientedLabel: false
- tabable: true
- model: absoluteLeft
- )
- (InputFieldSpec
- name: 'fieldLeftOffset'
- layout: (LayoutFrame 203 0 24 0 253 0 46 0)
- activeHelpKey: leftAbsolute
- tabable: true
- model: leftOffset
- group: inputGroup
- type: numberOrNil
- acceptChannel: acceptChannel
- modifiedChannel: modifiedChannel
- acceptOnPointerLeave: false
- )
- (ActionButtonSpec
- label: 'imageAbsXFromRight'
- name: 'actionRightRelativeLeft'
- layout: (LayoutFrame 257 0 24 0 279 0 46 0)
- activeHelpKey: makeLeftRelativeFromRight
- hasCharacterOrientedLabel: false
- tabable: true
- model: rightRelativeLeft
- )
- (LabelSpec
- label: 'Top:'
- name: 'labelTop'
- layout: (AlignmentOrigin 68 0 54 0 1 0)
- translateLabel: true
- )
- (ActionButtonSpec
- label: 'imageFractY'
- name: 'actionRelativeTop'
- layout: (LayoutFrame 77 0 51 0 99 0 73 0)
- activeHelpKey: makeTopRelative
- hasCharacterOrientedLabel: false
- tabable: true
- model: relativeTop
- )
- (InputFieldSpec
- name: 'fieldTopFraction'
- layout: (LayoutFrame 103 0 51 0 153 0 73 0)
- activeHelpKey: topRelative
- tabable: true
- model: topFraction
- group: inputGroup
- type: numberOrNil
- acceptChannel: acceptChannel
- modifiedChannel: modifiedChannel
- acceptOnPointerLeave: false
- )
- (ActionButtonSpec
- label: 'imageAbsY'
- name: 'actionAbsoluteTop'
- layout: (LayoutFrame 178 0 51 0 200 0 73 0)
- activeHelpKey: makeTopAbsolute
- hasCharacterOrientedLabel: false
- tabable: true
- model: absoluteTop
- )
- (InputFieldSpec
- name: 'fieldTopOffset'
- layout: (LayoutFrame 203 0 51 0 253 0 73 0)
- activeHelpKey: topAbsolute
- tabable: true
- model: topOffset
- group: inputGroup
- type: numberOrNil
- acceptChannel: acceptChannel
- modifiedChannel: modifiedChannel
- acceptOnPointerLeave: false
- )
- (ActionButtonSpec
- label: 'imageAbsYFromBottom'
- name: 'actionBottomRelativeTop'
- layout: (LayoutFrame 257 0 51 0 279 0 73 0)
- activeHelpKey: makeTopRelativeFromBottom
- hasCharacterOrientedLabel: false
- tabable: true
- model: bottomRelativeTop
- )
+ #(FullSpec
+ name: layoutOriginSpec
+ window:
+ (WindowSpec
+ label: 'UILayoutTool'
+ name: 'UILayoutTool'
+ min: (Point 10 10)
+ bounds: (Rectangle 0 0 345 107)
+ )
+ component:
+ (SpecCollection
+ collection: (
+ (FramedBoxSpec
+ label: 'Origin'
+ name: 'FramedBox'
+ layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 108 0)
+ labelPosition: topLeft
+ translateLabel: true
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Relative:'
+ name: 'labelRelative'
+ layout: (Point 103 6)
+ translateLabel: true
+ )
+ (LabelSpec
+ label: 'Offset:'
+ name: 'labelAbsolute'
+ layout: (Point 203 6)
+ translateLabel: true
+ )
+ (LabelSpec
+ label: 'Left:'
+ name: 'labelLeft'
+ layout: (AlignmentOrigin 68 0 27 0 1 0)
+ translateLabel: true
+ )
+ (ActionButtonSpec
+ label: 'imageFractX'
+ name: 'actionRelativeLeft'
+ layout: (LayoutFrame 77 0 24 0 99 0 46 0)
+ activeHelpKey: makeLeftRelative
+ hasCharacterOrientedLabel: false
+ tabable: true
+ model: relativeLeft
+ )
+ (InputFieldSpec
+ name: 'fieldLeftFraction'
+ layout: (LayoutFrame 102 0 25 0 152 0 47 0)
+ activeHelpKey: leftRelative
+ tabable: true
+ model: leftFraction
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: true
+ )
+ (ActionButtonSpec
+ label: 'imageAbsX'
+ name: 'actionAbsoluteLeft'
+ layout: (LayoutFrame 178 0 24 0 200 0 46 0)
+ activeHelpKey: makeLeftAbsolute
+ hasCharacterOrientedLabel: false
+ tabable: true
+ model: absoluteLeft
)
-
- )
- )
+ (InputFieldSpec
+ name: 'fieldLeftOffset'
+ layout: (LayoutFrame 203 0 24 0 253 0 46 0)
+ activeHelpKey: leftAbsolute
+ tabable: true
+ model: leftOffset
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: true
+ )
+ (ActionButtonSpec
+ label: 'imageAbsXFromRight'
+ name: 'actionRightRelativeLeft'
+ layout: (LayoutFrame 257 0 24 0 279 0 46 0)
+ activeHelpKey: makeLeftRelativeFromRight
+ hasCharacterOrientedLabel: false
+ tabable: true
+ model: rightRelativeLeft
+ )
+ (LabelSpec
+ label: 'Top:'
+ name: 'labelTop'
+ layout: (AlignmentOrigin 68 0 54 0 1 0)
+ translateLabel: true
+ )
+ (ActionButtonSpec
+ label: 'imageFractY'
+ name: 'actionRelativeTop'
+ layout: (LayoutFrame 77 0 51 0 99 0 73 0)
+ activeHelpKey: makeTopRelative
+ hasCharacterOrientedLabel: false
+ tabable: true
+ model: relativeTop
+ )
+ (InputFieldSpec
+ name: 'fieldTopFraction'
+ layout: (LayoutFrame 103 0 51 0 153 0 73 0)
+ activeHelpKey: topRelative
+ tabable: true
+ model: topFraction
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: true
+ )
+ (ActionButtonSpec
+ label: 'imageAbsY'
+ name: 'actionAbsoluteTop'
+ layout: (LayoutFrame 178 0 51 0 200 0 73 0)
+ activeHelpKey: makeTopAbsolute
+ hasCharacterOrientedLabel: false
+ tabable: true
+ model: absoluteTop
+ )
+ (InputFieldSpec
+ name: 'fieldTopOffset'
+ layout: (LayoutFrame 203 0 51 0 253 0 73 0)
+ activeHelpKey: topAbsolute
+ tabable: true
+ model: topOffset
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: true
+ )
+ (ActionButtonSpec
+ label: 'imageAbsYFromBottom'
+ name: 'actionBottomRelativeTop'
+ layout: (LayoutFrame 257 0 51 0 279 0 73 0)
+ activeHelpKey: makeTopRelativeFromBottom
+ hasCharacterOrientedLabel: false
+ tabable: true
+ model: bottomRelativeTop
+ )
+ )
+
+ )
)
-
- )
- )
+ )
+
+ )
+ )
!
layoutPointSpec
@@ -363,71 +367,73 @@
<resource: #canvas>
^
- #(FullSpec
- name: layoutPointSpec
- window:
- (WindowSpec
- label: 'UILayoutTool'
- name: 'UILayoutTool'
- min: (Point 10 10)
- bounds: (Rectangle 14 46 292 170)
- )
- component:
- (SpecCollection
- collection: (
- (FramedBoxSpec
- label: 'Origin'
- name: 'FramedBox'
- layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 94 0)
- labelPosition: topLeft
- translateLabel: true
- component:
- (SpecCollection
- collection: (
- (LabelSpec
- label: 'Left:'
- name: 'labelOriginY'
- layout: (AlignmentOrigin 83 0 14 0 1 0)
- translateLabel: true
- )
- (InputFieldSpec
- name: 'fieldOriginX'
- layout: (LayoutFrame 85 0 11 0 135 0 33 0)
- activeHelpKey: originX
- tabable: true
- model: leftOffset
- group: inputGroup
- type: numberOrNil
- acceptChannel: acceptChannel
- modifiedChannel: modifiedChannel
- acceptOnPointerLeave: false
- )
- (LabelSpec
- label: 'Top:'
- name: 'labelOriginX'
- layout: (AlignmentOrigin 83 0 39 0 1 0)
- translateLabel: true
- )
- (InputFieldSpec
- name: 'fieldOriginY'
- layout: (LayoutFrame 85 0 36 0 135 0 58 0)
- activeHelpKey: originY
- tabable: true
- model: topOffset
- group: inputGroup
- type: numberOrNil
- acceptChannel: acceptChannel
- modifiedChannel: modifiedChannel
- acceptOnPointerLeave: false
- )
+ #(FullSpec
+ name: layoutPointSpec
+ window:
+ (WindowSpec
+ label: 'UILayoutTool'
+ name: 'UILayoutTool'
+ min: (Point 10 10)
+ bounds: (Rectangle 0 0 278 124)
+ )
+ component:
+ (SpecCollection
+ collection: (
+ (FramedBoxSpec
+ label: 'Origin'
+ name: 'FramedBox'
+ layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 94 0)
+ labelPosition: topLeft
+ translateLabel: true
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Left:'
+ name: 'labelOriginY'
+ layout: (AlignmentOrigin 83 0 14 0 1 0)
+ translateLabel: true
)
-
- )
- )
+ (InputFieldSpec
+ name: 'fieldOriginX'
+ layout: (LayoutFrame 85 0 11 0 135 0 33 0)
+ activeHelpKey: originX
+ tabable: true
+ model: leftOffset
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: true
+ )
+ (LabelSpec
+ label: 'Top:'
+ name: 'labelOriginX'
+ layout: (AlignmentOrigin 83 0 39 0 1 0)
+ translateLabel: true
+ )
+ (InputFieldSpec
+ name: 'fieldOriginY'
+ layout: (LayoutFrame 85 0 36 0 135 0 58 0)
+ activeHelpKey: originY
+ tabable: true
+ model: topOffset
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: true
+ )
+ )
+
+ )
)
-
- )
- )
+ )
+
+ )
+ )
!
slices
@@ -1128,162 +1134,162 @@
<resource: #canvas>
^
- #(FullSpec
- name: windowSpec
- window:
- (WindowSpec
- label: 'UILayoutTool-AlignmentOrigin'
- name: 'UILayoutTool-AlignmentOrigin'
- min: (Point 10 10)
- bounds: (Rectangle 0 0 405 220)
- )
- component:
- (SpecCollection
- collection: (
- (UISubSpecification
- name: 'layoutOriginSpec'
- layout: (LayoutFrame 1 0.0 6 0 0 1.0 111 0)
- majorKey: UILayoutTool
- minorKey: layoutOriginSpec
- )
- (FramedBoxSpec
- label: 'Alignment'
- name: 'FramedBox'
- layout: (LayoutFrame 1 0.0 113 0 0 1.0 215 0)
- labelPosition: topLeft
- translateLabel: true
- component:
- (SpecCollection
- collection: (
- (LabelSpec
- label: 'Horizontal:'
- name: 'alignHLabel'
- layout: (AlignmentOrigin 88 0 17 0 1 0)
- translateLabel: true
- adjust: right
- )
- (InputFieldSpec
- name: 'leftAlignmentFractionField'
- layout: (LayoutFrame 90 0 14 0 147 0 36 0)
- activeHelpKey: alignHorizontal
- tabable: true
- model: leftAlignmentFraction
- group: inputGroup
- type: numberOrNil
- acceptOnLostFocus: true
- acceptChannel: acceptChannel
- modifiedChannel: modifiedChannel
- acceptOnPointerLeave: false
- )
- (LabelSpec
- label: 'Vertical:'
- name: 'alignVLabel'
- layout: (AlignmentOrigin 88 0 43 0 1 0)
- translateLabel: true
- adjust: right
- )
- (InputFieldSpec
- name: 'topAlignmentFractionField'
- layout: (LayoutFrame 90 0 40 0 147 0 62 0)
- activeHelpKey: alignVertical
- tabable: true
- model: topAlignmentFraction
- group: inputGroup
- type: numberOrNil
- acceptOnLostFocus: true
- acceptChannel: acceptChannel
- modifiedChannel: modifiedChannel
- acceptOnPointerLeave: false
- )
- (DividerSpec
- name: 'separator1'
- layout: (LayoutFrame 204 0 19 0 245 0 22 0)
- )
- (DividerSpec
- name: 'separator2'
- layout: (LayoutFrame 204 0 55 0 245 0 58 0)
- )
- (DividerSpec
- name: 'separator3'
- layout: (LayoutFrame 196 0 28 0 199 0 50 0)
- orientation: vertical
- )
- (DividerSpec
- name: 'separator4'
- layout: (LayoutFrame 250 0 28 0 253 0 50 0)
- orientation: vertical
- )
- (ActionButtonSpec
- name: 'alignTopLeft'
- layout: (LayoutFrame 190 0 14 0 204 0 28 0)
- activeHelpKey: alignTopLeft
- tabable: true
- model: alignTopLeft
- )
- (ActionButtonSpec
- name: 'alignTopCenter'
- layout: (LayoutFrame 217 0 14 0 231 0 28 0)
- activeHelpKey: alignTopCenter
- tabable: true
- model: alignTopCenter
- )
- (ActionButtonSpec
- name: 'alignTopRight'
- layout: (LayoutFrame 245 0 14 0 259 0 28 0)
- activeHelpKey: alignTopRight
- tabable: true
- model: alignTopRight
- )
- (ActionButtonSpec
- name: 'alignLeftCenter'
- layout: (LayoutFrame 190 0 32 0 204 0 46 0)
- activeHelpKey: alignLeftCenter
- tabable: true
- model: alignLeftCenter
- )
- (ActionButtonSpec
- name: 'alignCenter'
- layout: (LayoutFrame 217 0 32 0 231 0 46 0)
- activeHelpKey: alignCenter
- tabable: true
- model: alignCenter
- )
- (ActionButtonSpec
- name: 'alignRightCenter'
- layout: (LayoutFrame 245 0 32 0 259 0 46 0)
- activeHelpKey: alignRightCenter
- tabable: true
- model: alignRightCenter
- )
- (ActionButtonSpec
- name: 'alignBottomLeft'
- layout: (LayoutFrame 190 0 50 0 204 0 64 0)
- activeHelpKey: alignBottomLeft
- tabable: true
- model: alignBottomLeft
- )
- (ActionButtonSpec
- name: 'alignBottomCenter'
- layout: (LayoutFrame 217 0 50 0 231 0 64 0)
- activeHelpKey: alignBottomCenter
- tabable: true
- model: alignBottomCenter
- )
- (ActionButtonSpec
- name: 'alignBottomRight'
- layout: (LayoutFrame 245 0 50 0 259 0 64 0)
- activeHelpKey: alignBottomRight
- tabable: true
- model: alignBottomRight
- )
+ #(FullSpec
+ name: windowSpec
+ window:
+ (WindowSpec
+ label: 'UILayoutTool-AlignmentOrigin'
+ name: 'UILayoutTool-AlignmentOrigin'
+ min: (Point 10 10)
+ bounds: (Rectangle 0 0 405 220)
+ )
+ component:
+ (SpecCollection
+ collection: (
+ (UISubSpecification
+ name: 'layoutOriginSpec'
+ layout: (LayoutFrame 1 0.0 6 0 0 1.0 111 0)
+ majorKey: UILayoutTool
+ minorKey: layoutOriginSpec
+ )
+ (FramedBoxSpec
+ label: 'Alignment'
+ name: 'FramedBox'
+ layout: (LayoutFrame 1 0.0 113 0 0 1.0 215 0)
+ labelPosition: topLeft
+ translateLabel: true
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Horizontal:'
+ name: 'alignHLabel'
+ layout: (AlignmentOrigin 88 0 17 0 1 0)
+ translateLabel: true
+ adjust: right
+ )
+ (InputFieldSpec
+ name: 'leftAlignmentFractionField'
+ layout: (LayoutFrame 90 0 14 0 147 0 36 0)
+ activeHelpKey: alignHorizontal
+ tabable: true
+ model: leftAlignmentFraction
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: true
+ )
+ (LabelSpec
+ label: 'Vertical:'
+ name: 'alignVLabel'
+ layout: (AlignmentOrigin 88 0 43 0 1 0)
+ translateLabel: true
+ adjust: right
+ )
+ (InputFieldSpec
+ name: 'topAlignmentFractionField'
+ layout: (LayoutFrame 90 0 40 0 147 0 62 0)
+ activeHelpKey: alignVertical
+ tabable: true
+ model: topAlignmentFraction
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: true
+ )
+ (DividerSpec
+ name: 'separator1'
+ layout: (LayoutFrame 204 0 19 0 245 0 22 0)
+ )
+ (DividerSpec
+ name: 'separator2'
+ layout: (LayoutFrame 204 0 55 0 245 0 58 0)
)
-
- )
- )
+ (DividerSpec
+ name: 'separator3'
+ layout: (LayoutFrame 196 0 28 0 199 0 50 0)
+ orientation: vertical
+ )
+ (DividerSpec
+ name: 'separator4'
+ layout: (LayoutFrame 250 0 28 0 253 0 50 0)
+ orientation: vertical
+ )
+ (ActionButtonSpec
+ name: 'alignTopLeft'
+ layout: (LayoutFrame 190 0 14 0 204 0 28 0)
+ activeHelpKey: alignTopLeft
+ tabable: true
+ model: alignTopLeft
+ )
+ (ActionButtonSpec
+ name: 'alignTopCenter'
+ layout: (LayoutFrame 217 0 14 0 231 0 28 0)
+ activeHelpKey: alignTopCenter
+ tabable: true
+ model: alignTopCenter
+ )
+ (ActionButtonSpec
+ name: 'alignTopRight'
+ layout: (LayoutFrame 245 0 14 0 259 0 28 0)
+ activeHelpKey: alignTopRight
+ tabable: true
+ model: alignTopRight
+ )
+ (ActionButtonSpec
+ name: 'alignLeftCenter'
+ layout: (LayoutFrame 190 0 32 0 204 0 46 0)
+ activeHelpKey: alignLeftCenter
+ tabable: true
+ model: alignLeftCenter
+ )
+ (ActionButtonSpec
+ name: 'alignCenter'
+ layout: (LayoutFrame 217 0 32 0 231 0 46 0)
+ activeHelpKey: alignCenter
+ tabable: true
+ model: alignCenter
+ )
+ (ActionButtonSpec
+ name: 'alignRightCenter'
+ layout: (LayoutFrame 245 0 32 0 259 0 46 0)
+ activeHelpKey: alignRightCenter
+ tabable: true
+ model: alignRightCenter
+ )
+ (ActionButtonSpec
+ name: 'alignBottomLeft'
+ layout: (LayoutFrame 190 0 50 0 204 0 64 0)
+ activeHelpKey: alignBottomLeft
+ tabable: true
+ model: alignBottomLeft
+ )
+ (ActionButtonSpec
+ name: 'alignBottomCenter'
+ layout: (LayoutFrame 217 0 50 0 231 0 64 0)
+ activeHelpKey: alignBottomCenter
+ tabable: true
+ model: alignBottomCenter
+ )
+ (ActionButtonSpec
+ name: 'alignBottomRight'
+ layout: (LayoutFrame 245 0 50 0 259 0 64 0)
+ activeHelpKey: alignBottomRight
+ tabable: true
+ model: alignBottomRight
+ )
+ )
+
+ )
)
-
- )
- )
+ )
+
+ )
+ )
! !
!UILayoutTool::AlignmentOrigin methodsFor:'accessing'!
@@ -1492,129 +1498,129 @@
<resource: #canvas>
^
- #(FullSpec
- name: windowSpec
- window:
- (WindowSpec
- label: 'UILayoutTool-Extent'
- name: 'UILayoutTool-Extent'
- min: (Point 10 10)
- bounds: (Rectangle 0 0 506 169)
- )
- component:
- (SpecCollection
- collection: (
- (FramedBoxSpec
- label: 'Extent'
- name: 'FramedBox'
- layout: (LayoutFrame 0 0.0 6 0.0 0 1.0 158 0)
- labelPosition: topLeft
- translateLabel: true
- component:
- (SpecCollection
- collection: (
- (LabelSpec
- label: 'Width:'
- name: 'labelWidth'
- layout: (AlignmentOrigin 89 0 41 0 1 0.5)
- translateLabel: true
- adjust: right
- )
- (InputFieldSpec
- name: 'fieldLeftOffset'
- layout: (LayoutFrame 90 0 30 0 140 0 52 0)
- activeHelpKey: hrzExtent
- enableChannel: notUsingDefaultExtent
- tabable: true
- model: leftOffset
- group: inputGroup
- type: numberOrNil
- acceptOnLostFocus: true
- acceptChannel: acceptChannel
- modifiedChannel: modifiedChannel
- acceptOnPointerLeave: false
- )
- (LabelSpec
- label: 'Height:'
- name: 'labelHeight'
- layout: (AlignmentOrigin 89 0 66 0 1 0.5)
- translateLabel: true
- adjust: right
- )
- (InputFieldSpec
- name: 'fieldRightOffset'
- layout: (LayoutFrame 90 0 55 0 140 0 77 0)
- activeHelpKey: vrtExtent
- enableChannel: notUsingDefaultExtent
- tabable: true
- model: topOffset
- group: inputGroup
- type: numberOrNil
- acceptOnLostFocus: true
- acceptChannel: acceptChannel
- modifiedChannel: modifiedChannel
- acceptOnPointerLeave: false
- )
- (CheckBoxSpec
- label: 'Preferred'
- name: 'CheckBox1'
- layout: (LayoutFrame 169 0 30 0 275 0 52 0)
- activeHelpKey: usePreferredWidth
- model: usePreferredWidth
- translateLabel: true
- )
- (CheckBoxSpec
- label: 'Dynamic'
- name: 'CheckBox3'
- layout: (LayoutFrame 276 0 30 0 371 0 52 0)
- activeHelpKey: useDynamicPreferredWidth
- model: useDynamicPreferredWidth
- translateLabel: true
- )
- (CheckBoxSpec
- label: 'Preferred'
- name: 'CheckBox2'
- layout: (LayoutFrame 169 0 58 0 275 0 80 0)
- activeHelpKey: usePreferredHeight
- model: usePreferredHeight
- translateLabel: true
- )
- (CheckBoxSpec
- label: 'Dynamic'
- name: 'CheckBox4'
- layout: (LayoutFrame 276 0 58 0 372 0 80 0)
- activeHelpKey: useDynamicPreferredHeight
- model: useDynamicPreferredHeight
- translateLabel: true
- )
- (CheckBoxSpec
- label: 'Use Widget''s Default Extent'
- name: 'useDefaultExtentCheckBox'
- layout: (Point 5 84)
- activeHelpKey: useDefaultExtent
- enableChannel: defaultExtentEnabled
- tabable: true
- model: useDefaultExtent
- translateLabel: true
- )
+ #(FullSpec
+ name: windowSpec
+ window:
+ (WindowSpec
+ label: 'UILayoutTool-Extent'
+ name: 'UILayoutTool-Extent'
+ min: (Point 10 10)
+ bounds: (Rectangle 0 0 506 169)
+ )
+ component:
+ (SpecCollection
+ collection: (
+ (FramedBoxSpec
+ label: 'Extent'
+ name: 'FramedBox'
+ layout: (LayoutFrame 0 0.0 6 0.0 0 1.0 158 0)
+ labelPosition: topLeft
+ translateLabel: true
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Width:'
+ name: 'labelWidth'
+ layout: (AlignmentOrigin 89 0 41 0 1 0.5)
+ translateLabel: true
+ adjust: right
+ )
+ (InputFieldSpec
+ name: 'fieldLeftOffset'
+ layout: (LayoutFrame 90 0 30 0 140 0 52 0)
+ activeHelpKey: hrzExtent
+ enableChannel: notUsingDefaultExtent
+ tabable: true
+ model: leftOffset
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: true
+ )
+ (LabelSpec
+ label: 'Height:'
+ name: 'labelHeight'
+ layout: (AlignmentOrigin 89 0 66 0 1 0.5)
+ translateLabel: true
+ adjust: right
)
-
- )
- )
- (PopUpListSpec
- label: 'Common Extents'
- name: 'CommonExtentsPopUpList'
- layout: (LayoutFrame 189 0 21 0 314 0 43 0)
- tabable: true
- menu: listOfCommonExtents
- useIndex: true
- ignoreReselect: false
- stateChangeCallBackSelector: commonExtentSelected:
- )
+ (InputFieldSpec
+ name: 'fieldRightOffset'
+ layout: (LayoutFrame 90 0 55 0 140 0 77 0)
+ activeHelpKey: vrtExtent
+ enableChannel: notUsingDefaultExtent
+ tabable: true
+ model: topOffset
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: true
+ )
+ (CheckBoxSpec
+ label: 'Preferred'
+ name: 'CheckBox1'
+ layout: (LayoutFrame 169 0 30 0 275 0 52 0)
+ activeHelpKey: usePreferredWidth
+ model: usePreferredWidth
+ translateLabel: true
+ )
+ (CheckBoxSpec
+ label: 'Dynamic'
+ name: 'CheckBox3'
+ layout: (LayoutFrame 276 0 30 0 371 0 52 0)
+ activeHelpKey: useDynamicPreferredWidth
+ model: useDynamicPreferredWidth
+ translateLabel: true
+ )
+ (CheckBoxSpec
+ label: 'Preferred'
+ name: 'CheckBox2'
+ layout: (LayoutFrame 169 0 58 0 275 0 80 0)
+ activeHelpKey: usePreferredHeight
+ model: usePreferredHeight
+ translateLabel: true
+ )
+ (CheckBoxSpec
+ label: 'Dynamic'
+ name: 'CheckBox4'
+ layout: (LayoutFrame 276 0 58 0 372 0 80 0)
+ activeHelpKey: useDynamicPreferredHeight
+ model: useDynamicPreferredHeight
+ translateLabel: true
+ )
+ (CheckBoxSpec
+ label: 'Use Widget''s Default Extent'
+ name: 'useDefaultExtentCheckBox'
+ layout: (Point 5 84)
+ activeHelpKey: useDefaultExtent
+ enableChannel: defaultExtentEnabled
+ tabable: true
+ model: useDefaultExtent
+ translateLabel: true
+ )
+ )
+
+ )
)
-
- )
- )
+ (PopUpListSpec
+ label: 'Common Extents'
+ name: 'CommonExtentsPopUpList'
+ layout: (LayoutFrame 189 0 21 0 314 0 43 0)
+ tabable: true
+ menu: listOfCommonExtents
+ useIndex: true
+ ignoreReselect: false
+ stateChangeCallBackSelector: commonExtentSelected:
+ )
+ )
+
+ )
+ )
! !
!UILayoutTool::Extent methodsFor:'accessing'!
@@ -2223,231 +2229,231 @@
<resource: #canvas>
^
- #(FullSpec
- name: windowSpec
- window:
- (WindowSpec
- label: 'UILayoutTool-LayoutFrame'
- name: 'UILayoutTool-LayoutFrame'
- min: (Point 10 10)
- bounds: (Rectangle 0 0 527 393)
- )
- component:
- (SpecCollection
- collection: (
- (UISubSpecification
- name: 'layoutOriginSpec'
- layout: (LayoutFrame 1 0.0 6 0 0 1.0 110 0)
- majorKey: UILayoutTool
- minorKey: layoutOriginSpec
- )
- (FramedBoxSpec
- label: 'Corner'
- name: 'FramedBox'
- layout: (LayoutFrame 1 0.0 113 0 0 1.0 266 0)
- labelPosition: topLeft
- translateLabel: true
- component:
- (SpecCollection
- collection: (
- (LabelSpec
- label: 'Right:'
- name: 'labelRight'
- layout: (AlignmentOrigin 68 0 16 0 1 0)
- translateLabel: true
- )
- (ActionButtonSpec
- label: 'imageFractX'
- name: 'actionRelativeRight'
- layout: (LayoutFrame 78 0 14 0 100 0 36 0)
- activeHelpKey: makeRightRelative
- hasCharacterOrientedLabel: false
- tabable: true
- model: relativeRight
- )
- (InputFieldSpec
- name: 'fieldRightFraction'
- layout: (LayoutFrame 103 0 14 0 153 0 36 0)
- activeHelpKey: rightRelative
- tabable: true
- model: rightFraction
- group: inputGroup
- type: numberOrNil
- acceptOnLostFocus: true
- acceptChannel: acceptChannel
- modifiedChannel: modifiedChannel
- acceptOnPointerLeave: false
- )
- (ActionButtonSpec
- label: 'imageAbsX'
- name: 'actionAbsoluteRight'
- layout: (LayoutFrame 178 0 14 0 200 0 36 0)
- activeHelpKey: makeRightAbsolute
- hasCharacterOrientedLabel: false
- tabable: true
- model: absoluteRight
- )
- (InputFieldSpec
- name: 'fieldRightOffset'
- layout: (LayoutFrame 203 0 14 0 253 0 36 0)
- activeHelpKey: rightAbsolute
- tabable: true
- model: rightOffset
- group: inputGroup
- type: numberOrNil
- acceptOnLostFocus: true
- acceptChannel: acceptChannel
- modifiedChannel: modifiedChannel
- acceptOnPointerLeave: false
- )
- (ActionButtonSpec
- label: 'imageAbsXFromRight'
- name: 'actionRightRelativeRight'
- layout: (LayoutFrame 257 0 14 0 279 0 36 0)
- activeHelpKey: makeRightRelativeFromRight
- hasCharacterOrientedLabel: false
- tabable: true
- model: rightRelativeRight
- )
- (LabelSpec
- label: 'Bottom:'
- name: 'labelBottom'
- layout: (AlignmentOrigin 68 0 44 0 1 0)
- translateLabel: true
- )
- (ActionButtonSpec
- label: 'imageFractY'
- name: 'actionRelativeBottom'
- layout: (LayoutFrame 78 0 42 0 100 0 64 0)
- activeHelpKey: makeBottomRelative
- hasCharacterOrientedLabel: false
- tabable: true
- model: relativeBottom
- )
- (InputFieldSpec
- name: 'fieldBottomFraction'
- layout: (LayoutFrame 103 0 42 0 153 0 64 0)
- activeHelpKey: bottomRelative
- tabable: true
- model: bottomFraction
- group: inputGroup
- type: numberOrNil
- acceptOnLostFocus: true
- acceptChannel: acceptChannel
- modifiedChannel: modifiedChannel
- acceptOnPointerLeave: false
- )
- (ActionButtonSpec
- label: 'imageAbsY'
- name: 'actionAbsoluteBottom'
- layout: (LayoutFrame 178 0 42 0 200 0 64 0)
- activeHelpKey: makeBottomAbsolute
- hasCharacterOrientedLabel: false
- tabable: true
- model: absoluteBottom
- )
- (InputFieldSpec
- name: 'fieldBottomOffset'
- layout: (LayoutFrame 203 0 42 0 253 0 64 0)
- activeHelpKey: bottomAbsolute
- tabable: true
- model: bottomOffset
- group: inputGroup
- type: numberOrNil
- acceptOnLostFocus: true
- acceptChannel: acceptChannel
- modifiedChannel: modifiedChannel
- acceptOnPointerLeave: false
- )
- (ActionButtonSpec
- label: 'imageAbsYFromBottom'
- name: 'actionBottomRelativeBottom'
- layout: (LayoutFrame 257 0 42 0 279 0 64 0)
- activeHelpKey: makeBottomRelativeFromBottom
- hasCharacterOrientedLabel: false
- tabable: true
- model: bottomRelativeBottom
- )
- (CheckBoxSpec
- label: 'Preferred'
- name: 'CheckBox1'
- layout: (LayoutFrame 287 0 14 0 393 0 36 0)
- activeHelpKey: usePreferredWidth
- model: usePreferredWidth
- translateLabel: true
- )
- (CheckBoxSpec
- label: 'Preferred'
- name: 'CheckBox2'
- layout: (LayoutFrame 287 0 42 0 393 0 64 0)
- activeHelpKey: usePreferredHeight
- model: usePreferredHeight
- translateLabel: true
- )
- (CheckBoxSpec
- label: 'Dynamic'
- name: 'CheckBox3'
- layout: (LayoutFrame 394 0 14 0 481 0 36 0)
- activeHelpKey: useDynamicPreferredWidth
- model: useDynamicPreferredWidth
- translateLabel: true
- )
- (CheckBoxSpec
- label: 'Dynamic'
- name: 'CheckBox4'
- layout: (LayoutFrame 394 0 42 0 481 0 64 0)
- activeHelpKey: useDynamicPreferredWidth
- model: useDynamicPreferredHeight
- translateLabel: true
- )
- (CheckBoxSpec
- label: 'OSX-ResizeH'
- name: 'OSXResizeH Checkbox'
- layout: (LayoutFrame 287 0 70 0 480 0 92 0)
- activeHelpKey: keepSpaceForOSXResizeHandleH
- model: keepSpaceForOSXResizeHandleH
- translateLabel: true
- )
- (CheckBoxSpec
- label: 'OSX-ResizeV'
- name: 'OSXResizeV Checkbox'
- layout: (LayoutFrame 287 0 98 0 480 0 120 0)
- activeHelpKey: keepSpaceForOSXResizeHandleV
- model: keepSpaceForOSXResizeHandleV
- translateLabel: true
- )
+ #(FullSpec
+ name: windowSpec
+ window:
+ (WindowSpec
+ label: 'UILayoutTool-LayoutFrame'
+ name: 'UILayoutTool-LayoutFrame'
+ min: (Point 10 10)
+ bounds: (Rectangle 0 0 527 393)
+ )
+ component:
+ (SpecCollection
+ collection: (
+ (UISubSpecification
+ name: 'layoutOriginSpec'
+ layout: (LayoutFrame 1 0.0 6 0 0 1.0 110 0)
+ majorKey: UILayoutTool
+ minorKey: layoutOriginSpec
+ )
+ (FramedBoxSpec
+ label: 'Corner'
+ name: 'FramedBox'
+ layout: (LayoutFrame 1 0.0 113 0 0 1.0 266 0)
+ labelPosition: topLeft
+ translateLabel: true
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Right:'
+ name: 'labelRight'
+ layout: (AlignmentOrigin 68 0 16 0 1 0)
+ translateLabel: true
+ )
+ (ActionButtonSpec
+ label: 'imageFractX'
+ name: 'actionRelativeRight'
+ layout: (LayoutFrame 78 0 14 0 100 0 36 0)
+ activeHelpKey: makeRightRelative
+ hasCharacterOrientedLabel: false
+ tabable: true
+ model: relativeRight
+ )
+ (InputFieldSpec
+ name: 'fieldRightFraction'
+ layout: (LayoutFrame 103 0 14 0 153 0 36 0)
+ activeHelpKey: rightRelative
+ tabable: true
+ model: rightFraction
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: true
+ )
+ (ActionButtonSpec
+ label: 'imageAbsX'
+ name: 'actionAbsoluteRight'
+ layout: (LayoutFrame 178 0 14 0 200 0 36 0)
+ activeHelpKey: makeRightAbsolute
+ hasCharacterOrientedLabel: false
+ tabable: true
+ model: absoluteRight
+ )
+ (InputFieldSpec
+ name: 'fieldRightOffset'
+ layout: (LayoutFrame 203 0 14 0 253 0 36 0)
+ activeHelpKey: rightAbsolute
+ tabable: true
+ model: rightOffset
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: true
+ )
+ (ActionButtonSpec
+ label: 'imageAbsXFromRight'
+ name: 'actionRightRelativeRight'
+ layout: (LayoutFrame 257 0 14 0 279 0 36 0)
+ activeHelpKey: makeRightRelativeFromRight
+ hasCharacterOrientedLabel: false
+ tabable: true
+ model: rightRelativeRight
+ )
+ (LabelSpec
+ label: 'Bottom:'
+ name: 'labelBottom'
+ layout: (AlignmentOrigin 68 0 44 0 1 0)
+ translateLabel: true
+ )
+ (ActionButtonSpec
+ label: 'imageFractY'
+ name: 'actionRelativeBottom'
+ layout: (LayoutFrame 78 0 42 0 100 0 64 0)
+ activeHelpKey: makeBottomRelative
+ hasCharacterOrientedLabel: false
+ tabable: true
+ model: relativeBottom
)
-
- )
- )
- (MenuPanelSpec
- name: 'commonLayoutToolBar1'
- layout: (LayoutFrame 6 0.0 267 0 -4 1.0 299 0)
- level: 0
- tabable: true
- menu: commonFrameLayoutsMenu1
- textDefault: true
- )
- (MenuPanelSpec
- name: 'commonLayoutToolBar2'
- layout: (LayoutFrame 6 0.0 299 0 -4 1.0 331 0)
- level: 0
- tabable: true
- menu: commonFrameLayoutsMenu2
- textDefault: true
- )
- (MenuPanelSpec
- name: 'commonLayoutToolBar3'
- layout: (LayoutFrame 6 0.0 323 0 -4 1.0 355 0)
- level: 0
- tabable: true
- menu: commonFrameLayoutsMenu3
- textDefault: true
- )
+ (InputFieldSpec
+ name: 'fieldBottomFraction'
+ layout: (LayoutFrame 103 0 42 0 153 0 64 0)
+ activeHelpKey: bottomRelative
+ tabable: true
+ model: bottomFraction
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: true
+ )
+ (ActionButtonSpec
+ label: 'imageAbsY'
+ name: 'actionAbsoluteBottom'
+ layout: (LayoutFrame 178 0 42 0 200 0 64 0)
+ activeHelpKey: makeBottomAbsolute
+ hasCharacterOrientedLabel: false
+ tabable: true
+ model: absoluteBottom
+ )
+ (InputFieldSpec
+ name: 'fieldBottomOffset'
+ layout: (LayoutFrame 203 0 42 0 253 0 64 0)
+ activeHelpKey: bottomAbsolute
+ tabable: true
+ model: bottomOffset
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: true
+ )
+ (ActionButtonSpec
+ label: 'imageAbsYFromBottom'
+ name: 'actionBottomRelativeBottom'
+ layout: (LayoutFrame 257 0 42 0 279 0 64 0)
+ activeHelpKey: makeBottomRelativeFromBottom
+ hasCharacterOrientedLabel: false
+ tabable: true
+ model: bottomRelativeBottom
+ )
+ (CheckBoxSpec
+ label: 'Preferred'
+ name: 'CheckBox1'
+ layout: (LayoutFrame 287 0 14 0 393 0 36 0)
+ activeHelpKey: usePreferredWidth
+ model: usePreferredWidth
+ translateLabel: true
+ )
+ (CheckBoxSpec
+ label: 'Preferred'
+ name: 'CheckBox2'
+ layout: (LayoutFrame 287 0 42 0 393 0 64 0)
+ activeHelpKey: usePreferredHeight
+ model: usePreferredHeight
+ translateLabel: true
+ )
+ (CheckBoxSpec
+ label: 'Dynamic'
+ name: 'CheckBox3'
+ layout: (LayoutFrame 394 0 14 0 481 0 36 0)
+ activeHelpKey: useDynamicPreferredWidth
+ model: useDynamicPreferredWidth
+ translateLabel: true
+ )
+ (CheckBoxSpec
+ label: 'Dynamic'
+ name: 'CheckBox4'
+ layout: (LayoutFrame 394 0 42 0 481 0 64 0)
+ activeHelpKey: useDynamicPreferredWidth
+ model: useDynamicPreferredHeight
+ translateLabel: true
+ )
+ (CheckBoxSpec
+ label: 'OSX-ResizeH'
+ name: 'OSXResizeH Checkbox'
+ layout: (LayoutFrame 287 0 70 0 480 0 92 0)
+ activeHelpKey: keepSpaceForOSXResizeHandleH
+ model: keepSpaceForOSXResizeHandleH
+ translateLabel: true
+ )
+ (CheckBoxSpec
+ label: 'OSX-ResizeV'
+ name: 'OSXResizeV Checkbox'
+ layout: (LayoutFrame 287 0 98 0 480 0 120 0)
+ activeHelpKey: keepSpaceForOSXResizeHandleV
+ model: keepSpaceForOSXResizeHandleV
+ translateLabel: true
+ )
+ )
+
+ )
)
-
- )
- )
+ (MenuPanelSpec
+ name: 'commonLayoutToolBar1'
+ layout: (LayoutFrame 6 0.0 267 0 -4 1.0 299 0)
+ level: 0
+ tabable: true
+ menu: commonFrameLayoutsMenu1
+ textDefault: true
+ )
+ (MenuPanelSpec
+ name: 'commonLayoutToolBar2'
+ layout: (LayoutFrame 6 0.0 299 0 -4 1.0 331 0)
+ level: 0
+ tabable: true
+ menu: commonFrameLayoutsMenu2
+ textDefault: true
+ )
+ (MenuPanelSpec
+ name: 'commonLayoutToolBar3'
+ layout: (LayoutFrame 6 0.0 323 0 -4 1.0 355 0)
+ level: 0
+ tabable: true
+ menu: commonFrameLayoutsMenu3
+ textDefault: true
+ )
+ )
+
+ )
+ )
! !
!UILayoutTool::LayoutFrame class methodsFor:'menu specs'!
@@ -3071,81 +3077,81 @@
<resource: #canvas>
^
- #(FullSpec
- name: windowSpec
- window:
- (WindowSpec
- label: 'UILayoutTool-Rectangle'
- name: 'UILayoutTool-Rectangle'
- min: (Point 10 10)
- bounds: (Rectangle 14 46 356 245)
- )
- component:
- (SpecCollection
- collection: (
- (UISubSpecification
- name: 'subSpecification'
- layout: (LayoutFrame 1 0.0 6 0 0 1.0 96 0)
- majorKey: UILayoutTool
- minorKey: layoutPointSpec
- )
- (FramedBoxSpec
- label: 'Corner'
- name: 'FramedBox'
- layout: (LayoutFrame 1 0.0 99 0 0 1.0 194 0)
- labelPosition: topLeft
- translateLabel: true
- component:
- (SpecCollection
- collection: (
- (LabelSpec
- label: 'Right:'
- name: 'labelCornerY'
- layout: (AlignmentOrigin 83 0 16 0 1 0)
- adjust: left
- translateLabel: true
- )
- (InputFieldSpec
- name: 'fieldCornerX'
- layout: (LayoutFrame 85 0 13 0 135 0 35 0)
- activeHelpKey: cornerX
- tabable: true
- model: rightOffset
- group: inputGroup
- type: numberOrNil
- acceptOnLostFocus: true
- acceptChannel: acceptChannel
- modifiedChannel: modifiedChannel
- acceptOnPointerLeave: false
- )
- (LabelSpec
- label: 'Bottom:'
- name: 'labelCornerX'
- layout: (AlignmentOrigin 83 0 41 0 1 0)
- adjust: left
- translateLabel: true
- )
- (InputFieldSpec
- name: 'fieldCornerY'
- layout: (LayoutFrame 85 0 38 0 135 0 60 0)
- activeHelpKey: cornerY
- tabable: true
- model: bottomOffset
- group: inputGroup
- type: numberOrNil
- acceptOnLostFocus: true
- acceptChannel: acceptChannel
- modifiedChannel: modifiedChannel
- acceptOnPointerLeave: false
- )
+ #(FullSpec
+ name: windowSpec
+ window:
+ (WindowSpec
+ label: 'UILayoutTool-Rectangle'
+ name: 'UILayoutTool-Rectangle'
+ min: (Point 10 10)
+ bounds: (Rectangle 0 0 342 199)
+ )
+ component:
+ (SpecCollection
+ collection: (
+ (UISubSpecification
+ name: 'subSpecification'
+ layout: (LayoutFrame 1 0.0 6 0 0 1.0 96 0)
+ majorKey: UILayoutTool
+ minorKey: layoutPointSpec
+ )
+ (FramedBoxSpec
+ label: 'Corner'
+ name: 'FramedBox'
+ layout: (LayoutFrame 1 0.0 99 0 0 1.0 194 0)
+ labelPosition: topLeft
+ translateLabel: true
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Right:'
+ name: 'labelCornerY'
+ layout: (AlignmentOrigin 83 0 16 0 1 0)
+ translateLabel: true
+ adjust: left
)
-
- )
- )
+ (InputFieldSpec
+ name: 'fieldCornerX'
+ layout: (LayoutFrame 85 0 13 0 135 0 35 0)
+ activeHelpKey: cornerX
+ tabable: true
+ model: rightOffset
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: true
+ )
+ (LabelSpec
+ label: 'Bottom:'
+ name: 'labelCornerX'
+ layout: (AlignmentOrigin 83 0 41 0 1 0)
+ translateLabel: true
+ adjust: left
+ )
+ (InputFieldSpec
+ name: 'fieldCornerY'
+ layout: (LayoutFrame 85 0 38 0 135 0 60 0)
+ activeHelpKey: cornerY
+ tabable: true
+ model: bottomOffset
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: true
+ )
+ )
+
+ )
)
-
- )
- )
+ )
+
+ )
+ )
! !
!UILayoutTool::Rectangle methodsFor:'accessing'!