--- a/UIPainter.st Tue May 07 12:06:58 2002 +0200
+++ b/UIPainter.st Wed May 08 06:37:02 2002 +0200
@@ -842,7 +842,7 @@
#name: 'GUI Painter'
#min: #(#Point 560 460)
#max: #(#Point 1160 870)
- #bounds: #(#Rectangle 16 46 624 569)
+ #bounds: #(#Rectangle 9 298 617 821)
#menu: #menu
)
#component:
@@ -881,76 +881,9 @@
#(#MenuPanelSpec
#name: 'menuToolbar2View'
#layout: #(#LayoutFrame -1 0.0 -2 0 -1 1.0 30 0)
- #enableChannel: #canMoveOrAlignSelection
#tabable: true
#menu: #menuToolbar2
)
- #(#HorizontalPanelViewSpec
- #name: 'horizontalPanelView1'
- #layout: #(#LayoutFrame -163 1 -1 0 -35 1.0 28 0)
- #horizontalLayout: #fit
- #verticalLayout: #fit
- #horizontalSpace: 0
- #verticalSpace: 0
- #component:
- #(#SpecCollection
- #collection: #(
- #(#ArrowButtonSpec
- #name: 'MoveLeftButton'
- #activeHelpKey: #changePositionLeft
- #tabable: true
- #model: #moveSelectionLeft
- #enableChannel: #canMoveOrAlignSelection
- #isTriggerOnDown: true
- #direction: #left
- #useDefaultExtent: true
- )
- #(#ArrowButtonSpec
- #name: 'MoveRightButton'
- #activeHelpKey: #changePositionRight
- #tabable: true
- #model: #moveSelectionRight
- #enableChannel: #canMoveOrAlignSelection
- #isTriggerOnDown: true
- #actionValue: ''
- #direction: #right
- #useDefaultExtent: true
- )
- #(#ArrowButtonSpec
- #name: 'MoveDownButton'
- #activeHelpKey: #changePositionDown
- #tabable: true
- #model: #moveSelectionDown
- #enableChannel: #canMoveOrAlignSelection
- #isTriggerOnDown: true
- #actionValue: ''
- #direction: #down
- #useDefaultExtent: true
- )
- #(#ArrowButtonSpec
- #name: 'MoveUpButton'
- #activeHelpKey: #changePositionUp
- #tabable: true
- #model: #moveSelectionUp
- #enableChannel: #canMoveOrAlignSelection
- #isTriggerOnDown: true
- #actionValue: ''
- #direction: #up
- #useDefaultExtent: true
- )
- )
-
- )
- )
- #(#ActionButtonSpec
- #label: 'helpIcon'
- #name: 'openWidgetDocumentationButton'
- #layout: #(#LayoutFrame -28 1 -1 0 0 1 28 0)
- #activeHelpKey: #editOpenSpecDocumentation
- #hasCharacterOrientedLabel: false
- #tabable: true
- #model: #doOpenWidgetDocumentation
- )
#(#NoteBookViewSpec
#name: 'noteBook'
#layout: #(#LayoutFrame 0 0.0 34 0.0 0 1.0 -30 1.0)
@@ -1899,58 +1832,113 @@
<resource: #menu>
- ^
-
- #(#Menu
-
- #(
- #(#MenuItem
- #label: 'Align Left'
- #isButton: true
- #value: #alignSelectionLeft
- #activeHelpKey: #alignSelectionLeft
- #labelImage: #(#ResourceRetriever nil #iconAlignL)
- )
- #(#MenuItem
- #label: 'Align Right'
- #isButton: true
- #value: #alignSelectionRight
- #activeHelpKey: #alignSelectionRight
- #labelImage: #(#ResourceRetriever nil #iconAlignR)
- )
- #(#MenuItem
- #label: 'Align Left & Right'
- #isButton: true
- #value: #alignSelectionLeftAndRight
- #activeHelpKey: #alignSelectionLeftAndRight
- #labelImage: #(#ResourceRetriever nil #iconAlignLR)
- )
- #(#MenuItem
- #label: ''
- )
- #(#MenuItem
- #label: 'Align Top'
- #isButton: true
- #value: #alignSelectionTop
- #activeHelpKey: #alignSelectionTop
- #labelImage: #(#ResourceRetriever nil #iconAlignT)
- )
- #(#MenuItem
- #label: 'Align Bottom'
- #isButton: true
- #value: #alignSelectionBottom
- #activeHelpKey: #alignSelectionBottom
- #labelImage: #(#ResourceRetriever nil #iconAlignB)
- )
- #(#MenuItem
- #label: 'Align Top & Bottom'
- #isButton: true
- #value: #alignSelectionTopAndBottom
- #activeHelpKey: #alignSelectionTopAndBottom
- #labelImage: #(#ResourceRetriever nil #iconAlignTB)
- )
- ) nil
- nil
+ ^
+ #(#Menu
+ #(
+ #(#MenuItem
+ #label: 'Align Left'
+ #isButton: true
+ #value: #alignSelectionLeft
+ #activeHelpKey: #alignSelectionLeft
+ #enabled: #canMoveOrAlignSelection
+ #labelImage: #(#ResourceRetriever nil #iconAlignL)
+ )
+ #(#MenuItem
+ #label: 'Align Right'
+ #isButton: true
+ #value: #alignSelectionRight
+ #activeHelpKey: #alignSelectionRight
+ #enabled: #canMoveOrAlignSelection
+ #labelImage: #(#ResourceRetriever nil #iconAlignR)
+ )
+ #(#MenuItem
+ #label: 'Align Left & Right'
+ #isButton: true
+ #value: #alignSelectionLeftAndRight
+ #activeHelpKey: #alignSelectionLeftAndRight
+ #enabled: #canMoveOrAlignSelection
+ #labelImage: #(#ResourceRetriever nil #iconAlignLR)
+ )
+ #(#MenuItem
+ #label: ''
+ )
+ #(#MenuItem
+ #label: 'Align Top'
+ #isButton: true
+ #value: #alignSelectionTop
+ #activeHelpKey: #alignSelectionTop
+ #enabled: #canMoveOrAlignSelection
+ #labelImage: #(#ResourceRetriever nil #iconAlignT)
+ )
+ #(#MenuItem
+ #label: 'Align Bottom'
+ #isButton: true
+ #value: #alignSelectionBottom
+ #activeHelpKey: #alignSelectionBottom
+ #enabled: #canMoveOrAlignSelection
+ #labelImage: #(#ResourceRetriever nil #iconAlignB)
+ )
+ #(#MenuItem
+ #label: 'Align Top & Bottom'
+ #isButton: true
+ #value: #alignSelectionTopAndBottom
+ #activeHelpKey: #alignSelectionTopAndBottom
+ #enabled: #canMoveOrAlignSelection
+ #labelImage: #(#ResourceRetriever nil #iconAlignTB)
+ )
+ #(#MenuItem
+ #label: ''
+ )
+ #(#MenuItem
+ #label: 'Move Left'
+ #isButton: true
+ #triggerOnDown: true
+ #hideMenuOnActivated: false
+ #value: #moveSelectionLeft
+ #activeHelpKey: #changePositionLeft
+ #enabled: #canMoveOrAlignSelection
+ #labelImage: #(#ResourceRetriever #ArrowButton #LeftArrowForm)
+ )
+ #(#MenuItem
+ #label: 'Move Right'
+ #isButton: true
+ #triggerOnDown: true
+ #hideMenuOnActivated: false
+ #value: #moveSelectionRight
+ #activeHelpKey: #changePositionRight
+ #enabled: #canMoveOrAlignSelection
+ #labelImage: #(#ResourceRetriever #ArrowButton #RightArrowForm)
+ )
+ #(#MenuItem
+ #label: 'Move Up'
+ #isButton: true
+ #triggerOnDown: true
+ #value: #moveSelectionUp
+ #activeHelpKey: #changePositionUp
+ #enabled: #canMoveOrAlignSelection
+ #labelImage: #(#ResourceRetriever #ArrowButton #UpArrowForm)
+ )
+ #(#MenuItem
+ #label: 'Move Down'
+ #isButton: true
+ #triggerOnDown: true
+ #value: #moveSelectionDown
+ #activeHelpKey: #changePositionDown
+ #enabled: #canMoveOrAlignSelection
+ #labelImage: #(#ResourceRetriever #ArrowButton #DownArrowForm)
+ )
+ #(#MenuItem
+ #label: 'Widget Documentation'
+ #translateLabel: true
+ #isButton: true
+ #startGroup: #right
+ #value: #doOpenWidgetDocumentation
+ #activeHelpKey: #editOpenSpecDocumentation
+ #labelImage: #(#ResourceRetriever #Icon #helpIcon)
+ )
+ )
+ nil
+ nil
)
! !