equal
deleted
inserted
replaced
600 ) |
600 ) |
601 ) |
601 ) |
602 |
602 |
603 ) |
603 ) |
604 ) |
604 ) |
605 ! |
|
606 |
|
607 windowSpecInBrowser |
|
608 "This resource specification was automatically generated |
|
609 by the UIPainter of ST/X." |
|
610 |
|
611 "Do not manually edit this!! If it is corrupted, |
|
612 the UIPainter may not be able to read the specification." |
|
613 |
|
614 " |
|
615 UIPainter new openOnClass:MenuEditor andSelector:#windowSpecInBrowser |
|
616 MenuEditor new openInterface:#windowSpecInBrowser |
|
617 " |
|
618 |
|
619 <resource: #canvas> |
|
620 |
|
621 ^ |
|
622 #(FullSpec |
|
623 name: windowSpecInBrowser |
|
624 window: |
|
625 (WindowSpec |
|
626 label: 'Menu Editor' |
|
627 name: 'Menu Editor' |
|
628 min: (Point 400 320) |
|
629 bounds: (Rectangle 0 0 450 350) |
|
630 menu: menu |
|
631 ) |
|
632 component: |
|
633 (SpecCollection |
|
634 collection: ( |
|
635 (MenuPanelSpec |
|
636 name: 'ToolBar1' |
|
637 layout: (LayoutFrame 0 0 0 0 0 1 30 0) |
|
638 menu: menu |
|
639 ) |
|
640 (UISubSpecification |
|
641 name: 'SubSpecification1' |
|
642 layout: (LayoutFrame 0 0 30 0 0 1 0 1) |
|
643 majorKey: MenuEditor |
|
644 minorKey: windowSpec |
|
645 ) |
|
646 ) |
|
647 |
|
648 ) |
|
649 ) |
|
650 ! ! |
605 ! ! |
651 |
606 |
652 !MenuEditor class methodsFor:'menu specs'! |
607 !MenuEditor class methodsFor:'menu specs'! |
653 |
608 |
654 addMenu |
609 addMenu |