Lines Matching defs:Entry
7 # - Entry::create
8 # - Entry::configure
9 # - Entry::cget
10 # - Entry::_destroy
11 # - Entry::_init_drag_cmd
12 # - Entry::_end_drag_cmd
13 # - Entry::_drop_cmd
14 # - Entry::_over_cmd
15 # - Entry::_auto_scroll
16 # - Entry::_scroll
19 namespace eval Entry {
20 Widget::define Entry entry DragSite DropSite DynamicHelp
23 # BW Entry so that we avoid the TkResource test for it, which screws up
25 Widget::tkinclude Entry entry :cmd \
47 Widget::declare Entry $declare
48 Widget::addmap Entry "" :cmd { -textvariable {} }
50 DynamicHelp::include Entry balloon
51 DragSite::include Entry "" 3
52 DropSite::include Entry {
59 foreach event [bind Entry] {
60 bind BwEntry $event [bind Entry $event]
68 bind BwEditableEntry <<Copy>> [bind Entry <<Copy>>]
70 bind BwEntry <Return> [list Entry::invoke %W]
71 bind BwEntry <Destroy> [list Entry::_destroy %W]
72 bind BwDisabledEntry <Destroy> [list Entry::_destroy %W]
81 # Command Entry::create
83 proc Entry::create { path args } {
87 array set maps [list Entry {} :cmd {}]
88 array set maps [Widget::parseArgs Entry $args]
92 Widget::initFromODB Entry $path $maps(Entry)
129 DragSite::setdrag $path $path Entry::_init_drag_cmd Entry::_end_drag_cmd 1
130 DropSite::setdrop $path $path Entry::_over_cmd Entry::_drop_cmd 1
136 Widget::create Entry $path
138 "return \[Entry::_path_command [list $path] \$cmd \$args\]"
144 # Command Entry::configure
146 proc Entry::configure { path args } {
149 set Widget::Entry::${path}:opt(-text) [$path:cmd get]
200 set idx [expr {[lsearch [bindtags $path] Bw*Entry] + 1}]
231 DragSite::setdrag $path $path Entry::_init_drag_cmd Entry::_end_drag_cmd
232 DropSite::setdrop $path $path Entry::_over_cmd Entry::_drop_cmd
240 # Command Entry::cget
242 proc Entry::cget { path option } {
251 # Command Entry::invoke
253 proc Entry::invoke { path } {
261 # Command Entry::_path_command
263 proc Entry::_path_command { path cmd larg } {
266 return [eval [linsert $larg 0 Entry::$cmd $path]]
276 # Command Entry::_init_drag_cmd
278 proc Entry::_init_drag_cmd { path X Y top } {
320 # Command Entry::_end_drag_cmd
322 proc Entry::_end_drag_cmd { path target op type dnddata result } {
336 # Command Entry::_drop_cmd
338 proc Entry::_drop_cmd { path source X Y op type dnddata } {
369 # Command Entry::_over_cmd
371 proc Entry::_over_cmd { path source event X Y op type dnddata } {
413 # Command Entry::_auto_scroll
415 proc Entry::_auto_scroll { path x } {
422 set data(afterid) [after 100 [list Entry::_scroll $path -1 $x $xmax]]
429 set data(afterid) [after 100 [list Entry::_scroll $path 1 $x $xmax]]
445 # Command Entry::_scroll
447 proc Entry::_scroll { path dir x xmax } {
455 set data(afterid) [after 100 [list Entry::_scroll $path $dir $x $xmax]]
464 # Command Entry::_destroy
466 proc Entry::_destroy { path } {
476 proc Entry::_themechanged { path } {