1823 !UIPainter methodsFor:'building editors'! |
1823 !UIPainter methodsFor:'building editors'! |
1824 |
1824 |
1825 openDataSetColumnEditor |
1825 openDataSetColumnEditor |
1826 "opens a Table Column Editor on current widget" |
1826 "opens a Table Column Editor on current widget" |
1827 |
1827 |
1828 |editor| |
1828 |cls editor| |
1829 |
1829 |
1830 (self resolveName:specClass) isNil ifTrue:[ |
1830 (cls := self resolveName:specClass) isNil ifTrue:[ |
1831 self askForSaving ifFalse: [^self] |
1831 self askForSaving ifFalse: [^self] |
1832 ]. |
1832 ]. |
1833 |
1833 |
1834 editor := DataSetBuilder new. |
1834 editor := DataSetBuilder new. |
1835 editor masterApplication:self. |
1835 editor masterApplication:self. |
|
1836 editor specClass: cls. |
1836 "/ editor columns:self specTool specification columns. |
1837 "/ editor columns:self specTool specification columns. |
1837 editor rowClassName:(self specTool specification rowClassName). |
1838 editor rowClassName:(self specTool specification rowClassName). |
1838 editor openModalOnResourceSpec:(self specTool specification columns). |
1839 editor openModalOnResourceSpec:(self specTool specification columns). |
1839 "/ editor openModal. |
1840 "/ editor openModal. |
1840 |
1841 |
1841 editor hasChanged ifTrue:[ |
1842 editor hasSaved ifFalse:[ |
1842 self specTool specification columns:(editor columns). |
1843 self specTool specification columns:(editor columns). |
1843 self specTool specification rowClassName:(editor rowClassName). |
1844 self specTool specification rowClassName:(editor rowClassName). |
1844 self modifiedChannel value:true. |
1845 ] ifTrue: [ |
1845 ]. |
1846 self specTool specification columns:nil. |
|
1847 self specTool specification rowClassName:nil. |
|
1848 ]. |
|
1849 self modifiedChannel value: editor modified. |
|
1850 |
1846 ! |
1851 ! |
1847 |
1852 |
1848 openEditMenu |
1853 openEditMenu |
1849 "opens a Menu Editor on current widget" |
1854 "opens a Menu Editor on current widget" |
1850 |
1855 |