Changeset 110


Ignore:
Timestamp:
May 4, 2007 11:26:56 AM (15 years ago)
Author:
ajj
Message:

Added code (commented) to put tabs for plot and file data - for future use maybe.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • sans/utils/bt5/bt5plot/bt5plot

    r27 r110  
    22 
    33package require BLT 
     4package require Tix 
    45 
    56#set images(normal) [image create photo -format gif -data { 
     
    333334pack $tvf -side left -fill y -anchor w 
    334335 
     336# Create Notebook 
     337#set nb [tixNoteBook .vp.nb] 
     338#$nb add plot -label "Plot" -underline 0 
     339#$nb add data -label "File Data" -underline 0 
     340#set plottab [frame [$nb subwidget plot].f] 
     341#set datatab [frame [$nb subwidget data].f] 
     342#pack $nb $plottab $datatab -fill both -expand true  
     343 
     344# Create File Details Tab 
     345 
     346 
    335347# Create graph 
     348#set graph [blt::graph $plottab.g] 
    336349set graph [blt::graph .vp.g] 
    337350pack $graph -fill both -expand true -side left -anchor w 
     
    343356bind .filter.filterEntry <Return> {filterTree [%W get]} 
    344357 
    345 #button .filter.filterButton -text "Filter" -command {filterTree [.filter.filterEntry get]}  
    346358pack .filter.filterLabel -side left 
    347359pack .filter.filterEntry -side left  
    348 #pack .filter.filterButton -side left 
    349 #pack .filter.filterReset -side right -padx 25 
    350360 
    351361#Plot controls 
     
    354364button $pcf.filterReset -text "Clear Plot" -command {resetGraph} 
    355365 
    356 ##Frame for radiobutton set to control plot type 
    357 #set ptf [frame .filter.pc.pt -borderwidth 1 -relief raised] 
    358 #radiobutton $ptf.c -text "Counts" -variable plotType -value "count" -command {foreach elem [$graph element show] { changePlotType $elem  }} 
    359 #radiobutton $ptf.cr -text "Count Rate" -variable plotType -value "countrate" -command {foreach elem [$graph element show] { changePlotType $elem  }} 
    360 #radiobutton $ptf.t -text "Trans" -variable plotType -value "trans" -command {foreach elem [$graph element show] { changePlotType $elem  }} 
    361 #radiobutton $ptf.m -text "Mon" -variable plotType -value "mon" -command {foreach elem [$graph element show] { changePlotType $elem  }} 
    362 #$ptf.c select 
    363 #pack $ptf.m -side right 
    364 #pack $ptf.t -side right 
    365 #pack $ptf.cr -side right 
    366 #pack $ptf.c -side right  
    367  
    368 ##Frame for y-axis log/lin choice 
    369 #set logfy [frame .filter.pc.logy -borderwidth 1 -relief raised] 
    370 ##Log/lin radiobutton set 
    371 #radiobutton $logfy.log -text "Log Y" -variable loglinY -value "yes" -command { changeLogLinY } 
    372 #radiobutton $logfy.lin -text "Lin Y" -variable loglinY -value "no" -command { changeLogLinY } 
    373 #$logfy.lin select 
    374 #pack $logfy.log -side right 
    375 #pack $logfy.lin -side right 
    376  
    377 ##Frame for y-axis log/lin choice 
    378 #set logfx [frame .filter.pc.logx -borderwidth 1 -relief raised] 
    379 ##Log/lin radiobutton set 
    380 #radiobutton $logfx.log -text "Log X" -variable loglinX -value "yes" -command { changeLogLinX } 
    381 #radiobutton $logfx.lin -text "Lin X" -variable loglinX -value "no" -command { changeLogLinX } 
    382 #$logfx.lin select 
    383 #pack $logfx.log -side right 
    384 #pack $logfx.lin -side right 
    385  
    386366pack $pcf.filterReset -side right -padx 25 
    387 #pack $logfy -side right 
    388 #pack $logfx -side right 
    389 #pack $ptf -side right 
    390367pack $pcf -side right 
    391368 
Note: See TracChangeset for help on using the changeset viewer.