Changeset 1204 for branches/sandbox/expgui
- Timestamp:
- Jun 28, 2012 4:24:53 PM (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/sandbox/expgui
r1189 r1204 159 159 source [file join $expgui(scriptdir) disagledit.tcl] 160 160 source [file join $expgui(scriptdir) Geo_Viewer.tcl] 161 # setup Anomalous Dispersion Coefficent Editor 162 source [file join $expgui(scriptdir) anomal.tcl] 161 163 #--------------------------------------------------------------------------- 162 164 # override options with locally defined values … … 1793 1795 } else { 1794 1796 $c configure -state normal 1795 } 1797 } 1796 1798 } 1797 1799 } … … 1815 1817 set expgui(backtermlbl) "" 1816 1818 set expgui(backtypelbl) "" 1817 set expgui(abstypelbl) "" 1819 set expgui(abstypelbl) "" 1818 1820 foreach var {bref bdamp absref absdamp} { 1819 1821 set entrycmd($var) "" … … 1821 1823 } 1822 1824 $expgui(histFrame).top.txt config -text "No Selected Histograms" 1823 grid $expgui(histFrame).top -column 1 -row 0 -sticky nsew 1825 grid $expgui(histFrame).top -column 1 -row 0 -sticky nsew 1824 1826 set expgui(bkglbl) "" 1825 1827 set expgui(abslbl) "" … … 1832 1834 set expgui(backtermlbl) "" 1833 1835 set expgui(backtypelbl) "" 1834 set expgui(abstypelbl) "" 1836 set expgui(abstypelbl) "" 1835 1837 foreach var {bref bdamp absref absdamp} { 1836 1838 set entrycmd($var) "histinfo [list $histlist] $var" 1837 1839 set entryvar($var) [histinfo [lindex $histlist 0] $var] 1838 1840 } 1841 $expgui(histFrame).bb.anom config -state disabled 1839 1842 } else { 1840 1843 set hist $histlist … … 1869 1872 set expgui(abstypelbl) " Model #$abstype, value: [histinfo $hist abscor1]" 1870 1873 } 1874 $expgui(histFrame).bb.anom config -state normal 1871 1875 } 1872 1876 # Top box … … 3893 3897 -command SetHistUseFlags 3894 3898 grid $expgui(histFrame).bb.use -column 2 -row 1 3899 button $expgui(histFrame).bb.anom -text "Edit\n\u0394f' and \u0394f\""\ 3900 -command Edit_Anomalous 3901 grid $expgui(histFrame).bb.anom -column 3 -row 1 3895 3902 3896 3903 # BACKGROUND information.
Note: See TracChangeset
for help on using the changeset viewer.