UIPainter.st
changeset 1862 d10363a83240
parent 1851 d036350188f5
child 1863 f9a8e3c20143
equal deleted inserted replaced
1861:4c173871788a 1862:d10363a83240
   455 
   455 
   456 #settingsUndoManager
   456 #settingsUndoManager
   457 'Opens a dialog to undo modifications.'
   457 'Opens a dialog to undo modifications.'
   458 
   458 
   459 #spreadSelectionHor
   459 #spreadSelectionHor
   460 'Sets the horizontal spaces between the selected widgets as the same.'
   460 'Sets the horizontal spaces between the selected widgets to the same value.'
   461 
   461 
   462 #spreadSelectionVer
   462 #spreadSelectionVer
   463 'Sets the vertical spaces between the selected widgets as the same.'
   463 'Sets the vertical spaces between the selected widgets to the same value.'
   464 
   464 
   465 #testGeometryTestMode
   465 #testGeometryTestMode
   466 'Toggles geometry test mode (to define ratios of variable panels and top-window dimension).'
   466 'Toggles geometry test mode (to define ratios of variable panels and top-window dimension).'
   467 
   467 
   468 #testStartApplication
   468 #testStartApplication
   640     <resource: #image>
   640     <resource: #image>
   641 
   641 
   642     ^Icon
   642     ^Icon
   643 	constantNamed:#'UIPainter iconAlignTB'
   643 	constantNamed:#'UIPainter iconAlignTB'
   644 	ifAbsentPut:[(Depth2Image new) width: 22; height: 22; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@A@@@@@@@@@@@@@@@@B*****(@B*****(@@@@@@@@@@E@E@E@G@G@G@G@@@G@G@G@@@G@G@G@@@G@G@G@H@G@G@G@@@G@G@G@A@G@G@G@@@G@G@G@@@G@G@D@@@@@@@@@@B*****(@B*****(@@@@@@@@@@@@@@@@H@@@@@@@@') ; colorMapFromArray:#[0 0 0 255 255 255 0 0 127 170 170 170]; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@C@@@@O??0O??0G'''' G''''!!G'''' G'''' G'''' G'''' G'''' G'''' G''''!!G''''!!G''& G'''' O??0O??2@@@@@@@@@@@@') ; yourself); yourself]
   644 	ifAbsentPut:[(Depth2Image new) width: 22; height: 22; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@A@@@@@@@@@@@@@@@@B*****(@B*****(@@@@@@@@@@E@E@E@G@G@G@G@@@G@G@G@@@G@G@G@@@G@G@G@H@G@G@G@@@G@G@G@A@G@G@G@@@G@G@G@@@G@G@D@@@@@@@@@@B*****(@B*****(@@@@@@@@@@@@@@@@H@@@@@@@@') ; colorMapFromArray:#[0 0 0 255 255 255 0 0 127 170 170 170]; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@C@@@@O??0O??0G'''' G''''!!G'''' G'''' G'''' G'''' G'''' G'''' G''''!!G''''!!G''& G'''' O??0O??2@@@@@@@@@@@@') ; yourself); yourself]
       
   645 !
       
   646 
       
   647 iconCenterH
       
   648     "This resource specification was automatically generated
       
   649      by the ImageEditor of ST/X."
       
   650 
       
   651     "Do not manually edit this!! If it is corrupted,
       
   652      the ImageEditor may not be able to read the specification."
       
   653 
       
   654     "
       
   655      self iconCenterH inspect
       
   656      ImageEditor openOnClass:self andSelector:#iconCenterH
       
   657      Icon flushCachedIcons
       
   658     "
       
   659 
       
   660     <resource: #image>
       
   661 
       
   662     ^Icon
       
   663         constantNamed:#'UIPainter class iconCenterH'
       
   664         ifAbsentPut:[(Depth2Image new) width: 22; height: 22; photometric:(#palette); bitsPerSample:(#(2)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
       
   665 @@@@@@@@@@@@@@@@@(@J@B @@(@J@B @@(UZUR @@(?:?R @@(@J@B @@(@J@B @@(@J@B @@@@J@@@@@EUZUU@@@O?:?=@@@@@J@@@@@(@J@B @@(@J@B @
       
   666 @(@J@B @@(EZUB@@@(O:=B @@(@J@B @@(@J@B @@@@@@@@@@@@@@@@@') ; colorMapFromArray:#[0 0 0 255 255 255 0 0 127 170 170 170]; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#(1)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@@@C@@A?>@A?>@A?>@A?>@@C@@@C@@G?? G?? G?? G??#@C@@@C@C@?<@@?<A@?<@@?<@@C@@@@@A@@@@') ; yourself); yourself]
       
   667 !
       
   668 
       
   669 iconCenterHInFrame
       
   670     "This resource specification was automatically generated
       
   671      by the ImageEditor of ST/X."
       
   672 
       
   673     "Do not manually edit this!! If it is corrupted,
       
   674      the ImageEditor may not be able to read the specification."
       
   675 
       
   676     "
       
   677      self iconCenterHInFrame inspect
       
   678      ImageEditor openOnClass:self andSelector:#iconCenterHInFrame
       
   679      Icon flushCachedIcons
       
   680     "
       
   681 
       
   682     <resource: #image>
       
   683 
       
   684     ^Icon
       
   685         constantNamed:#'UIPainter class iconCenterHInFrame'
       
   686         ifAbsentPut:[(Depth2Image new) width: 22; height: 22; photometric:(#palette); bitsPerSample:(#(2)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
       
   687 @@@@@@@@J******@H@@@@@B@HL@@@CB@H8UUUR2@HH???RB@H8@@@B2@HH@@@BB@H8@@@B2@H@@@@@B@HEUUUUB@HO???=B@H@@@@@B@H8@@@@2@HH@@@@B@
       
   688 H8@@@@2@HHEUUBB@H8O?=B2@HL@@@CB@H@@@@@B@J******@@@@@@@@@') ; colorMapFromArray:#[0 0 0 255 255 255 0 0 127 170 170 170]; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#(1)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@_??8P@@HW??(U?>(U?>(U?>(T@@(T@@(W??(W??(W??(W??+T@@(T@@+T?<(T?<)T?<(W??(P@@H_??9@@@@') ; yourself); yourself]
       
   689 !
       
   690 
       
   691 iconCenterV
       
   692     "This resource specification was automatically generated
       
   693      by the ImageEditor of ST/X."
       
   694 
       
   695     "Do not manually edit this!! If it is corrupted,
       
   696      the ImageEditor may not be able to read the specification."
       
   697 
       
   698     "
       
   699      self iconCenterV inspect
       
   700      ImageEditor openOnClass:self andSelector:#iconCenterV
       
   701      Icon flushCachedIcons
       
   702     "
       
   703 
       
   704     <resource: #image>
       
   705 
       
   706     ^Icon
       
   707         constantNamed:#'UIPainter class iconCenterV'
       
   708         ifAbsentPut:[(Depth2Image new) width: 22; height: 22; photometric:(#palette); bitsPerSample:(#(2)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
       
   709 @@@@@@@@@@@@@@@@@@@@@@@@B**@J*(@B**MJ*(@@@@M@@@@@@@M@M@@@M@M@M@@@M@M@M@@@M@M@M@@B*****(@B*****(@@M@M@M@@@M@M@M@@@E@M@M@@
       
   710 @@@M@E@@@@@M@@@@B**EJ*(@B(*@J*(@@@@@@@@@@@@@@@@@@@@@@@@@') ; colorMapFromArray:#[0 0 0 255 255 255 0 0 127 170 170 170]; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#(1)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@G @@G @@G'' G''''!!G'''' G'''' G'''' O??0O??0G'''' G'''' G'''' G'''' @G''#@G @@G C@@@@@@@@@@@@') ; yourself); yourself]
       
   711 !
       
   712 
       
   713 iconCenterVInFrame
       
   714     "This resource specification was automatically generated
       
   715      by the ImageEditor of ST/X."
       
   716 
       
   717     "Do not manually edit this!! If it is corrupted,
       
   718      the ImageEditor may not be able to read the specification."
       
   719 
       
   720     "
       
   721      self iconCenterVInFrame inspect
       
   722      ImageEditor openOnClass:self andSelector:#iconCenterVInFrame
       
   723      Icon flushCachedIcons
       
   724     "
       
   725 
       
   726     <resource: #image>
       
   727 
       
   728     ^Icon
       
   729         constantNamed:#'UIPainter class iconCenterVInFrame'
       
   730         ifAbsentPut:[(Depth2Image new) width: 22; height: 22; photometric:(#palette); bitsPerSample:(#(2)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
       
   731 @@@@@@@@J******@H@@@@@B@HL3@L3B@H:*GJ*2@H@@G@@B@HG@G@@B@HG@G@GB@HG@G@GB@HG@G@GB@HG@G@GB@HG@G@GB@HG@G@GB@HG@G@GB@HG@G@EB@
       
   732 HE@G@@B@H@@G@@B@H:*E@J2@HL3@L3B@H@@@@@B@J******@@@@@@@@@') ; colorMapFromArray:#[0 0 0 255 255 255 0 0 127 170 170 170]; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#(1)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@B_??9P@@HW??(TG (W'' (W''''*W''''(W''''*W'''')W''''(W'''')W''''+W''''*W''''*W''''(W'' )TG (W??(P@@H_??8@@@@') ; yourself); yourself]
       
   733 !
       
   734 
       
   735 iconDistributeH
       
   736     "This resource specification was automatically generated
       
   737      by the ImageEditor of ST/X."
       
   738 
       
   739     "Do not manually edit this!! If it is corrupted,
       
   740      the ImageEditor may not be able to read the specification."
       
   741 
       
   742     "
       
   743      self iconDistributeH inspect
       
   744      ImageEditor openOnClass:self andSelector:#iconDistributeH
       
   745      Icon flushCachedIcons
       
   746     "
       
   747 
       
   748     <resource: #image>
       
   749 
       
   750     ^Icon
       
   751         constantNamed:#'UIPainter class iconDistributeH'
       
   752         ifAbsentPut:[(Depth2Image new) width: 22; height: 22; photometric:(#palette); bitsPerSample:(#(2)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
       
   753 @@@@@@@@@@@@@@@@@@@@@@@@@*B@JB @@**@J* @@J*@J*@@@HB@HB@@@HB@HB@@AP@E@@@@@@@@@@@@E@@E@@E@G@@G@@G@G@@G@@G@G@@G@@G@G@@G@@G@
       
   754 G@@G@@G@G@@G@@G@GB*GJ G@GB*GJ G@G@@G@@G@@@@@@@@@@@@@@@@@') ; colorMapFromArray:#[0 0 0 255 255 255 0 0 127 170 170 170]; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#(1)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@@@@@@BHQ@BHQ@C8_@BHQCBHQA@@@C<G ?<G <<G <<G ><G <<G ><G <<G ?<G =<G <<G <<G <@@@A') ; yourself); yourself]
       
   755 !
       
   756 
       
   757 iconDistributeV
       
   758     "This resource specification was automatically generated
       
   759      by the ImageEditor of ST/X."
       
   760 
       
   761     "Do not manually edit this!! If it is corrupted,
       
   762      the ImageEditor may not be able to read the specification."
       
   763 
       
   764     "
       
   765      self iconDistributeV inspect
       
   766      ImageEditor openOnClass:self andSelector:#iconDistributeV
       
   767      Icon flushCachedIcons
       
   768     "
       
   769 
       
   770     <resource: #image>
       
   771 
       
   772     ^Icon
       
   773         constantNamed:#'UIPainter class iconDistributeV'
       
   774         ifAbsentPut:[(Depth2Image new) width: 22; height: 22; photometric:(#palette); bitsPerSample:(#(2)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
       
   775 @@@@@@@@AUUU@@@@C??=D@@@@@@@DB @@@@@B* @@(@@@J @@(@@@J@@@(@@@J@@@(@@B* @@@@@@@@@AUUUD@@@C??=D@@@@@@@@@@@@(@@B* @@(@@@J @
       
   776 @(@@@J@@@@@@@J@@@@@@B* @@@@@@B @AUUU@@@@C??=@@@@@@@@@@@@') ; colorMapFromArray:#[0 0 0 255 255 255 0 0 127 170 170 170]; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#(1)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'_? @_? @_? @_? @@@O @@B@@@B@@@B@@@O _? @_? @_? @_? C@@O @@BC@@B@@@BA@@O _? @_? @_? A_? @') ; yourself); yourself]
   645 ! !
   777 ! !
   646 
   778 
   647 !UIPainter class methodsFor:'interface specs'!
   779 !UIPainter class methodsFor:'interface specs'!
   648 
   780 
   649 dialogSpecForDefiningClassAndSelector
   781 dialogSpecForDefiningClassAndSelector
  1337      (Menu new fromLiteralArrayEncoding:(UIPainter menuAlign)) startUp
  1469      (Menu new fromLiteralArrayEncoding:(UIPainter menuAlign)) startUp
  1338     "
  1470     "
  1339 
  1471 
  1340     <resource: #menu>
  1472     <resource: #menu>
  1341 
  1473 
  1342     ^
  1474     ^ 
  1343      
  1475      #(Menu
  1344        #(#Menu
  1476         (
  1345           
  1477          (MenuItem
  1346            #(
  1478             activeHelpKey: alignSelectionLeft
  1347              #(#MenuItem
  1479             enabled: canMoveOrAlignSelection
  1348                 #label: 'Left'
  1480             label: 'Left'
  1349                 #translateLabel: true
  1481             itemValue: alignSelectionLeft
  1350                 #value: #alignSelectionLeft
  1482             translateLabel: true
  1351                 #activeHelpKey: #alignSelectionLeft
  1483             labelImage: (ResourceRetriever UIPainter iconAlignL 'Left')
  1352                 #enabled: #canMoveOrAlignSelection
  1484           )
  1353                 #labelImage: #(#ResourceRetriever #UIPainter #iconAlignL 'Left')
  1485          (MenuItem
  1354             )
  1486             activeHelpKey: alignSelectionRight
  1355              #(#MenuItem
  1487             enabled: canMoveOrAlignSelection
  1356                 #label: 'Right'
  1488             label: 'Right'
  1357                 #translateLabel: true
  1489             itemValue: alignSelectionRight
  1358                 #value: #alignSelectionRight
  1490             translateLabel: true
  1359                 #activeHelpKey: #alignSelectionRight
  1491             labelImage: (ResourceRetriever UIPainter iconAlignR 'Right')
  1360                 #enabled: #canMoveOrAlignSelection
  1492           )
  1361                 #labelImage: #(#ResourceRetriever #UIPainter #iconAlignR 'Right')
  1493          (MenuItem
  1362             )
  1494             activeHelpKey: alignSelectionLeftAndRight
  1363              #(#MenuItem
  1495             enabled: canMoveOrAlignSelection
  1364                 #label: 'Left && Right'
  1496             label: 'Left && Right'
  1365                 #translateLabel: true
  1497             itemValue: alignSelectionLeftAndRight
  1366                 #value: #alignSelectionLeftAndRight
  1498             translateLabel: true
  1367                 #activeHelpKey: #alignSelectionLeftAndRight
  1499             labelImage: (ResourceRetriever UIPainter iconAlignLR 'Left & Right')
  1368                 #enabled: #canMoveOrAlignSelection
  1500           )
  1369                 #labelImage: #(#ResourceRetriever #UIPainter #iconAlignLR 'Left & Right')
  1501          (MenuItem
  1370             )
  1502             activeHelpKey: alignSelectionTop
  1371              #(#MenuItem
  1503             enabled: canMoveOrAlignSelection
  1372                 #label: 'Top'
  1504             label: 'Top'
  1373                 #translateLabel: true
  1505             itemValue: alignSelectionTop
  1374                 #value: #alignSelectionTop
  1506             translateLabel: true
  1375                 #activeHelpKey: #alignSelectionTop
  1507             labelImage: (ResourceRetriever UIPainter iconAlignT 'Top')
  1376                 #enabled: #canMoveOrAlignSelection
  1508           )
  1377                 #labelImage: #(#ResourceRetriever #UIPainter #iconAlignT 'Top')
  1509          (MenuItem
  1378             )
  1510             activeHelpKey: alignSelectionBottom
  1379              #(#MenuItem
  1511             enabled: canMoveOrAlignSelection
  1380                 #label: 'Bottom'
  1512             label: 'Bottom'
  1381                 #translateLabel: true
  1513             itemValue: alignSelectionBottom
  1382                 #value: #alignSelectionBottom
  1514             translateLabel: true
  1383                 #activeHelpKey: #alignSelectionBottom
  1515             labelImage: (ResourceRetriever UIPainter iconAlignB 'Bottom')
  1384                 #enabled: #canMoveOrAlignSelection
  1516           )
  1385                 #labelImage: #(#ResourceRetriever #UIPainter #iconAlignB 'Bottom')
  1517          (MenuItem
  1386             )
  1518             activeHelpKey: alignSelectionTopAndBottom
  1387              #(#MenuItem
  1519             enabled: canMoveOrAlignSelection
  1388                 #label: 'Top && Bottom'
  1520             label: 'Top && Bottom'
  1389                 #translateLabel: true
  1521             itemValue: alignSelectionTopAndBottom
  1390                 #value: #alignSelectionTopAndBottom
  1522             translateLabel: true
  1391                 #activeHelpKey: #alignSelectionTopAndBottom
  1523             labelImage: (ResourceRetriever UIPainter iconAlignTB 'Top & Bottom')
  1392                 #enabled: #canMoveOrAlignSelection
  1524           )
  1393                 #labelImage: #(#ResourceRetriever #UIPainter #iconAlignTB 'Top & Bottom')
  1525          (MenuItem
  1394             )
  1526             label: '-'
  1395              #(#MenuItem
  1527           )
  1396                 #label: '-'
  1528          (MenuItem
  1397             )
  1529             activeHelpKey: alignSelectionCenterHor
  1398              #(#MenuItem
  1530             enabled: canMoveOrAlignSelection
  1399                 #label: 'Centered Horizontal'
  1531             label: 'Center Horizontal'
  1400                 #translateLabel: true
  1532             itemValue: alignSelectionCenterHor
  1401                 #value: #alignSelectionCenterHor
  1533             translateLabel: true
  1402                 #activeHelpKey: #alignSelectionCenterHor
  1534             labelImage: (ResourceRetriever UIPainter iconCenterH '')
  1403                 #enabled: #canMoveOrAlignSelection
  1535           )
  1404             )
  1536          (MenuItem
  1405              #(#MenuItem
  1537             activeHelpKey: centerSelectionHor
  1406                 #label: 'Centered Vertical'
  1538             enabled: canMoveOrAlignSelection
  1407                 #translateLabel: true
  1539             label: 'Center Horizontal in Frame'
  1408                 #value: #alignSelectionCenterVer
  1540             itemValue: centerSelectionHor
  1409                 #activeHelpKey: #alignSelectionCenterVer
  1541             translateLabel: true
  1410                 #enabled: #canMoveOrAlignSelection
  1542             labelImage: (ResourceRetriever UIPainter iconCenterHInFrame '')
  1411             )
  1543           )
  1412              #(#MenuItem
  1544          (MenuItem
  1413                 #label: '-'
  1545             activeHelpKey: alignSelectionCenterVer
  1414             )
  1546             enabled: canMoveOrAlignSelection
  1415              #(#MenuItem
  1547             label: 'Center Vertical'
  1416                 #label: 'Center Horizontal in Frame'
  1548             itemValue: alignSelectionCenterVer
  1417                 #translateLabel: true
  1549             translateLabel: true
  1418                 #value: #centerSelectionHor
  1550             labelImage: (ResourceRetriever UIPainter iconCenterV '')
  1419                 #activeHelpKey: #centerSelectionHor
  1551           )
  1420                 #enabled: #canMoveOrAlignSelection
  1552          (MenuItem
  1421             )
  1553             activeHelpKey: centerSelectionVer
  1422              #(#MenuItem
  1554             enabled: canMoveOrAlignSelection
  1423                 #label: 'Center Vertical in Frame'
  1555             label: 'Center Vertical in Frame'
  1424                 #translateLabel: true
  1556             itemValue: centerSelectionVer
  1425                 #value: #centerSelectionVer
  1557             translateLabel: true
  1426                 #activeHelpKey: #centerSelectionVer
  1558             labelImage: (ResourceRetriever UIPainter iconCenterVInFrame '')
  1427                 #enabled: #canMoveOrAlignSelection
  1559           )
  1428             )
  1560          (MenuItem
  1429              #(#MenuItem
  1561             label: '-'
  1430                 #label: '-'
  1562           )
  1431             )
  1563          (MenuItem
  1432              #(#MenuItem
  1564             activeHelpKey: spreadSelectionHor
  1433                 #label: 'Spread Horizontal'
  1565             enabled: canMoveOrAlignSelection
  1434                 #translateLabel: true
  1566             label: 'Distribute Horizontal'
  1435                 #value: #spreadSelectionHor
  1567             itemValue: spreadSelectionHor
  1436                 #activeHelpKey: #spreadSelectionHor
  1568             translateLabel: true
  1437                 #enabled: #canMoveOrAlignSelection
  1569             labelImage: (ResourceRetriever UIPainter iconDistributeH '')
  1438             )
  1570           )
  1439              #(#MenuItem
  1571          (MenuItem
  1440                 #label: 'Spread Vertical'
  1572             activeHelpKey: spreadSelectionVer
  1441                 #translateLabel: true
  1573             enabled: canMoveOrAlignSelection
  1442                 #value: #spreadSelectionVer
  1574             label: 'Distribute Vertical'
  1443                 #activeHelpKey: #spreadSelectionVer
  1575             itemValue: spreadSelectionVer
  1444                 #enabled: #canMoveOrAlignSelection
  1576             translateLabel: true
  1445             )
  1577             labelImage: (ResourceRetriever UIPainter iconDistributeV '')
  1446           ) nil
  1578           )
  1447           nil
  1579          )
       
  1580         nil
       
  1581         nil
  1448       )
  1582       )
  1449 
       
  1450     "Modified: / 20.5.1998 / 01:42:57 / cg"
       
  1451 !
  1583 !
  1452 
  1584 
  1453 menuEdit
  1585 menuEdit
  1454     "This resource specification was automatically generated
  1586     "This resource specification was automatically generated
  1455      by the MenuEditor of ST/X."
  1587      by the MenuEditor of ST/X."