UIPainter.st
changeset 934 b32cfce56571
parent 924 0416d7cbae92
child 935 43e8ce3b62ca
equal deleted inserted replaced
933:f090206aadff 934:b32cfce56571
   110 
   110 
   111     <resource: #help>
   111     <resource: #help>
   112 
   112 
   113     ^super helpSpec addPairsFrom:#(
   113     ^super helpSpec addPairsFrom:#(
   114 
   114 
       
   115 #align
       
   116 'Widget alignment functions.'
       
   117 
   115 #alignSelectionBottom
   118 #alignSelectionBottom
   116 'Aligns the selected widgets bottom edges with the bottom of the dominant widget.'
   119 'Aligns the selected widgets bottom edges with the bottom of the dominant widget.'
   117 
   120 
   118 #alignSelectionCenterHor
   121 #alignSelectionCenterHor
   119 'Aligns the selected widgets centers vertically with the center of the dominant widget.'
   122 'Aligns the selected widgets centers vertically with the center of the dominant widget.'
   129 
   132 
   130 #alignSelectionRight
   133 #alignSelectionRight
   131 'Aligns the selected widgets right edges with the right edge of the dominant widget.'
   134 'Aligns the selected widgets right edges with the right edge of the dominant widget.'
   132 
   135 
   133 #alignSelectionTop
   136 #alignSelectionTop
   134 'Aligns the selected widgets top edgegs withh the top edge of the dominant widget.'
   137 'Aligns the selected widgets top edgegs with the top edge of the dominant widget.'
   135 
   138 
   136 #alignSelectionTopAndBottom
   139 #alignSelectionTopAndBottom
   137 'Aligns the selected widgets top and bottom edges with the dominant widget.'
   140 'Aligns the selected widgets top and bottom edges with the dominant widget.'
   138 
   141 
   139 #centerSelectionHor
   142 #centerSelectionHor
   189 
   192 
   190 #editOpenSpecDocumentation
   193 #editOpenSpecDocumentation
   191 'Opens the documentation of the selected widget.'
   194 'Opens the documentation of the selected widget.'
   192 
   195 
   193 #fileBrowseAspectMethods
   196 #fileBrowseAspectMethods
   194 'Opens a System Browser to browse the aspect methods.'
   197 'Opens a System Browser on the aspect methods.'
   195 
   198 
   196 #fileLoad
   199 #fileLoad
   197 'Opens a dialog to load a window specification from a classes windowSpec method.'
   200 'Opens a dialog to load a window specification from a classes windowSpec method.'
   198 
   201 
   199 #fileLoadSubspec
   202 #fileLoadSubspec
   286 #testStartApplication
   289 #testStartApplication
   287 'Starts the application with the current window spec.'
   290 'Starts the application with the current window spec.'
   288 
   291 
   289 )
   292 )
   290 
   293 
   291     "Modified: / 29.7.1998 / 11:54:16 / cg"
   294     "Modified: / 31.7.1998 / 19:24:19 / cg"
   292 ! !
   295 ! !
   293 
   296 
   294 !UIPainter class methodsFor:'helpers'!
   297 !UIPainter class methodsFor:'helpers'!
   295 
   298 
   296 convertString:aString maxLineSize:maxCharactersPerLine skipLineFeed:skipLineFeed
   299 convertString:aString maxLineSize:maxCharactersPerLine skipLineFeed:skipLineFeed
   862            #(
   865            #(
   863              #(#MenuItem
   866              #(#MenuItem
   864                 #label: 'About'
   867                 #label: 'About'
   865                 #translateLabel: true
   868                 #translateLabel: true
   866                 #labelImage: #(#ResourceRetriever nil #menuIcon)
   869                 #labelImage: #(#ResourceRetriever nil #menuIcon)
       
   870                 #activeHelpKey: #about
   867                 #submenuChannel: #menuAbout
   871                 #submenuChannel: #menuAbout
   868             )
   872             )
   869              #(#MenuItem
   873              #(#MenuItem
   870                 #label: 'File'
   874                 #label: 'File'
   871                 #translateLabel: true
   875                 #translateLabel: true
   872                 #enabled: #enableChannel
   876                 #enabled: #enableChannel
       
   877                 #activeHelpKey: #file
   873                 #submenu: 
   878                 #submenu: 
   874                  #(#Menu
   879                  #(#Menu
   875                     
   880                     
   876                      #(
   881                      #(
   877                        #(#MenuItem
   882                        #(#MenuItem
   963             )
   968             )
   964              #(#MenuItem
   969              #(#MenuItem
   965                 #label: 'Edit'
   970                 #label: 'Edit'
   966                 #translateLabel: true
   971                 #translateLabel: true
   967                 #submenuChannel: #menuEdit
   972                 #submenuChannel: #menuEdit
       
   973                 #activeHelpKey: #edit
   968             )
   974             )
   969              #(#MenuItem
   975              #(#MenuItem
   970                 #label: 'Align'
   976                 #label: 'Align'
   971                 #translateLabel: true
   977                 #translateLabel: true
   972                 #submenuChannel: #menuAlign
   978                 #submenuChannel: #menuAlign
       
   979                 #activeHelpKey: #align
   973             )
   980             )
   974              #(#MenuItem
   981              #(#MenuItem
   975                 #label: 'Generate'
   982                 #label: 'Generate'
   976                 #translateLabel: true
   983                 #translateLabel: true
       
   984                 #activeHelpKey: #generate
   977                 #submenu: 
   985                 #submenu: 
   978                  #(#Menu
   986                  #(#Menu
   979                     
   987                     
   980                      #(
   988                      #(
   981                        #(#MenuItem
   989                        #(#MenuItem
  1000                 )
  1008                 )
  1001             )
  1009             )
  1002              #(#MenuItem
  1010              #(#MenuItem
  1003                 #label: 'Test'
  1011                 #label: 'Test'
  1004                 #translateLabel: true
  1012                 #translateLabel: true
       
  1013                 #activeHelpKey: #test
  1005                 #submenu: 
  1014                 #submenu: 
  1006                  #(#Menu
  1015                  #(#Menu
  1007                     
  1016                     
  1008                      #(
  1017                      #(
  1009                        #(#MenuItem
  1018                        #(#MenuItem
  1026                 )
  1035                 )
  1027             )
  1036             )
  1028              #(#MenuItem
  1037              #(#MenuItem
  1029                 #label: 'Settings'
  1038                 #label: 'Settings'
  1030                 #translateLabel: true
  1039                 #translateLabel: true
       
  1040                 #activeHelpKey: #settings
  1031                 #submenu: 
  1041                 #submenu: 
  1032                  #(#Menu
  1042                  #(#Menu
  1033                     
  1043                     
  1034                      #(
  1044                      #(
  1035                        #(#MenuItem
  1045                        #(#MenuItem
  1089                 )
  1099                 )
  1090             )
  1100             )
  1091              #(#MenuItem
  1101              #(#MenuItem
  1092                 #label: 'History'
  1102                 #label: 'History'
  1093                 #translateLabel: true
  1103                 #translateLabel: true
       
  1104                 #activeHelpKey: #history
  1094                 #submenuChannel: #menuHistory
  1105                 #submenuChannel: #menuHistory
  1095             )
  1106             )
  1096              #(#MenuItem
  1107              #(#MenuItem
  1097                 #label: 'Help'
  1108                 #label: 'Help'
  1098                 #translateLabel: true
  1109                 #translateLabel: true
  1099                 #startGroup: #right
  1110                 #startGroup: #right
       
  1111                 #activeHelpKey: #help
  1100                 #submenu: 
  1112                 #submenu: 
  1101                  #(#Menu
  1113                  #(#Menu
  1102                     
  1114                     
  1103                      #(
  1115                      #(
  1104                        #(#MenuItem
  1116                        #(#MenuItem
  1156                       )
  1168                       )
  1157                        #(#MenuItem
  1169                        #(#MenuItem
  1158                           #label: 'Show Help Texts'
  1170                           #label: 'Show Help Texts'
  1159                           #translateLabel: true
  1171                           #translateLabel: true
  1160                           #activeHelpKey: #helpShowHelp
  1172                           #activeHelpKey: #helpShowHelp
  1161                           #indication: #showHelp:
  1173                           #indication: #showingHelp:
  1162                       )
  1174                       )
  1163                     ) nil
  1175                     ) nil
  1164                     nil
  1176                     nil
  1165                 )
  1177                 )
  1166             )
  1178             )
  1167           ) nil
  1179           ) nil
  1168           nil
  1180           nil
  1169       )
  1181       )
  1170 
  1182 
  1171     "Modified: / 29.7.1998 / 12:03:44 / cg"
  1183     "Modified: / 31.7.1998 / 19:23:26 / cg"
  1172 !
  1184 !
  1173 
  1185 
  1174 menuAlign
  1186 menuAlign
  1175     "This resource specification was automatically generated
  1187     "This resource specification was automatically generated
  1176      by the MenuEditor of ST/X."
  1188      by the MenuEditor of ST/X."