Changeset 2035 for trunk/examples/video


Ignore:
Timestamp:
Jan 16, 2011 10:09:17 AM (10 years ago)
Author:
dkearney
Message:

adding aspect ratio calculations.
disable analyze button when no movie has been choosen in piv
rename some functions

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/examples/video/piv/piv.tcl

    r2028 r2035  
    139139button $analyze.go \
    140140    -text "Analyze" \
     141    -state disabled \
    141142    -command {
    142143        $vp video stop
     
    148149pack $analyze.step3 -side left -anchor w
    149150pack $analyze.go -anchor center
     151
     152proc buttonState {b var args} {
     153    upvar #0 $var v
     154    set state disabled
     155    if {"" != $v} {
     156       set state normal
     157    }
     158    $b configure -state $state
     159}
     160
     161trace add variable previewVar write "buttonState $analyze.go previewVar"
    150162
    151163
Note: See TracChangeset for help on using the changeset viewer.