equal
deleted
inserted
replaced
62 !UISelectionPanel class methodsFor:'accessing'! |
62 !UISelectionPanel class methodsFor:'accessing'! |
63 |
63 |
64 specifications |
64 specifications |
65 |
65 |
66 ^ #( |
66 ^ #( |
67 #( 'Standarts' #( |
67 #( 'Standards' #( |
68 #('Button & Toggle' standartButtonToggle) |
68 #('Button & Toggle' standardButtonToggle) |
69 #('Menus' standartMenus) |
69 #('Menus' standardMenus) |
70 #('Panel' standartPanels) |
70 #('Panel' standardPanels) |
71 #('Text' standartText) |
71 #('Text' standardText) |
72 #('Views' standartViews) |
72 #('Views' standardViews) |
73 #('Canvas' standartCanvas) |
73 #('Canvas' standardCanvas) |
74 #('Sliders' standartSliders) |
74 #('Sliders' standardSliders) |
75 ) |
75 ) |
76 ) |
76 ) |
77 |
77 |
78 #( 'Clip Board' #( |
78 #( 'Clip Board' #( |
79 #('Copy & Paste Buffer' clipBoardSpec) |
79 #('Copy & Paste Buffer' clipBoardSpec) |
307 |
307 |
308 |
308 |
309 |
309 |
310 ! ! |
310 ! ! |
311 |
311 |
312 !UISelectionPanel class methodsFor:'standart specifications'! |
312 !UISelectionPanel class methodsFor:'standard specifications'! |
313 |
313 |
314 standartButtonToggle |
314 standardButtonToggle |
315 "this window spec was automatically generated by the ST/X UIPainter" |
315 "this window spec was automatically generated by the ST/X UIPainter" |
316 |
316 |
317 "do not manually edit this - the painter/builder may not be able to |
317 "do not manually edit this - the painter/builder may not be able to |
318 handle the specification if its corrupted." |
318 handle the specification if its corrupted." |
319 |
319 |
320 " |
320 " |
321 UIPainter new openOnClass:UISelectionPanel andSelector:#standartButtonToggle |
321 UIPainter new openOnClass:UISelectionPanel andSelector:#standardButtonToggle |
322 UISelectionPanel new openInterface:#standartButtonToggle |
322 UISelectionPanel new openInterface:#standardButtonToggle |
323 " |
323 " |
324 |
324 |
325 <resource: #canvas> |
325 <resource: #canvas> |
326 |
326 |
327 ^ |
327 ^ |
419 ) |
419 ) |
420 ) |
420 ) |
421 ) |
421 ) |
422 ! |
422 ! |
423 |
423 |
424 standartCanvas |
424 standardCanvas |
425 "this window spec was automatically generated by the ST/X UIPainter" |
425 "this window spec was automatically generated by the ST/X UIPainter" |
426 |
426 |
427 "do not manually edit this - the painter/builder may not be able to |
427 "do not manually edit this - the painter/builder may not be able to |
428 handle the specification if its corrupted." |
428 handle the specification if its corrupted." |
429 |
429 |
430 " |
430 " |
431 UIPainter new openOnClass:UISelectionPanel andSelector:#standartCanvas |
431 UIPainter new openOnClass:UISelectionPanel andSelector:#standardCanvas |
432 UISelectionPanel new openInterface:#standartCanvas |
432 UISelectionPanel new openInterface:#standardCanvas |
433 " |
433 " |
434 |
434 |
435 <resource: #canvas> |
435 <resource: #canvas> |
436 |
436 |
437 ^ |
437 ^ |
504 ) |
504 ) |
505 ) |
505 ) |
506 ) |
506 ) |
507 ! |
507 ! |
508 |
508 |
509 standartMenus |
509 standardMenus |
510 "this window spec was automatically generated by the ST/X UIPainter" |
510 "this window spec was automatically generated by the ST/X UIPainter" |
511 |
511 |
512 "do not manually edit this - the painter/builder may not be able to |
512 "do not manually edit this - the painter/builder may not be able to |
513 handle the specification if its corrupted." |
513 handle the specification if its corrupted." |
514 |
514 |
515 " |
515 " |
516 UIPainter new openOnClass:self andSelector:#standartMenus |
516 UIPainter new openOnClass:self andSelector:#standardMenus |
517 self new openInterface:#standartMenus |
517 self new openInterface:#standardMenus |
518 " |
518 " |
519 |
519 |
520 <resource: #canvas> |
520 <resource: #canvas> |
521 |
521 |
522 ^ |
522 ^ |
579 ) |
579 ) |
580 |
580 |
581 |
581 |
582 ! |
582 ! |
583 |
583 |
584 standartPanels |
584 standardPanels |
585 "this window spec was automatically generated by the ST/X UIPainter" |
585 "this window spec was automatically generated by the ST/X UIPainter" |
586 |
586 |
587 "do not manually edit this - the painter/builder may not be able to |
587 "do not manually edit this - the painter/builder may not be able to |
588 handle the specification if its corrupted." |
588 handle the specification if its corrupted." |
589 |
589 |
590 " |
590 " |
591 UIPainter new openOnClass:UISelectionPanel andSelector:#standartPanels |
591 UIPainter new openOnClass:UISelectionPanel andSelector:#standardPanels |
592 UISelectionPanel new openInterface:#standartPanels |
592 UISelectionPanel new openInterface:#standardPanels |
593 " |
593 " |
594 |
594 |
595 <resource: #canvas> |
595 <resource: #canvas> |
596 |
596 |
597 ^ |
597 ^ |
774 ) |
774 ) |
775 ) |
775 ) |
776 ) |
776 ) |
777 ! |
777 ! |
778 |
778 |
779 standartSliders |
779 standardSliders |
780 "this window spec was automatically generated by the ST/X UIPainter" |
780 "this window spec was automatically generated by the ST/X UIPainter" |
781 |
781 |
782 "do not manually edit this - the painter/builder may not be able to |
782 "do not manually edit this - the painter/builder may not be able to |
783 handle the specification if its corrupted." |
783 handle the specification if its corrupted." |
784 |
784 |
785 " |
785 " |
786 UIPainter new openOnClass:self andSelector:#standartSliders |
786 UIPainter new openOnClass:self andSelector:#standardSliders |
787 self new openInterface:#standartSliders |
787 self new openInterface:#standardSliders |
788 " |
788 " |
789 |
789 |
790 <resource: #canvas> |
790 <resource: #canvas> |
791 |
791 |
792 ^ |
792 ^ |
838 ) |
838 ) |
839 ) |
839 ) |
840 |
840 |
841 ! |
841 ! |
842 |
842 |
843 standartText |
843 standardText |
844 "this window spec was automatically generated by the ST/X UIPainter" |
844 "this window spec was automatically generated by the ST/X UIPainter" |
845 |
845 |
846 "do not manually edit this - the painter/builder may not be able to |
846 "do not manually edit this - the painter/builder may not be able to |
847 handle the specification if its corrupted." |
847 handle the specification if its corrupted." |
848 |
848 |
849 " |
849 " |
850 UIPainter new openOnClass:UISelectionPanel andSelector:#standartText |
850 UIPainter new openOnClass:UISelectionPanel andSelector:#standardText |
851 UISelectionPanel new openInterface:#standartText |
851 UISelectionPanel new openInterface:#standardText |
852 " |
852 " |
853 |
853 |
854 <resource: #canvas> |
854 <resource: #canvas> |
855 |
855 |
856 ^ |
856 ^ |
936 ) |
936 ) |
937 ) |
937 ) |
938 ) |
938 ) |
939 ! |
939 ! |
940 |
940 |
941 standartUserPanel |
941 standardUserPanel |
942 "this window spec was automatically generated by the ST/X UIPainter" |
942 "this window spec was automatically generated by the ST/X UIPainter" |
943 |
943 |
944 "do not manually edit this - the painter/builder may not be able to |
944 "do not manually edit this - the painter/builder may not be able to |
945 handle the specification if its corrupted." |
945 handle the specification if its corrupted." |
946 |
946 |
947 " |
947 " |
948 UIPainter new openOnClass:UISelectionPanel andSelector:#standartUserPanel |
948 UIPainter new openOnClass:UISelectionPanel andSelector:#standardUserPanel |
949 UISelectionPanel new openInterface:#standartUserPanel |
949 UISelectionPanel new openInterface:#standardUserPanel |
950 " |
950 " |
951 |
951 |
952 <resource: #canvas> |
952 <resource: #canvas> |
953 |
953 |
954 ^ |
954 ^ |
975 ) |
975 ) |
976 ) |
976 ) |
977 ) |
977 ) |
978 ! |
978 ! |
979 |
979 |
980 standartViews |
980 standardViews |
981 "this window spec was automatically generated by the ST/X UIPainter" |
981 "this window spec was automatically generated by the ST/X UIPainter" |
982 |
982 |
983 "do not manually edit this - the painter/builder may not be able to |
983 "do not manually edit this - the painter/builder may not be able to |
984 handle the specification if its corrupted." |
984 handle the specification if its corrupted." |
985 |
985 |
986 " |
986 " |
987 UIPainter new openOnClass:UISelectionPanel andSelector:#standartViews |
987 UIPainter new openOnClass:UISelectionPanel andSelector:#standardViews |
988 UISelectionPanel new openInterface:#standartViews |
988 UISelectionPanel new openInterface:#standardViews |
989 " |
989 " |
990 |
990 |
991 <resource: #canvas> |
991 <resource: #canvas> |
992 |
992 |
993 ^ |
993 ^ |
1432 ]. |
1432 ]. |
1433 builder := UIBuilder new. |
1433 builder := UIBuilder new. |
1434 builder application:self. |
1434 builder application:self. |
1435 (self builder componentAt:#gallery) builder:builder. |
1435 (self builder componentAt:#gallery) builder:builder. |
1436 self galleryList value:#( '???' ). |
1436 self galleryList value:#( '???' ). |
1437 self minorKeys value:#( standartUserPanel ). |
1437 self minorKeys value:#( standardUserPanel ). |
1438 ! |
1438 ! |
1439 |
1439 |
1440 userDefinedHelpText |
1440 userDefinedHelpText |
1441 |
1441 |
1442 ^ ' |
1442 ^ ' |