Description: |
Hi,
There is no current method to test the bindings
of the entry based on the Combobox widget because
the API does not provide the path to the
entry.
Suppose the method "getentry" exists.
One can generate an event so that the command
bound to the entry is fired.
() 49 % package require BWidget
1.8
() 50 % ComboBox .mycbb
.mycbb
() 52 % set ntr [.mycbb getentry]
.mycbb.e
() 54 % configure .mycbb -command {puts "COUCOU !"}
() 57 % pack .mycbb
() 63 % focus -force .mycbb.e;event generate .mycbb.e <Return>
COUCOU !
To be able to do this script, I added the following
method which returns the path to the entry.
proc ComboBox::getentry { path } {
return $path.e
}
I would be very pleased if that method was added
to BWidget's Entry, or if someone show me another
way to do this.
By the way, thank you for the great work on Tcllib.
Best regards,
Michaƫl
|