Lines Matching refs:el
183 # el - The element for the selection operation (typically the
186 proc tkListboxBeginSelect {w el} {
189 if [$w selection includes $el] {
190 $w selection clear $el
192 $w selection set $el
196 $w selection set $el
197 $w selection anchor $el
199 set tkPriv(listboxPrev) $el
211 # el - The element under the pointer (must be a number).
213 proc tkListboxMotion {w el} {
215 if {$el == $tkPriv(listboxPrev)} {
222 $w selection set $el
223 set tkPriv(listboxPrev) $el
228 $w selection clear $i $el
229 $w selection set anchor $el
231 $w selection clear $i $el
232 $w selection clear anchor $el
234 while {($i < $el) && ($i < $anchor)} {
240 while {($i > $el) && ($i > $anchor)} {
246 set tkPriv(listboxPrev) $el
260 # el - The element for the selection operation (typically the
263 proc tkListboxBeginExtend {w el} {
266 tkListboxMotion $w $el
279 # el - The element for the selection operation (typically the
282 proc tkListboxBeginToggle {w el} {
286 set tkPriv(listboxPrev) $el
287 $w selection anchor $el
288 if [$w selection includes $el] {
289 $w selection clear $el
291 $w selection set $el
378 # Otherwise it moves the active element to el and, if we're in
383 # el - An integer element number.
385 proc tkListboxDataExtend {w el} {
388 $w activate $el
389 $w see $el
391 tkListboxMotion $w $el
394 $w activate $el
395 $w see $el