80 initialize |
80 initialize |
81 |
81 |
82 super initialize. |
82 super initialize. |
83 |
83 |
84 TreeView initialize |
84 TreeView initialize |
|
85 ! ! |
|
86 |
|
87 !MenuEditor class methodsFor:'instance creation'! |
|
88 |
|
89 openModalOnClass:aClass andSelector:aSelector |
|
90 ^ self new openModalOnClass:aClass andSelector:aSelector |
|
91 |
|
92 |
|
93 ! |
|
94 |
|
95 openOnClass:aClass andSelector:aSelector |
|
96 ^ self new openOnClass:aClass andSelector:aSelector |
|
97 |
|
98 |
85 ! ! |
99 ! ! |
86 |
100 |
87 !MenuEditor class methodsFor:'code generation'! |
101 !MenuEditor class methodsFor:'code generation'! |
88 |
102 |
89 generateCodeFor:aClass menuSelector:aSelector |
103 generateCodeFor:aClass menuSelector:aSelector |
250 ) |
264 ) |
251 ) |
265 ) |
252 ) |
266 ) |
253 ) |
267 ) |
254 ! |
268 ! |
|
269 |
|
270 windowSpec |
|
271 "this window spec was automatically generated by the ST/X UIPainter" |
|
272 |
|
273 "do not manually edit this - the painter/builder may not be able to |
|
274 handle the specification if its corrupted." |
|
275 |
|
276 " |
|
277 UIPainter new openOnClass:MenuEditor andSelector:#windowSpec |
|
278 MenuEditor new openInterface:#windowSpec |
|
279 " |
|
280 "MenuEditor open" |
|
281 |
|
282 <resource: #canvas> |
|
283 |
|
284 ^ |
|
285 |
|
286 #(#FullSpec |
|
287 #'window:' |
|
288 #(#WindowSpec |
|
289 #'name:' 'Menu Builder' |
|
290 #'layout:' #(#LayoutFrame 221 0 394 0 800 0 777 0) |
|
291 #'label:' 'Menu Builder' |
|
292 #'min:' #(#Point 10 10) |
|
293 #'max:' #(#Point 1152 900) |
|
294 #'bounds:' #(#Rectangle 221 394 801 778) |
|
295 #'menu:' #menu |
|
296 #'usePreferredExtent:' false |
|
297 ) |
|
298 #'component:' |
|
299 #(#SpecCollection |
|
300 #'collection:' |
|
301 #( |
|
302 #(#MenuPanelSpec |
|
303 #'name:' 'menuToolbarView' |
|
304 #'layout:' #(#LayoutFrame 0 0.0 0 0 0 1.0 32 0) |
|
305 #'menu:' #menuToolbar |
|
306 #'showSeparatingLines:' true |
|
307 ) |
|
308 #(#VariableHorizontalPanelSpec |
|
309 #'name:' 'variableHorizontalPanel1' |
|
310 #'layout:' #(#LayoutFrame 0 0.0 34 0.0 0 1.0 -22 1.0) |
|
311 #'component:' |
|
312 #(#SpecCollection |
|
313 #'collection:' |
|
314 #( |
|
315 #(#ArbitraryComponentSpec |
|
316 #'name:' 'painterView' |
|
317 #'menu:' #menuEdit |
|
318 #'hasHorizontalScrollBar:' true |
|
319 #'hasVerticalScrollBar:' true |
|
320 #'component:' #treeView |
|
321 #'hasBorder:' false |
|
322 ) |
|
323 #(#ViewSpec |
|
324 #'name:' 'view1' |
|
325 #'component:' |
|
326 #(#SpecCollection |
|
327 #'collection:' |
|
328 #( |
|
329 #(#NoteBookViewSpec |
|
330 #'name:' 'specificationView' |
|
331 #'layout:' #(#LayoutFrame 1 0.0 0 0.0 1 1.0 -26 1.0) |
|
332 #'tabable:' true |
|
333 #'model:' #tabModel |
|
334 #'menu:' #tabList |
|
335 #'useIndex:' true |
|
336 #'canvas:' #noteBookView |
|
337 ) |
|
338 #(#UISubSpecification |
|
339 #'name:' 'SubSpecification' |
|
340 #'layout:' #(#LayoutFrame 2 0.0 -26 1 -2 1.0 -2 1.0) |
|
341 #'majorKey:' #ToolApplicationModel |
|
342 #'minorKey:' #windowSpecForCommit |
|
343 ) |
|
344 ) |
|
345 ) |
|
346 #'level:' -1 |
|
347 ) |
|
348 ) |
|
349 ) |
|
350 #'level:' 1 |
|
351 #'handles:' #(#Any 0.384483 1.0) |
|
352 ) |
|
353 #(#UISubSpecification |
|
354 #'name:' 'infoBarSubSpec' |
|
355 #'layout:' #(#LayoutFrame 0 0.0 -22 1 0 1.0 0 1.0) |
|
356 #'majorKey:' #ToolApplicationModel |
|
357 #'minorKey:' #windowSpecForInfoBar |
|
358 ) |
|
359 ) |
|
360 ) |
|
361 ) |
|
362 ! ! |
|
363 |
|
364 !MenuEditor class methodsFor:'menu specs'! |
255 |
365 |
256 menu |
366 menu |
257 "this window spec was automatically generated by the ST/X MenuEditor" |
367 "this window spec was automatically generated by the ST/X MenuEditor" |
258 |
368 |
259 "do not manually edit this - the builder may not be able to |
369 "do not manually edit this - the builder may not be able to |
550 #'labelImage:' #(#ResourceRetriever nil #leftDownIcon) |
660 #'labelImage:' #(#ResourceRetriever nil #leftDownIcon) |
551 ) |
661 ) |
552 ) nil |
662 ) nil |
553 nil |
663 nil |
554 ) |
664 ) |
555 ! |
|
556 |
|
557 windowSpec |
|
558 "this window spec was automatically generated by the ST/X UIPainter" |
|
559 |
|
560 "do not manually edit this - the painter/builder may not be able to |
|
561 handle the specification if its corrupted." |
|
562 |
|
563 " |
|
564 UIPainter new openOnClass:MenuEditor andSelector:#windowSpec |
|
565 MenuEditor new openInterface:#windowSpec |
|
566 " |
|
567 "MenuEditor open" |
|
568 |
|
569 <resource: #canvas> |
|
570 |
|
571 ^ |
|
572 |
|
573 #(#FullSpec |
|
574 #'window:' |
|
575 #(#WindowSpec |
|
576 #'name:' 'Menu Builder' |
|
577 #'layout:' #(#LayoutFrame 221 0 394 0 800 0 777 0) |
|
578 #'label:' 'Menu Builder' |
|
579 #'min:' #(#Point 10 10) |
|
580 #'max:' #(#Point 1152 900) |
|
581 #'bounds:' #(#Rectangle 221 394 801 778) |
|
582 #'menu:' #menu |
|
583 #'usePreferredExtent:' false |
|
584 ) |
|
585 #'component:' |
|
586 #(#SpecCollection |
|
587 #'collection:' |
|
588 #( |
|
589 #(#MenuPanelSpec |
|
590 #'name:' 'menuToolbarView' |
|
591 #'layout:' #(#LayoutFrame 0 0.0 0 0 0 1.0 32 0) |
|
592 #'menu:' #menuToolbar |
|
593 #'showSeparatingLines:' true |
|
594 ) |
|
595 #(#VariableHorizontalPanelSpec |
|
596 #'name:' 'variableHorizontalPanel1' |
|
597 #'layout:' #(#LayoutFrame 0 0.0 34 0.0 0 1.0 -22 1.0) |
|
598 #'component:' |
|
599 #(#SpecCollection |
|
600 #'collection:' |
|
601 #( |
|
602 #(#ArbitraryComponentSpec |
|
603 #'name:' 'painterView' |
|
604 #'menu:' #menuEdit |
|
605 #'hasHorizontalScrollBar:' true |
|
606 #'hasVerticalScrollBar:' true |
|
607 #'component:' #treeView |
|
608 #'hasBorder:' false |
|
609 ) |
|
610 #(#ViewSpec |
|
611 #'name:' 'view1' |
|
612 #'component:' |
|
613 #(#SpecCollection |
|
614 #'collection:' |
|
615 #( |
|
616 #(#NoteBookViewSpec |
|
617 #'name:' 'specificationView' |
|
618 #'layout:' #(#LayoutFrame 1 0.0 0 0.0 1 1.0 -26 1.0) |
|
619 #'tabable:' true |
|
620 #'model:' #tabModel |
|
621 #'menu:' #tabList |
|
622 #'useIndex:' true |
|
623 #'canvas:' #noteBookView |
|
624 ) |
|
625 #(#UISubSpecification |
|
626 #'name:' 'SubSpecification' |
|
627 #'layout:' #(#LayoutFrame 2 0.0 -26 1 -2 1.0 -2 1.0) |
|
628 #'majorKey:' #ToolApplicationModel |
|
629 #'minorKey:' #windowSpecForCommit |
|
630 ) |
|
631 ) |
|
632 ) |
|
633 #'level:' -1 |
|
634 ) |
|
635 ) |
|
636 ) |
|
637 #'level:' 1 |
|
638 #'handles:' #(#Any 0.384483 1.0) |
|
639 ) |
|
640 #(#UISubSpecification |
|
641 #'name:' 'infoBarSubSpec' |
|
642 #'layout:' #(#LayoutFrame 0 0.0 -22 1 0 1.0 0 1.0) |
|
643 #'majorKey:' #ToolApplicationModel |
|
644 #'minorKey:' #windowSpecForInfoBar |
|
645 ) |
|
646 ) |
|
647 ) |
|
648 ) |
|
649 ! ! |
665 ! ! |
650 |
666 |
651 !MenuEditor class methodsFor:'resources'! |
667 !MenuEditor class methodsFor:'resources'! |
652 |
668 |
653 linkSubmenuImage |
669 linkSubmenuImage |
1329 #'label:' 'Image & Label' |
1345 #'label:' 'Image & Label' |
1330 ) |
1346 ) |
1331 ) |
1347 ) |
1332 ) |
1348 ) |
1333 ) |
1349 ) |
1334 ! ! |
|
1335 |
|
1336 !MenuEditor class methodsFor:'startup'! |
|
1337 |
|
1338 openModalOnClass:aClass andSelector:aSelector |
|
1339 ^ self new openModalOnClass:aClass andSelector:aSelector |
|
1340 |
|
1341 |
|
1342 ! |
|
1343 |
|
1344 openOnClass:aClass andSelector:aSelector |
|
1345 ^ self new openOnClass:aClass andSelector:aSelector |
|
1346 |
|
1347 |
|
1348 ! ! |
1350 ! ! |
1349 |
1351 |
1350 !MenuEditor methodsFor:'accessing'! |
1352 !MenuEditor methodsFor:'accessing'! |
1351 |
1353 |
1352 isModified: aBoolean |
1354 isModified: aBoolean |