DataSetBuilder.st
changeset 3046 7d93b17e2c03
parent 3045 c1c9bfd7ad18
child 3047 704af58a697e
equal deleted inserted replaced
3045:c1c9bfd7ad18 3046:7d93b17e2c03
  1578     "
  1578     "
  1579 
  1579 
  1580     <resource: #canvas>
  1580     <resource: #canvas>
  1581 
  1581 
  1582     ^ 
  1582     ^ 
  1583      #(FullSpec
  1583     #(FullSpec
  1584         name: sortEditSpec
  1584        name: sortEditSpec
  1585         window: 
  1585        window: 
  1586        (WindowSpec
  1586       (WindowSpec
  1587           label: 'DataSet Basic'
  1587          label: 'DataSet Basic'
  1588           name: 'DataSet Basic'
  1588          name: 'DataSet Basic'
  1589           min: (Point 10 10)
  1589          min: (Point 10 10)
  1590           bounds: (Rectangle 0 0 430 473)
  1590          bounds: (Rectangle 0 0 430 473)
  1591         )
  1591        )
  1592         component: 
  1592        component: 
  1593        (SpecCollection
  1593       (SpecCollection
  1594           collection: (
  1594          collection: (
  1595            (VerticalPanelViewSpec
  1595           (VerticalPanelViewSpec
  1596               name: 'VerticalPanel1'
  1596              name: 'VerticalPanel1'
  1597               layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
  1597              layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
  1598               horizontalLayout: fit
  1598              horizontalLayout: fit
  1599               verticalLayout: top
  1599              verticalLayout: top
  1600               horizontalSpace: 3
  1600              horizontalSpace: 3
  1601               verticalSpace: 3
  1601              verticalSpace: 3
  1602               component: 
  1602              component: 
  1603              (SpecCollection
  1603             (SpecCollection
  1604                 collection: (
  1604                collection: (
  1605                  (FramedBoxSpec
  1605                 (FramedBoxSpec
  1606                     label: 'Sorting:'
  1606                    label: 'Sorting:'
  1607                     name: 'sortFrame'
  1607                    name: 'sortFrame'
  1608                     labelPosition: topLeft
  1608                    labelPosition: topLeft
  1609                     translateLabel: true
  1609                    translateLabel: true
  1610                     component: 
  1610                    component: 
  1611                    (SpecCollection
  1611                   (SpecCollection
  1612                       collection: (
  1612                      collection: (
  1613                        (CheckBoxSpec
  1613                       (CheckBoxSpec
  1614                           label: 'Sortable'
  1614                          label: 'Sortable'
  1615                           name: 'isSortable'
  1615                          name: 'isSortable'
  1616                           layout: (LayoutOrigin -3 0 0 0)
  1616                          layout: (LayoutOrigin -3 0 0 0)
  1617                           activeHelpKey: isSortable
  1617                          activeHelpKey: isSortable
  1618                           tabable: true
  1618                          tabable: true
  1619                           model: isSortable
  1619                          model: isSortable
  1620                           translateLabel: true
  1620                          translateLabel: true
  1621                         )
       
  1622                        (LabelSpec
       
  1623                           label: 'Sort Selector:'
       
  1624                           name: 'sortSelector'
       
  1625                           layout: (LayoutFrame 35 0 33 0 107 0 51 0)
       
  1626                           activeHelpKey: sortSelector
       
  1627                           translateLabel: true
       
  1628                           resizeForLabel: true
       
  1629                           adjust: right
       
  1630                         )
       
  1631                        (InputFieldSpec
       
  1632                           name: 'EntryField3'
       
  1633                           layout: (LayoutFrame 110 0 30 0 2 1 56 0)
       
  1634                           activeHelpKey: sortSelector
       
  1635                           enableChannel: isSortable
       
  1636                           tabable: true
       
  1637                           model: sortSelector
       
  1638                           group: inputGroup
       
  1639                           type: symbolOrNil
       
  1640                           immediateAccept: false
       
  1641                           acceptOnLeave: false
       
  1642                           acceptOnLostFocus: false
       
  1643                           acceptChannel: acceptChannel
       
  1644                           modifiedChannel: modifiedChannel
       
  1645                           acceptOnPointerLeave: false
       
  1646                         )
       
  1647                        (LabelSpec
       
  1648                           label: 'Sort Block Selector:'
       
  1649                           name: 'Label1'
       
  1650                           layout: (LayoutFrame -5 0 66 0 107 0 84 0)
       
  1651                           activeHelpKey: sortBlockSelector
       
  1652                           translateLabel: true
       
  1653                           resizeForLabel: true
       
  1654                           adjust: right
       
  1655                         )
       
  1656                        (InputFieldSpec
       
  1657                           name: 'EntryField4'
       
  1658                           layout: (LayoutFrame 110 0 63 0 2 1 89 0)
       
  1659                           activeHelpKey: sortBlockSelector
       
  1660                           enableChannel: isSortable
       
  1661                           tabable: true
       
  1662                           model: sortBlockSelector
       
  1663                           group: inputGroup
       
  1664                           type: symbolOrNil
       
  1665                           immediateAccept: false
       
  1666                           acceptOnLeave: false
       
  1667                           acceptOnLostFocus: false
       
  1668                           acceptChannel: acceptChannel
       
  1669                           modifiedChannel: modifiedChannel
       
  1670                           acceptOnPointerLeave: false
       
  1671                         )
       
  1672                        )
  1621                        )
  1673                      
  1622                       (LabelSpec
  1674                     )
  1623                          label: 'Sort Selector:'
  1675                     extent: (Point 430 122)
  1624                          name: 'sortSelector'
  1676                   )
  1625                          layout: (AlignmentOrigin 134 0 42 0 1 0.5)
       
  1626                          activeHelpKey: sortSelector
       
  1627                          translateLabel: true
       
  1628                          resizeForLabel: true
       
  1629                          adjust: right
       
  1630                        )
       
  1631                       (InputFieldSpec
       
  1632                          name: 'EntryField3'
       
  1633                          layout: (LayoutFrame 135 0 30 0 2 1 56 0)
       
  1634                          activeHelpKey: sortSelector
       
  1635                          enableChannel: isSortable
       
  1636                          tabable: true
       
  1637                          model: sortSelector
       
  1638                          group: inputGroup
       
  1639                          type: symbolOrNil
       
  1640                          immediateAccept: false
       
  1641                          acceptOnLeave: false
       
  1642                          acceptOnLostFocus: false
       
  1643                          acceptChannel: acceptChannel
       
  1644                          modifiedChannel: modifiedChannel
       
  1645                          acceptOnPointerLeave: false
       
  1646                        )
       
  1647                       (LabelSpec
       
  1648                          label: 'Sort Block Selector:'
       
  1649                          name: 'Label1'
       
  1650                          layout: (AlignmentOrigin 134 0 75 0 1 0.5)
       
  1651                          activeHelpKey: sortBlockSelector
       
  1652                          translateLabel: true
       
  1653                          resizeForLabel: true
       
  1654                          adjust: right
       
  1655                        )
       
  1656                       (InputFieldSpec
       
  1657                          name: 'EntryField4'
       
  1658                          layout: (LayoutFrame 135 0 63 0 2 1 89 0)
       
  1659                          activeHelpKey: sortBlockSelector
       
  1660                          enableChannel: isSortable
       
  1661                          tabable: true
       
  1662                          model: sortBlockSelector
       
  1663                          group: inputGroup
       
  1664                          type: symbolOrNil
       
  1665                          immediateAccept: false
       
  1666                          acceptOnLeave: false
       
  1667                          acceptOnLostFocus: false
       
  1668                          acceptChannel: acceptChannel
       
  1669                          modifiedChannel: modifiedChannel
       
  1670                          acceptOnPointerLeave: false
       
  1671                        )
       
  1672                       )
       
  1673                     
       
  1674                    )
       
  1675                    extent: (Point 430 122)
  1677                  )
  1676                  )
  1678                
  1677                 )
  1679               )
  1678               
  1680             )
  1679              )
  1681            )
  1680            )
  1682          
  1681           )
  1683         )
  1682         
  1684       )
  1683        )
       
  1684      )
  1685 !
  1685 !
  1686 
  1686 
  1687 valuesEditSpec
  1687 valuesEditSpec
  1688     "This resource specification was automatically generated
  1688     "This resource specification was automatically generated
  1689      by the UIPainter of ST/X."
  1689      by the UIPainter of ST/X."
  1697     "
  1697     "
  1698 
  1698 
  1699     <resource: #canvas>
  1699     <resource: #canvas>
  1700 
  1700 
  1701     ^ 
  1701     ^ 
  1702      #(FullSpec
  1702     #(FullSpec
  1703         name: valuesEditSpec
  1703        name: valuesEditSpec
  1704         window: 
  1704        window: 
  1705        (WindowSpec
  1705       (WindowSpec
  1706           label: 'DataSet Basic'
  1706          label: 'DataSet Basic'
  1707           name: 'DataSet Basic'
  1707          name: 'DataSet Basic'
  1708           min: (Point 10 10)
  1708          min: (Point 10 10)
  1709           bounds: (Rectangle 0 0 471 417)
  1709          bounds: (Rectangle 0 0 471 417)
  1710         )
  1710        )
  1711         component: 
  1711        component: 
  1712        (SpecCollection
  1712       (SpecCollection
  1713           collection: (
  1713          collection: (
  1714            (VerticalPanelViewSpec
  1714           (VerticalPanelViewSpec
  1715               name: 'VerticalPanel1'
  1715              name: 'VerticalPanel1'
  1716               layout: (LayoutFrame 0 0 0 0 0 1 0 1)
  1716              layout: (LayoutFrame 0 0 0 0 0 1 0 1)
  1717               horizontalLayout: fit
  1717              horizontalLayout: fit
  1718               verticalLayout: top
  1718              verticalLayout: top
  1719               horizontalSpace: 3
  1719              horizontalSpace: 3
  1720               verticalSpace: 3
  1720              verticalSpace: 3
  1721               component: 
  1721              component: 
  1722              (SpecCollection
  1722             (SpecCollection
  1723                 collection: (
  1723                collection: (
  1724                  (FramedBoxSpec
  1724                 (FramedBoxSpec
  1725                     label: 'Value Selectors:'
  1725                    label: 'Value Selectors:'
  1726                     name: 'valuesBox'
  1726                    name: 'valuesBox'
  1727                     labelPosition: topLeft
  1727                    labelPosition: topLeft
  1728                     translateLabel: true
  1728                    translateLabel: true
  1729                     component: 
  1729                    component: 
  1730                    (SpecCollection
  1730                   (SpecCollection
  1731                       collection: (
  1731                      collection: (
  1732                        (LabelSpec
  1732                       (LabelSpec
  1733                           label: 'Read:'
  1733                          label: 'Read:'
  1734                           name: 'readLabel'
  1734                          name: 'readLabel'
  1735                           layout: (AlignmentOrigin 94 0 15 0 1 0.5)
  1735                          layout: (AlignmentOrigin 116 0 15 0 1 0.5)
  1736                           activeHelpKey: valuesReadSelector
  1736                          activeHelpKey: valuesReadSelector
  1737                           translateLabel: true
  1737                          translateLabel: true
  1738                           resizeForLabel: true
  1738                          resizeForLabel: true
  1739                           adjust: right
  1739                          adjust: right
  1740                         )
       
  1741                        (InputFieldSpec
       
  1742                           name: 'readSelector'
       
  1743                           layout: (LayoutFrame 97 0 4 0 2 1.0 26 0)
       
  1744                           activeHelpKey: valuesReadSelector
       
  1745                           tabable: true
       
  1746                           model: readSelector
       
  1747                           group: inputGroup
       
  1748                           type: symbolOrNil
       
  1749                           acceptOnLostFocus: false
       
  1750                           acceptChannel: acceptChannel
       
  1751                           modifiedChannel: modifiedChannel
       
  1752                           acceptOnPointerLeave: false
       
  1753                         )
       
  1754                        (LabelSpec
       
  1755                           label: 'Write:'
       
  1756                           name: 'writeLabel'
       
  1757                           layout: (AlignmentOrigin 94 0 40 0 1 0.5)
       
  1758                           activeHelpKey: valuesWriteSelector
       
  1759                           translateLabel: true
       
  1760                           resizeForLabel: true
       
  1761                           adjust: right
       
  1762                         )
       
  1763                        (InputFieldSpec
       
  1764                           name: 'writeSelector'
       
  1765                           layout: (LayoutFrame 97 0 29 0 2 1.0 51 0)
       
  1766                           activeHelpKey: valuesWriteSelector
       
  1767                           tabable: true
       
  1768                           model: writeSelector
       
  1769                           group: inputGroup
       
  1770                           type: symbolOrNil
       
  1771                           acceptOnLostFocus: false
       
  1772                           acceptChannel: acceptChannel
       
  1773                           modifiedChannel: modifiedChannel
       
  1774                           acceptOnPointerLeave: false
       
  1775                         )
       
  1776                        (LabelSpec
       
  1777                           label: 'Converter:'
       
  1778                           name: 'converterLabel'
       
  1779                           layout: (AlignmentOrigin 94 0 65 0 1 0.5)
       
  1780                           activeHelpKey: converterSelector
       
  1781                           translateLabel: true
       
  1782                           resizeForLabel: true
       
  1783                           adjust: right
       
  1784                         )
       
  1785                        (InputFieldSpec
       
  1786                           name: 'converterField'
       
  1787                           layout: (LayoutFrame 97 0 54 0 2 1.0 76 0)
       
  1788                           activeHelpKey: converterSelector
       
  1789                           tabable: true
       
  1790                           model: converterSelector
       
  1791                           group: inputGroup
       
  1792                           type: symbolOrNil
       
  1793                           acceptOnLostFocus: false
       
  1794                           acceptChannel: acceptChannel
       
  1795                           modifiedChannel: modifiedChannel
       
  1796                           acceptOnPointerLeave: false
       
  1797                         )
       
  1798                        (LabelSpec
       
  1799                           label: 'Print:'
       
  1800                           name: 'printLabel'
       
  1801                           layout: (AlignmentOrigin 94 0 90 0 1 0.5)
       
  1802                           activeHelpKey: valuesPrintSelector
       
  1803                           translateLabel: true
       
  1804                           resizeForLabel: true
       
  1805                           adjust: right
       
  1806                         )
       
  1807                        (InputFieldSpec
       
  1808                           name: 'printSelector'
       
  1809                           layout: (LayoutFrame 97 0 79 0 2 1.0 101 0)
       
  1810                           activeHelpKey: valuesPrintSelector
       
  1811                           tabable: true
       
  1812                           model: printSelector
       
  1813                           group: inputGroup
       
  1814                           type: symbolOrNil
       
  1815                           acceptOnLostFocus: false
       
  1816                           acceptChannel: acceptChannel
       
  1817                           modifiedChannel: modifiedChannel
       
  1818                           acceptOnPointerLeave: false
       
  1819                         )
       
  1820                        (LabelSpec
       
  1821                           label: 'Visibility:'
       
  1822                           name: 'visibilityLabel'
       
  1823                           layout: (AlignmentOrigin 94 0 115 0 1 0.5)
       
  1824                           activeHelpKey: valuesVisibilitySelector
       
  1825                           translateLabel: true
       
  1826                           resizeForLabel: true
       
  1827                           adjust: right
       
  1828                         )
       
  1829                        (InputFieldSpec
       
  1830                           name: 'visibilitySelector'
       
  1831                           layout: (LayoutFrame 97 0 104 0 2 1.0 126 0)
       
  1832                           activeHelpKey: valuesVisibilitySelector
       
  1833                           tabable: true
       
  1834                           model: visibilitySelector
       
  1835                           group: inputGroup
       
  1836                           type: symbolOrNil
       
  1837                           acceptOnLostFocus: false
       
  1838                           acceptChannel: acceptChannel
       
  1839                           modifiedChannel: modifiedChannel
       
  1840                           acceptOnPointerLeave: false
       
  1841                         )
       
  1842                        )
  1740                        )
  1843                      
  1741                       (InputFieldSpec
  1844                     )
  1742                          name: 'readSelector'
  1845                     extent: (Point 471 160)
  1743                          layout: (LayoutFrame 116 0 4 0 2 1.0 26 0)
  1846                   )
  1744                          activeHelpKey: valuesReadSelector
  1847                  (FramedBoxSpec
  1745                          tabable: true
  1848                     label: 'Range:'
  1746                          model: readSelector
  1849                     name: 'rangeBox'
  1747                          group: inputGroup
  1850                     labelPosition: topLeft
  1748                          type: symbolOrNil
  1851                     translateLabel: true
  1749                          acceptOnLostFocus: false
  1852                     component: 
  1750                          acceptChannel: acceptChannel
  1853                    (SpecCollection
  1751                          modifiedChannel: modifiedChannel
  1854                       collection: (
  1752                          acceptOnPointerLeave: false
  1855                        (LabelSpec
       
  1856                           label: 'Min:'
       
  1857                           name: 'Label1'
       
  1858                           layout: (LayoutFrame 11 0 3 0 94 0 20 0)
       
  1859                           activeHelpKey: minValue
       
  1860                           translateLabel: true
       
  1861                           resizeForLabel: true
       
  1862                           adjust: right
       
  1863                         )
       
  1864                        (InputFieldSpec
       
  1865                           name: 'EntryField1'
       
  1866                           layout: (LayoutFrame 97 0 1 0 20 0.5 23 0)
       
  1867                           activeHelpKey: minValue
       
  1868                           tabable: true
       
  1869                           model: minValue
       
  1870                           group: inputGroup
       
  1871                           type: numberOrNil
       
  1872                           acceptOnLeave: true
       
  1873                           acceptOnLostFocus: true
       
  1874                           acceptChannel: acceptChannel
       
  1875                           modifiedChannel: modifiedChannel
       
  1876                           acceptOnPointerLeave: true
       
  1877                         )
       
  1878                        (LabelSpec
       
  1879                           label: 'Max:'
       
  1880                           name: 'Label2'
       
  1881                           layout: (LayoutFrame 21 0.5 3 0 70 0.5 20 0)
       
  1882                           activeHelpKey: maxValue
       
  1883                           translateLabel: true
       
  1884                           resizeForLabel: true
       
  1885                           adjust: right
       
  1886                         )
       
  1887                        (InputFieldSpec
       
  1888                           name: 'EntryField2'
       
  1889                           layout: (LayoutFrame 70 0.5 1 0 -2 1.0 23 0)
       
  1890                           activeHelpKey: maxValue
       
  1891                           tabable: true
       
  1892                           model: maxValue
       
  1893                           group: inputGroup
       
  1894                           type: numberOrNil
       
  1895                           acceptOnLeave: true
       
  1896                           acceptOnLostFocus: true
       
  1897                           acceptChannel: acceptChannel
       
  1898                           modifiedChannel: modifiedChannel
       
  1899                           acceptOnPointerLeave: true
       
  1900                         )
       
  1901                        )
  1753                        )
  1902                      
  1754                       (LabelSpec
  1903                     )
  1755                          label: 'Write:'
  1904                     extent: (Point 471 56)
  1756                          name: 'writeLabel'
  1905                   )
  1757                          layout: (AlignmentOrigin 116 0 40 0 1 0.5)
  1906                  (FramedBoxSpec
  1758                          activeHelpKey: valuesWriteSelector
  1907                     label: 'Popup Menu:'
  1759                          translateLabel: true
  1908                     name: 'menusBox'
  1760                          resizeForLabel: true
  1909                     labelPosition: topLeft
  1761                          adjust: right
  1910                     translateLabel: true
       
  1911                     component: 
       
  1912                    (SpecCollection
       
  1913                       collection: (
       
  1914                        (LabelSpec
       
  1915                           label: 'Selector:'
       
  1916                           name: 'menuLabel'
       
  1917                           layout: (AlignmentOrigin 94 0 12 0 1 0.5)
       
  1918                           activeHelpKey: valuesMenuSelector
       
  1919                           translateLabel: true
       
  1920                           resizeForLabel: true
       
  1921                           adjust: right
       
  1922                         )
       
  1923                        (InputFieldSpec
       
  1924                           name: 'menuSelector'
       
  1925                           layout: (LayoutFrame 97 0 1 0 2 1.0 23 0)
       
  1926                           activeHelpKey: valuesMenuSelector
       
  1927                           tabable: true
       
  1928                           model: menu
       
  1929                           group: inputGroup
       
  1930                           type: symbolOrNil
       
  1931                           acceptOnLostFocus: false
       
  1932                           acceptChannel: acceptChannel
       
  1933                           modifiedChannel: modifiedChannel
       
  1934                           acceptOnPointerLeave: false
       
  1935                         )
       
  1936                        (CheckBoxSpec
       
  1937                           label: 'Fetch Menu from Application'
       
  1938                           name: 'CheckBox1'
       
  1939                           layout: (LayoutFrame 93 0 28 0 375 0 50 0)
       
  1940                           activeHelpKey: valuesMenuFromApplication
       
  1941                           model: menuFromApplication
       
  1942                           translateLabel: true
       
  1943                           valueChangeSelector: setModified
       
  1944                         )
       
  1945                        )
  1762                        )
  1946                      
  1763                       (InputFieldSpec
  1947                     )
  1764                          name: 'writeSelector'
  1948                     extent: (Point 471 80)
  1765                          layout: (LayoutFrame 116 0 29 0 2 1.0 51 0)
  1949                   )
  1766                          activeHelpKey: valuesWriteSelector
  1950                  (FramedBoxSpec
  1767                          tabable: true
  1951                     label: 'Combo List/Box Selectors:'
  1768                          model: writeSelector
  1952                     name: 'comboSelectorsBox'
  1769                          group: inputGroup
  1953                     labelPosition: topLeft
  1770                          type: symbolOrNil
  1954                     translateLabel: true
  1771                          acceptOnLostFocus: false
  1955                     component: 
  1772                          acceptChannel: acceptChannel
  1956                    (SpecCollection
  1773                          modifiedChannel: modifiedChannel
  1957                       collection: (
  1774                          acceptOnPointerLeave: false
  1958                        (LabelSpec
       
  1959                           label: 'Choices:'
       
  1960                           name: 'ChoicesLabel'
       
  1961                           layout: (AlignmentOrigin 94 0 15 0 1 0.5)
       
  1962                           activeHelpKey: valuesChoicesSelector
       
  1963                           translateLabel: true
       
  1964                           resizeForLabel: true
       
  1965                           adjust: right
       
  1966                         )
       
  1967                        (InputFieldSpec
       
  1968                           name: 'ChoicesField'
       
  1969                           layout: (LayoutFrame 97 0 4 0 2 1.0 26 0)
       
  1970                           activeHelpKey: valuesChoicesSelector
       
  1971                           tabable: true
       
  1972                           model: choices
       
  1973                           group: inputGroup
       
  1974                           type: symbolOrNil
       
  1975                           acceptOnLeave: false
       
  1976                           acceptOnLostFocus: false
       
  1977                           acceptChannel: acceptChannel
       
  1978                           modifiedChannel: modifiedChannel
       
  1979                           acceptOnPointerLeave: false
       
  1980                         )
       
  1981                        (LabelSpec
       
  1982                           label: 'Xlated Choices:'
       
  1983                           name: 'XChoicesLabel'
       
  1984                           layout: (AlignmentOrigin 94 0 40 0 1 0.5)
       
  1985                           activeHelpKey: valuesXChoicesSelector
       
  1986                           translateLabel: true
       
  1987                           resizeForLabel: true
       
  1988                           adjust: right
       
  1989                         )
       
  1990                        (InputFieldSpec
       
  1991                           name: 'XChoicesField'
       
  1992                           layout: (LayoutFrame 97 0 29 0 2 1.0 51 0)
       
  1993                           activeHelpKey: valuesXChoicesSelector
       
  1994                           tabable: true
       
  1995                           model: translatedChoices
       
  1996                           group: inputGroup
       
  1997                           type: symbolOrNil
       
  1998                           acceptOnLeave: false
       
  1999                           acceptOnLostFocus: false
       
  2000                           acceptChannel: acceptChannel
       
  2001                           modifiedChannel: modifiedChannel
       
  2002                           acceptOnPointerLeave: false
       
  2003                         )
       
  2004                        (LabelSpec
       
  2005                           label: 'Editable:'
       
  2006                           name: 'EditableLabel'
       
  2007                           layout: (AlignmentOrigin 94 0 65 0 1 0.5)
       
  2008                           activeHelpKey: showComboFieldSelector
       
  2009                           translateLabel: true
       
  2010                           resizeForLabel: true
       
  2011                           adjust: right
       
  2012                         )
       
  2013                        (InputFieldSpec
       
  2014                           name: 'EditableField'
       
  2015                           layout: (LayoutFrame 97 0 54 0 2 1.0 76 0)
       
  2016                           activeHelpKey: showComboFieldSelector
       
  2017                           tabable: true
       
  2018                           model: showComboFieldSelector
       
  2019                           group: inputGroup
       
  2020                           type: symbolOrNil
       
  2021                           acceptOnLeave: false
       
  2022                           acceptOnLostFocus: false
       
  2023                           acceptChannel: acceptChannel
       
  2024                           modifiedChannel: modifiedChannel
       
  2025                           acceptOnPointerLeave: false
       
  2026                         )
       
  2027                        )
  1775                        )
  2028                      
  1776                       (LabelSpec
  2029                     )
  1777                          label: 'Converter:'
  2030                     extent: (Point 471 107)
  1778                          name: 'converterLabel'
  2031                   )
  1779                          layout: (AlignmentOrigin 116 0 65 0 1 0.5)
       
  1780                          activeHelpKey: converterSelector
       
  1781                          translateLabel: true
       
  1782                          resizeForLabel: true
       
  1783                          adjust: right
       
  1784                        )
       
  1785                       (InputFieldSpec
       
  1786                          name: 'converterField'
       
  1787                          layout: (LayoutFrame 116 0 54 0 2 1.0 76 0)
       
  1788                          activeHelpKey: converterSelector
       
  1789                          tabable: true
       
  1790                          model: converterSelector
       
  1791                          group: inputGroup
       
  1792                          type: symbolOrNil
       
  1793                          acceptOnLostFocus: false
       
  1794                          acceptChannel: acceptChannel
       
  1795                          modifiedChannel: modifiedChannel
       
  1796                          acceptOnPointerLeave: false
       
  1797                        )
       
  1798                       (LabelSpec
       
  1799                          label: 'Print:'
       
  1800                          name: 'printLabel'
       
  1801                          layout: (AlignmentOrigin 116 0 90 0 1 0.5)
       
  1802                          activeHelpKey: valuesPrintSelector
       
  1803                          translateLabel: true
       
  1804                          resizeForLabel: true
       
  1805                          adjust: right
       
  1806                        )
       
  1807                       (InputFieldSpec
       
  1808                          name: 'printSelector'
       
  1809                          layout: (LayoutFrame 116 0 79 0 2 1.0 101 0)
       
  1810                          activeHelpKey: valuesPrintSelector
       
  1811                          tabable: true
       
  1812                          model: printSelector
       
  1813                          group: inputGroup
       
  1814                          type: symbolOrNil
       
  1815                          acceptOnLostFocus: false
       
  1816                          acceptChannel: acceptChannel
       
  1817                          modifiedChannel: modifiedChannel
       
  1818                          acceptOnPointerLeave: false
       
  1819                        )
       
  1820                       (LabelSpec
       
  1821                          label: 'Visibility:'
       
  1822                          name: 'visibilityLabel'
       
  1823                          layout: (AlignmentOrigin 116 0 115 0 1 0.5)
       
  1824                          activeHelpKey: valuesVisibilitySelector
       
  1825                          translateLabel: true
       
  1826                          resizeForLabel: true
       
  1827                          adjust: right
       
  1828                        )
       
  1829                       (InputFieldSpec
       
  1830                          name: 'visibilitySelector'
       
  1831                          layout: (LayoutFrame 116 0 104 0 2 1.0 126 0)
       
  1832                          activeHelpKey: valuesVisibilitySelector
       
  1833                          tabable: true
       
  1834                          model: visibilitySelector
       
  1835                          group: inputGroup
       
  1836                          type: symbolOrNil
       
  1837                          acceptOnLostFocus: false
       
  1838                          acceptChannel: acceptChannel
       
  1839                          modifiedChannel: modifiedChannel
       
  1840                          acceptOnPointerLeave: false
       
  1841                        )
       
  1842                       )
       
  1843                     
       
  1844                    )
       
  1845                    extent: (Point 471 160)
  2032                  )
  1846                  )
  2033                
  1847                 (FramedBoxSpec
  2034               )
  1848                    label: 'Range:'
  2035             )
  1849                    name: 'rangeBox'
       
  1850                    labelPosition: topLeft
       
  1851                    translateLabel: true
       
  1852                    component: 
       
  1853                   (SpecCollection
       
  1854                      collection: (
       
  1855                       (LabelSpec
       
  1856                          label: 'Min:'
       
  1857                          name: 'Label1'
       
  1858                          layout: (LayoutFrame 33 0 3 0 116 0 20 0)
       
  1859                          activeHelpKey: minValue
       
  1860                          translateLabel: true
       
  1861                          resizeForLabel: true
       
  1862                          adjust: right
       
  1863                        )
       
  1864                       (InputFieldSpec
       
  1865                          name: 'EntryField1'
       
  1866                          layout: (LayoutFrame 116 0 1 0 21 0.5 23 0)
       
  1867                          activeHelpKey: minValue
       
  1868                          tabable: true
       
  1869                          model: minValue
       
  1870                          group: inputGroup
       
  1871                          type: numberOrNil
       
  1872                          acceptOnLeave: true
       
  1873                          acceptOnLostFocus: true
       
  1874                          acceptChannel: acceptChannel
       
  1875                          modifiedChannel: modifiedChannel
       
  1876                          acceptOnPointerLeave: true
       
  1877                        )
       
  1878                       (LabelSpec
       
  1879                          label: 'Max:'
       
  1880                          name: 'Label2'
       
  1881                          layout: (LayoutFrame 21 0.5 3 0 70 0.5 20 0)
       
  1882                          activeHelpKey: maxValue
       
  1883                          translateLabel: true
       
  1884                          resizeForLabel: true
       
  1885                          adjust: right
       
  1886                        )
       
  1887                       (InputFieldSpec
       
  1888                          name: 'EntryField2'
       
  1889                          layout: (LayoutFrame 70 0.5 1 0 -2 1.0 23 0)
       
  1890                          activeHelpKey: maxValue
       
  1891                          tabable: true
       
  1892                          model: maxValue
       
  1893                          group: inputGroup
       
  1894                          type: numberOrNil
       
  1895                          acceptOnLeave: true
       
  1896                          acceptOnLostFocus: true
       
  1897                          acceptChannel: acceptChannel
       
  1898                          modifiedChannel: modifiedChannel
       
  1899                          acceptOnPointerLeave: true
       
  1900                        )
       
  1901                       )
       
  1902                     
       
  1903                    )
       
  1904                    extent: (Point 471 56)
       
  1905                  )
       
  1906                 (FramedBoxSpec
       
  1907                    label: 'Popup Menu:'
       
  1908                    name: 'menusBox'
       
  1909                    labelPosition: topLeft
       
  1910                    translateLabel: true
       
  1911                    component: 
       
  1912                   (SpecCollection
       
  1913                      collection: (
       
  1914                       (LabelSpec
       
  1915                          label: 'Selector:'
       
  1916                          name: 'menuLabel'
       
  1917                          layout: (AlignmentOrigin 116 0 12 0 1 0.5)
       
  1918                          activeHelpKey: valuesMenuSelector
       
  1919                          translateLabel: true
       
  1920                          resizeForLabel: true
       
  1921                          adjust: right
       
  1922                        )
       
  1923                       (InputFieldSpec
       
  1924                          name: 'menuSelector'
       
  1925                          layout: (LayoutFrame 116 0 1 0 2 1.0 23 0)
       
  1926                          activeHelpKey: valuesMenuSelector
       
  1927                          tabable: true
       
  1928                          model: menu
       
  1929                          group: inputGroup
       
  1930                          type: symbolOrNil
       
  1931                          acceptOnLostFocus: false
       
  1932                          acceptChannel: acceptChannel
       
  1933                          modifiedChannel: modifiedChannel
       
  1934                          acceptOnPointerLeave: false
       
  1935                        )
       
  1936                       (CheckBoxSpec
       
  1937                          label: 'Fetch Menu from Application'
       
  1938                          name: 'CheckBox1'
       
  1939                          layout: (LayoutFrame 116 0 28 0 398 0 50 0)
       
  1940                          activeHelpKey: valuesMenuFromApplication
       
  1941                          model: menuFromApplication
       
  1942                          translateLabel: true
       
  1943                          valueChangeSelector: setModified
       
  1944                        )
       
  1945                       )
       
  1946                     
       
  1947                    )
       
  1948                    extent: (Point 471 80)
       
  1949                  )
       
  1950                 (FramedBoxSpec
       
  1951                    label: 'Combo List/Box Selectors:'
       
  1952                    name: 'comboSelectorsBox'
       
  1953                    labelPosition: topLeft
       
  1954                    translateLabel: true
       
  1955                    component: 
       
  1956                   (SpecCollection
       
  1957                      collection: (
       
  1958                       (LabelSpec
       
  1959                          label: 'Choices:'
       
  1960                          name: 'ChoicesLabel'
       
  1961                          layout: (AlignmentOrigin 116 0 15 0 1 0.5)
       
  1962                          activeHelpKey: valuesChoicesSelector
       
  1963                          translateLabel: true
       
  1964                          resizeForLabel: true
       
  1965                          adjust: right
       
  1966                        )
       
  1967                       (InputFieldSpec
       
  1968                          name: 'ChoicesField'
       
  1969                          layout: (LayoutFrame 116 0 4 0 2 1.0 26 0)
       
  1970                          activeHelpKey: valuesChoicesSelector
       
  1971                          tabable: true
       
  1972                          model: choices
       
  1973                          group: inputGroup
       
  1974                          type: symbolOrNil
       
  1975                          acceptOnLeave: false
       
  1976                          acceptOnLostFocus: false
       
  1977                          acceptChannel: acceptChannel
       
  1978                          modifiedChannel: modifiedChannel
       
  1979                          acceptOnPointerLeave: false
       
  1980                        )
       
  1981                       (LabelSpec
       
  1982                          label: 'Xlated Choices:'
       
  1983                          name: 'XChoicesLabel'
       
  1984                          layout: (AlignmentOrigin 116 0 40 0 1 0.5)
       
  1985                          activeHelpKey: valuesXChoicesSelector
       
  1986                          translateLabel: true
       
  1987                          resizeForLabel: true
       
  1988                          adjust: right
       
  1989                        )
       
  1990                       (InputFieldSpec
       
  1991                          name: 'XChoicesField'
       
  1992                          layout: (LayoutFrame 116 0 29 0 2 1.0 51 0)
       
  1993                          activeHelpKey: valuesXChoicesSelector
       
  1994                          tabable: true
       
  1995                          model: translatedChoices
       
  1996                          group: inputGroup
       
  1997                          type: symbolOrNil
       
  1998                          acceptOnLeave: false
       
  1999                          acceptOnLostFocus: false
       
  2000                          acceptChannel: acceptChannel
       
  2001                          modifiedChannel: modifiedChannel
       
  2002                          acceptOnPointerLeave: false
       
  2003                        )
       
  2004                       (LabelSpec
       
  2005                          label: 'Editable:'
       
  2006                          name: 'EditableLabel'
       
  2007                          layout: (AlignmentOrigin 116 0 65 0 1 0.5)
       
  2008                          activeHelpKey: showComboFieldSelector
       
  2009                          translateLabel: true
       
  2010                          resizeForLabel: true
       
  2011                          adjust: right
       
  2012                        )
       
  2013                       (InputFieldSpec
       
  2014                          name: 'EditableField'
       
  2015                          layout: (LayoutFrame 116 0 54 0 2 1.0 76 0)
       
  2016                          activeHelpKey: showComboFieldSelector
       
  2017                          tabable: true
       
  2018                          model: showComboFieldSelector
       
  2019                          group: inputGroup
       
  2020                          type: symbolOrNil
       
  2021                          acceptOnLeave: false
       
  2022                          acceptOnLostFocus: false
       
  2023                          acceptChannel: acceptChannel
       
  2024                          modifiedChannel: modifiedChannel
       
  2025                          acceptOnPointerLeave: false
       
  2026                        )
       
  2027                       )
       
  2028                     
       
  2029                    )
       
  2030                    extent: (Point 471 107)
       
  2031                  )
       
  2032                 )
       
  2033               
       
  2034              )
  2036            )
  2035            )
  2037          
  2036           )
  2038         )
  2037         
  2039       )
  2038        )
       
  2039      )
  2040 !
  2040 !
  2041 
  2041 
  2042 windowSpec
  2042 windowSpec
  2043     "This resource specification was automatically generated
  2043     "This resource specification was automatically generated
  2044      by the UIPainter of ST/X."
  2044      by the UIPainter of ST/X."