|
|
On May 29, 11:31 pm, Dave Bodenstab <mrd...@xxxxxxxxxx> wrote:
> I must be missing something incredibly obvious, but
> why do I not get anything printed when I click with
> mouse button 1? I've tried a couple of different
> window mgr's on X11, and also tried on windows.
>
> label .l -text Testing
> pack .l -padx 20 -pady 20
> .l configure -background cyan
> bind .l <B1-Button> "puts %W"
> bind . <B1-Button> "puts %W"
> if { "$tcl_platform(platform)" eq "windows" } {
> console show
>
> }
Bind to <Button-1> instead of <B1-Button>.
|
|