Cross Reference: /ast/src/lib/libtk/library/scrlbar.tcl

Lines Matching refs:delta

249     set delta [$w delta [expr $x - $tkPriv(pressX)] [expr $y - $tkPriv(pressY)]]
252 	    $w set [expr [lindex $tkPriv(initValues) 0] + $delta] \
253 		    [expr [lindex $tkPriv(initValues) 1] + $delta]
255 	    set delta [expr round($delta * [lindex $tkPriv(initValues) 0])]
257 		    [expr [lindex $tkPriv(initValues) 2] + $delta] \
258 		    [expr [lindex $tkPriv(initValues) 3] + $delta]]
261 	tkScrollToPos $w [expr $tkPriv(initPos) + $delta]
280 	set delta [$w delta [expr $x - $tkPriv(pressX)] \
282 	tkScrollToPos $w [expr $tkPriv(initPos) + $delta]