Re: [ltk-user] binding an event to a canvas element

On Thu, Jun 21, 2012 at 05:38:27PM -0400, Jerry Vinokurov wrote:

Hi all,

I'm trying to bind an event to a canvas element, in this case an arc. I create the arc using something like

(let* ((pie-canvas (make-instance 'canvas :height 200 :width 200)) (arc1 (create-arc pie-canvas 0 0 200 200 :start 0 :extent 45)))

and then later inside the let, I would like to bind a button click event to the arc. I have no problem binding to the canvas itself using (bind), and in Python, I can use the tag_bind method of the Canvas class to achieve this. However, I can't figure out the Ltk equivalent, if there is one. Any suggestions would be appreciated.

Not sure this answer your question but ltk have a tagbind (never used it actually).

(ltk:tagbind pie-canvas tag "<ButtonPress-1>" function)

Or you can bind the whole canvas:

(ltk:bind pie-canvas "<ButtonPress-1>" function)

But You should figure out how "function" could search and manage for the clicked arc of course.

Bye. C.