Tools__ProjectDefinitionEditor.st
changeset 2727 e5f434daebb5
parent 2666 316855d0ca7d
child 3523 25fa267c550a
equal deleted inserted replaced
2726:7263301b5216 2727:e5f434daebb5
   286 
   286 
   287     <resource: #canvas>
   287     <resource: #canvas>
   288 
   288 
   289     ^
   289     ^
   290      #(FullSpec
   290      #(FullSpec
   291 	name: descriptionSpec
   291         name: descriptionSpec
   292 	window:
   292         window:
   293        (WindowSpec
   293        (WindowSpec
   294 	  label: 'NewApplication'
   294           label: 'NewApplication'
   295 	  name: 'NewApplication'
   295           name: 'NewApplication'
   296 	  min: (Point 0 0)
   296           min: (Point 0 0)
   297 	  bounds: (Rectangle 0 0 433 300)
   297           bounds: (Rectangle 0 0 433 300)
   298 	)
   298         )
   299 	component:
   299         component:
   300        (SpecCollection
   300        (SpecCollection
   301 	  collection: (
   301           collection: (
   302 	   (LabelSpec
   302            (LabelSpec
   303 	      label: 'Company:'
   303               label: 'Company:'
   304 	      name: 'CompanyLabel'
   304               name: 'CompanyLabel'
   305 	      layout: (LayoutFrame 2 0.0 13 0 160 0 35 0)
   305               layout: (LayoutFrame 2 0.0 13 0 160 0 35 0)
   306 	      translateLabel: true
   306               translateLabel: true
   307 	      adjust: right
   307               adjust: right
   308 	    )
   308             )
   309 	   (InputFieldSpec
   309            (InputFieldSpec
   310 	      name: 'CompanyEntryField'
   310               name: 'CompanyEntryField'
   311 	      layout: (LayoutFrame 162 0.0 12 0 -2 1.0 34 0)
   311               layout: (LayoutFrame 162 0.0 12 0 -2 1.0 34 0)
   312 	      model: companyNameHolder
   312               model: companyNameHolder
   313 	      acceptOnReturn: true
   313               acceptOnReturn: true
   314 	      acceptOnTab: true
   314               acceptOnTab: true
   315 	      acceptOnLostFocus: true
   315               acceptOnLostFocus: true
   316 	      acceptOnPointerLeave: false
   316               acceptOnPointerLeave: false
   317 	    )
   317             )
   318 	   (LabelSpec
   318            (LabelSpec
   319 	      label: 'Description:'
   319               label: 'Description:'
   320 	      name: 'DescriptionLabel'
   320               name: 'DescriptionLabel'
   321 	      layout: (LayoutFrame 2 0.0 39 0 160 0 61 0)
   321               layout: (LayoutFrame 2 0.0 39 0 160 0 61 0)
   322 	      translateLabel: true
   322               translateLabel: true
   323 	      adjust: right
   323               adjust: right
   324 	    )
   324             )
   325 	   (InputFieldSpec
   325            (InputFieldSpec
   326 	      name: 'DescriptionEntryField'
   326               name: 'DescriptionEntryField'
   327 	      layout: (LayoutFrame 162 0.0 38 0 -2 1.0 60 0)
   327               layout: (LayoutFrame 162 0.0 38 0 -2 1.0 60 0)
   328 	      model: descriptionHolder
   328               model: descriptionHolder
   329 	      acceptOnReturn: true
   329               acceptOnReturn: true
   330 	      acceptOnTab: true
   330               acceptOnTab: true
   331 	      acceptOnLostFocus: true
   331               acceptOnLostFocus: true
   332 	      acceptOnPointerLeave: false
   332               acceptOnPointerLeave: false
   333 	    )
   333             )
   334 	   (LabelSpec
   334            (LabelSpec
   335 	      label: 'ProductName:'
   335               label: 'ProductName:'
   336 	      name: 'ProductNameLabel'
   336               name: 'ProductNameLabel'
   337 	      layout: (LayoutFrame 2 0.0 65 0 160 0 87 0)
   337               layout: (LayoutFrame 2 0.0 65 0 160 0 87 0)
   338 	      translateLabel: true
   338               translateLabel: true
   339 	      adjust: right
   339               adjust: right
   340 	    )
   340             )
   341 	   (InputFieldSpec
   341            (InputFieldSpec
   342 	      name: 'ProductNameEntryField'
   342               name: 'ProductNameEntryField'
   343 	      layout: (LayoutFrame 162 0.0 64 0 -2 1.0 86 0)
   343               layout: (LayoutFrame 162 0.0 64 0 -2 1.0 86 0)
   344 	      model: productNameHolder
   344               model: productNameHolder
   345 	      acceptOnReturn: true
   345               acceptOnReturn: true
   346 	      acceptOnTab: true
   346               acceptOnTab: true
   347 	      acceptOnLostFocus: true
   347               acceptOnLostFocus: true
   348 	      acceptOnPointerLeave: false
   348               acceptOnPointerLeave: false
   349 	    )
   349             )
   350 	   (LabelSpec
   350            (LabelSpec
   351 	      label: 'ProductVersion:'
   351               label: 'ProductVersion:'
   352 	      name: 'ProductVersionLabel'
   352               name: 'ProductVersionLabel'
   353 	      layout: (LayoutFrame 2 0.0 91 0 160 0 113 0)
   353               layout: (LayoutFrame 2 0.0 91 0 160 0 113 0)
   354 	      translateLabel: true
   354               translateLabel: true
   355 	      adjust: right
   355               adjust: right
   356 	    )
   356             )
   357 	   (InputFieldSpec
   357            (InputFieldSpec
   358 	      name: 'MajorVersionNrEntryField'
   358               name: 'MajorVersionNrEntryField'
   359 	      layout: (LayoutFrame 162 0.0 90 0 182 0.0 112 0)
   359               layout: (LayoutFrame 162 0.0 90 0 182 0.0 112 0)
   360 	      model: majorVersionNrHolder
   360               model: majorVersionNrHolder
   361 	      type: number
   361               type: number
   362 	      acceptOnReturn: true
   362               acceptOnReturn: true
   363 	      acceptOnTab: true
   363               acceptOnTab: true
   364 	      acceptOnLostFocus: true
   364               acceptOnLostFocus: true
   365 	      acceptOnPointerLeave: false
   365               acceptOnPointerLeave: false
   366 	    )
   366             )
   367 	   (InputFieldSpec
   367            (InputFieldSpec
   368 	      name: 'MinorVersionNrEntryField'
   368               name: 'MinorVersionNrEntryField'
   369 	      layout: (LayoutFrame 184 0.0 90 0 204 0.0 112 0)
   369               layout: (LayoutFrame 184 0.0 90 0 204 0.0 112 0)
   370 	      model: minorVersionNrHolder
   370               model: minorVersionNrHolder
   371 	      type: numberOrNil
   371               type: numberOrNil
   372 	      acceptOnReturn: true
   372               acceptOnReturn: true
   373 	      acceptOnTab: true
   373               acceptOnTab: true
   374 	      acceptOnLostFocus: true
   374               acceptOnLostFocus: true
   375 	      acceptOnPointerLeave: false
   375               acceptOnPointerLeave: false
   376 	    )
   376             )
   377 	   (InputFieldSpec
   377            (InputFieldSpec
   378 	      name: 'RevisionNrEntryField'
   378               name: 'RevisionNrEntryField'
   379 	      layout: (LayoutFrame 206 0.0 90 0 226 0.0 112 0)
   379               layout: (LayoutFrame 206 0.0 90 0 226 0.0 112 0)
   380 	      model: revisionNrHolder
   380               model: revisionNrHolder
   381 	      type: number
   381               type: number
   382 	      acceptOnReturn: true
   382               acceptOnReturn: true
   383 	      acceptOnTab: true
   383               acceptOnTab: true
   384 	      acceptOnLostFocus: true
   384               acceptOnLostFocus: true
   385 	      acceptOnPointerLeave: false
   385               acceptOnPointerLeave: false
   386 	    )
   386             )
   387 	   (InputFieldSpec
   387            (InputFieldSpec
   388 	      name: 'ReleaseNrEntryField'
   388               name: 'ReleaseNrEntryField'
   389 	      layout: (LayoutFrame 228 0.0 90 0 248 0.0 112 0)
   389               layout: (LayoutFrame 228 0.0 90 0 248 0.0 112 0)
   390 	      model: releaseNrHolder
   390               model: releaseNrHolder
   391 	      type: number
   391               type: number
   392 	      acceptOnReturn: true
   392               acceptOnReturn: true
   393 	      acceptOnTab: true
   393               acceptOnTab: true
   394 	      acceptOnLostFocus: true
   394               acceptOnLostFocus: true
   395 	      acceptOnPointerLeave: false
   395               acceptOnPointerLeave: false
   396 	    )
   396             )
   397 	   (LabelSpec
   397            (LabelSpec
   398 	      label: 'LegalCopyright:'
   398               label: 'LegalCopyright:'
   399 	      name: 'LegalCopyrightLabel'
   399               name: 'LegalCopyrightLabel'
   400 	      layout: (LayoutFrame 2 0.0 119 0 160 0 141 0)
   400               layout: (LayoutFrame 2 0.0 119 0 160 0 141 0)
   401 	      translateLabel: true
   401               translateLabel: true
   402 	      adjust: right
   402               adjust: right
   403 	    )
   403             )
   404 	   (InputFieldSpec
   404            (InputFieldSpec
   405 	      name: 'LegalCopyrightEntryField'
   405               name: 'LegalCopyrightEntryField'
   406 	      layout: (LayoutFrame 162 0.0 118 0 -2 1.0 140 0)
   406               layout: (LayoutFrame 162 0.0 118 0 -2 1.0 140 0)
   407 	      model: legalCopyrightHolder
   407               model: legalCopyrightHolder
   408 	      acceptOnReturn: true
   408               acceptOnReturn: true
   409 	      acceptOnTab: true
   409               acceptOnTab: true
   410 	      acceptOnLostFocus: true
   410               acceptOnLostFocus: true
   411 	      acceptOnPointerLeave: false
   411               acceptOnPointerLeave: false
   412 	    )
   412             )
   413 	   (LabelSpec
   413            (LabelSpec
   414 	      label: 'FileDescriptionDescription:'
   414               label: 'FileDescriptionDescription:'
   415 	      name: 'FileDescriptionLabel'
   415               name: 'FileDescriptionLabel'
   416 	      layout: (LayoutFrame 2 0.0 161 0 160 0 183 0)
   416               layout: (LayoutFrame 2 0.0 161 0 160 0 183 0)
   417 	      translateLabel: true
   417               translateLabel: true
   418 	      adjust: right
   418               adjust: right
   419 	    )
   419             )
   420 	   (InputFieldSpec
   420            (InputFieldSpec
   421 	      name: 'FileDescriptionEntryField'
   421               name: 'FileDescriptionEntryField'
   422 	      layout: (LayoutFrame 162 0.0 160 0 -2 1.0 182 0)
   422               layout: (LayoutFrame 162 0.0 160 0 -2 1.0 182 0)
   423 	      model: fileDescriptionHolder
   423               model: fileDescriptionHolder
   424 	      acceptOnReturn: true
   424               acceptOnReturn: true
   425 	      acceptOnTab: true
   425               acceptOnTab: true
   426 	      acceptOnLostFocus: true
   426               acceptOnLostFocus: true
   427 	      acceptOnPointerLeave: false
   427               acceptOnPointerLeave: false
   428 	    )
   428             )
   429 	   (LabelSpec
   429            (LabelSpec
   430 	      label: 'FileVersion:'
   430               label: 'FileVersion:'
   431 	      name: 'FileVersionLabel'
   431               name: 'FileVersionLabel'
   432 	      layout: (LayoutFrame 2 0.0 187 0 160 0 209 0)
   432               layout: (LayoutFrame 2 0.0 187 0 160 0 209 0)
   433 	      translateLabel: true
   433               translateLabel: true
   434 	      adjust: right
   434               adjust: right
   435 	    )
   435             )
   436 	   (InputFieldSpec
   436            (InputFieldSpec
   437 	      name: 'FileMajorVersionNrEntryField'
   437               name: 'FileMajorVersionNrEntryField'
   438 	      layout: (LayoutFrame 162 0.0 186 0 182 0.0 208 0)
   438               layout: (LayoutFrame 162 0.0 186 0 182 0.0 208 0)
   439 	      model: fileMajorVersionNrHolder
   439               model: fileMajorVersionNrHolder
   440 	      type: number
   440               type: number
   441 	      acceptOnReturn: true
   441               acceptOnReturn: true
   442 	      acceptOnTab: true
   442               acceptOnTab: true
   443 	      acceptOnLostFocus: true
   443               acceptOnLostFocus: true
   444 	      acceptOnPointerLeave: false
   444               acceptOnPointerLeave: false
   445 	    )
   445             )
   446 	   (InputFieldSpec
   446            (InputFieldSpec
   447 	      name: 'FileMinorVersionNrEntryField'
   447               name: 'FileMinorVersionNrEntryField'
   448 	      layout: (LayoutFrame 184 0.0 186 0 204 0.0 208 0)
   448               layout: (LayoutFrame 184 0.0 186 0 204 0.0 208 0)
   449 	      model: fileMinorVersionNrHolder
   449               model: fileMinorVersionNrHolder
   450 	      type: number
   450               type: number
   451 	      acceptOnReturn: true
   451               acceptOnReturn: true
   452 	      acceptOnTab: true
   452               acceptOnTab: true
   453 	      acceptOnLostFocus: true
   453               acceptOnLostFocus: true
   454 	      acceptOnPointerLeave: false
   454               acceptOnPointerLeave: false
   455 	    )
   455             )
   456 	   (InputFieldSpec
   456            (InputFieldSpec
   457 	      name: 'FileRevisionNrEntryField'
   457               name: 'FileRevisionNrEntryField'
   458 	      layout: (LayoutFrame 206 0.0 186 0 226 0.0 208 0)
   458               layout: (LayoutFrame 206 0.0 186 0 226 0.0 208 0)
   459 	      model: fileRevisionNrHolder
   459               model: fileRevisionNrHolder
   460 	      type: number
   460               type: number
   461 	      acceptOnReturn: true
   461               acceptOnReturn: true
   462 	      acceptOnTab: true
   462               acceptOnTab: true
   463 	      acceptOnLostFocus: true
   463               acceptOnLostFocus: true
   464 	      acceptOnPointerLeave: false
   464               acceptOnPointerLeave: false
   465 	    )
   465             )
   466 	   (InputFieldSpec
   466            (InputFieldSpec
   467 	      name: 'FileReleaseNrEntryField'
   467               name: 'FileReleaseNrEntryField'
   468 	      layout: (LayoutFrame 228 0.0 186 0 248 0.0 208 0)
   468               layout: (LayoutFrame 228 0.0 186 0 248 0.0 208 0)
   469 	      model: fileReleaseNrHolder
   469               model: fileReleaseNrHolder
   470 	      type: number
   470               type: number
   471 	      acceptOnReturn: true
   471               acceptOnReturn: true
   472 	      acceptOnTab: true
   472               acceptOnTab: true
   473 	      acceptOnLostFocus: true
   473               acceptOnLostFocus: true
   474 	      acceptOnPointerLeave: false
   474               acceptOnPointerLeave: false
   475 	    )
   475             )
   476 	   (LabelSpec
   476            (LabelSpec
   477 	      label: 'Icon Filename:'
   477               label: 'Icon Filename:'
   478 	      name: 'IconFileNameLabel'
   478               name: 'IconFileNameLabel'
   479 	      layout: (LayoutFrame 2 0.0 236 0 160 0 258 0)
   479               layout: (LayoutFrame 2 0.0 236 0 160 0 258 0)
   480 	      visibilityChannel: isApplicationDefinitionHolder
   480               visibilityChannel: isApplicationDefinitionHolder
   481 	      translateLabel: true
   481               translateLabel: true
   482 	      adjust: right
   482               adjust: right
   483 	    )
   483             )
   484 	   (InputFieldSpec
   484            (InputFieldSpec
   485 	      name: 'IconFileNameEntryField'
   485               name: 'IconFileNameEntryField'
   486 	      layout: (LayoutFrame 162 0.0 234 0 -2 1.0 256 0)
   486               layout: (LayoutFrame 162 0.0 234 0 -2 1.0 256 0)
   487 	      visibilityChannel: isApplicationDefinitionHolder
   487               visibilityChannel: isApplicationDefinitionHolder
   488 	      model: iconFilenameHolder
   488               model: iconFileNameHolder
   489 	      acceptOnReturn: true
   489               acceptOnReturn: true
   490 	      acceptOnTab: true
   490               acceptOnTab: true
   491 	      acceptOnLostFocus: true
   491               acceptOnLostFocus: true
   492 	      acceptOnPointerLeave: false
   492               acceptOnPointerLeave: false
   493 	    )
   493             )
   494 	   )
   494            )
   495 
   495 
   496 	)
   496         )
   497       )
   497       )
   498 !
   498 !
   499 
   499 
   500 extensionsSpec
   500 extensionsSpec
   501     "This resource specification was automatically generated
   501     "This resource specification was automatically generated
  1445     ^ iconFileNameHolder.
  1445     ^ iconFileNameHolder.
  1446 
  1446 
  1447     "Created: / 04-09-2006 / 18:01:22 / cg"
  1447     "Created: / 04-09-2006 / 18:01:22 / cg"
  1448 !
  1448 !
  1449 
  1449 
  1450 iconFilenameHolder
       
  1451     "automatically generated by UIPainter ..."
       
  1452 
       
  1453     "*** the code below creates a default model when invoked."
       
  1454     "*** (which may not be the one you wanted)"
       
  1455     "*** Please change as required and accept it in the browser."
       
  1456     "*** (and replace this comment by something more useful ;-)"
       
  1457 
       
  1458     iconFilenameHolder isNil ifTrue:[
       
  1459 	iconFilenameHolder := ValueHolder new.
       
  1460 "/ if your app needs to be notified of changes, uncomment one of the lines below:
       
  1461 "/       iconFilenameHolder addDependent:self.
       
  1462 "/       iconFilenameHolder onChangeSend:#iconFilenameHolderChanged to:self.
       
  1463     ].
       
  1464     ^ iconFilenameHolder.
       
  1465 !
       
  1466 
       
  1467 isApplicationDefinitionHolder
  1450 isApplicationDefinitionHolder
  1468     isApplicationDefinitionHolder isNil ifTrue:[
  1451     isApplicationDefinitionHolder isNil ifTrue:[
  1469 	isApplicationDefinitionHolder := false asValue
  1452 	isApplicationDefinitionHolder := false asValue
  1470     ].
  1453     ].
  1471     ^ isApplicationDefinitionHolder.
  1454     ^ isApplicationDefinitionHolder.