January 2006 - ltk-user - mailman3.common-lisp.net

[ltk-user] Ltk 0.88 released!
by Peter Herth 30 Jan '06

30 Jan '06

I am happy to announce that Ltk v. 0.88 just has been released. It took a long time after the last release, but it is filled with detail work. Bugs have been fixed, new functions added, a glossy polish applied. So grab it, and give feeback/questions :) Peter

1 0

Re: [ltk-user] canvas objects
by nik gaffney 28 Jan '06

28 Jan '06

>> Ive been playing around with the canvas widget, and was wondering if there is a >> way to find if a created object is 'selected', or at the same coordinates as >> (ltk:event-x ltk:event-y) without having to manually keep track of each object >> on the canvas. > > It sounds as if you bound an event handler to the canvas widget and > then tried to find a corresponding canvas item. The canvas widget is > really powerful and provides event handlers on the items themselves, > i.e. > > (let ((item (create-line canvas (list x1 y1 x2 y2)))) > (itembind canvas item "<Enter>" (lambda (ev) > (format t "entered item ~A~%" item))) > (itembind canvas item "<Leave>" (lambda (ev) > (format t "left item ~A~%" item)))) > Thanks. I didnt realise that items could also have event handlers, so this simplifies things substantially. nik

1 0

[ltk-user] canvas objects
by nik gaffney 26 Jan '06

26 Jan '06

hello, Ive been playing around with the canvas widget, and was wondering if there is a way to find if a created object is 'selected', or at the same coordinates as (ltk:event-x ltk:event-y) without having to manually keep track of each object on the canvas. also, can anyone recommend a good overview/tutuorial of tk that is online?+ thanks, nik

1 0

[ltk-user] Spinbox
by Marco Gidde 25 Jan '06

25 Jan '06

Hi, the command associated with a SPINBOX irritates me a little bit. When I give a function via the :COMMAND key in MAKE-INSTANCE it has to be a function without arguments, which rises the question, how can I get the value (the VALUE method is not specialized for SPINBOXes). On the other hand (SETF COMMAND) expects a function of one argument and this argument is the value I'm looking for (as a string). Since I don't know anything about a equivalent tcl/tk program I have to ask: is it a bug, a feature and/or a misconception of me? Regards, Marco

2 2

[ltk-user] Look and feel: tile
by Marco Gidde 23 Jan '06

23 Jan '06

Hi, this weekend I started playing with LTK and was really impressed, how easy to use it is. Thank you for this nice piece of software. But of course I have something to complain about and that's Tk's look and feel, which is essentially the only reason I did not try LTK earlier. Searching the web I found a few extension packages, especially Tile, which look much nicer, and even a message from Peter, that there is or will be some support for this in LTK. The latest LTK version I could find is 0.88pre but it contains no hint concerning Tile, so I tried (by copy and modify) something along the line of (defargs t-check-button () activebackground activeforeground anchor background bitmap borderwidth cbcommand compound cursor disabledForeground font foreground height highlightbackground highlightcolor highlightthickness image indicatorOn justify offrelief offvalue onvalue overrelief padx pady relief selectcolor selectimage state takefocus text textvariable underline variable width wraplength) (ltk::defwidget t-check-button (check-button) () "ttk::checkbutton") (with-ltk () (format-wish "package require tile") ... (make-instance 't-check-button :master top :text "ttk checkbutton") ...) and the checkbox even showed up! But this is certainly more a hack than anything else and some real support would be very welcome. So my question is, did I oversee some newer LTK package or an LTK add-on or something or when will it be released? Regards, Marco

2 4

[ltk-user] Release Candidate 2 of ltk-0.88 available
by Peter Herth 23 Jan '06

23 Jan '06

Hello to all Ltk users, especially to the newly joined list members! I just uploaded the latest ltk release, so if you want to have a look and point out to any show-stopping bugs, you can find it here: http://www.peter-herth.de/ltk/ltk-0.88pre2.lisp If not too many bugs are found, the official release will follow in a few days. Peter

1 0

Re: [ltk-user] Very noob question
by Thomas F. Burdick 20 Jan '06

20 Jan '06

By the way, when reporting bugs/issues it's helpful to say what lisp implementation you're using, and what OS/architecture. On 1/20/06, Arie van Wingerden <xapwing(a)gmail.com> wrote: > Hi Thomas, > > thanks for your answer. > However, I now get another error. > I execute the steps as you suggested, which works well. > After that I execute: > (ltktest) > as in the example and I get this trace info: > > Win32 error 2 (ERROR_FILE_NOT_FOUND): The system cannot find the file > specified. > [Condition of type SYSTEM::SIMPLE-OS-ERROR] Since you're running on Windows, have you installed Tcl/Tk? If not, you can download it from here: http://www.activestate.com/Products/Download/Download.plex?id=ActiveTcl You will need to make sure that the *wish-pathname* variable is set to the path to wish.exe (eg, "C:\Tcl\bin\wish.exe"). This is omitted from the simplest example because typical Unix systems have tcl/tk installed and wish in the path. The installation instructions should probably be updated to mention Windows issues. > Hope this makes the problem evident for you! > Thanks for your help! No problem -- let me know if this works for you. (And be sure to hit "Reply to all" so you'll get the list as well).

2 2

[ltk-user] Very noob question
by Arie van Wingerden 20 Jan '06

20 Jan '06

Hi, when trying to install LTK I get an error with (use-package 'ltk) The (compile-file "ltk") works fine. The (load "ltk") works also fine. But (use-package 'ltk) produces the following error: (USE-PACKAGE (#<PACKAGE LTK>) #1=#<PACKAGE COMMON-LISP-USER>): 1 name conflicts remain Which symbol with name "VALUE" should be accessible in #1#? [Condition of type SYSTEM::SIMPLE-PACKAGE-ERROR] I don't understand it, because I haven't worked with packages yet. Any ideas? -- Met vriendelijke groet / with kind regards, Arie van Wingerden

2 1

Fwd: [ltk-user] paren-matching entry widgets, and unbinding the TAB key.
by Peter Herth 10 Jan '06

10 Jan '06

I forget to reply to all, so here is my reply ---------- Forwarded message ---------- From: Peter Herth <herth(a)peter-herth.de> Date: Jan 9, 2006 11:25 PM Subject: Re: [ltk-user] paren-matching entry widgets, and unbinding the TAB key. To: michael graffam <mikegraffam(a)yahoo.com> On 1/9/06, michael graffam <mikegraffam(a)yahoo.com> wrote: > Hello all, > > I was wondering if someone on this list might be able > to help me make a parenthesis matching entry widget? > > What I need to know is how (if it is even possible) I > can find where the text cursor is in an entry widget. > The approach I'd like to use is to bind #\) to a > function which looks at the current position of the > text cursor and iterates backwards through the string > looking for the matching #\( .. then the icursor > position will be set to this location for a second to > indicate to the user the matching paren, and then > placed back to the original position. This is really tricky, I just browsed through the Tk docs to the entry widget, and my conclusion is, that it probably is a better idea to use a one-line text widget, this gives you many more options for inquiring the widgets state as well as for the display (like flashing the matching parens in color) > The second question that I have is how I might unbind > the TAB key in my entry widget so that hitting TAB > will not move focus to the next widget in the window. > I'd like TAB to invoke my auto-completion routine > (using Control-Space at the moment). You need to prevent the propagation of the TAB keypress to the widget. One can do this by binding an event so it does not propagate. Do do this I added the :exclusive keyword argument to bind, this will be in the next released version of Ltk. Peter -- Dipl.-Phys. Peter Herth

1 0

[ltk-user] paren-matching entry widgets, and unbinding the TAB key.
by michael graffam 09 Jan '06

09 Jan '06

Hello all, I was wondering if someone on this list might be able to help me make a parenthesis matching entry widget? What I need to know is how (if it is even possible) I can find where the text cursor is in an entry widget. The approach I'd like to use is to bind #\) to a function which looks at the current position of the text cursor and iterates backwards through the string looking for the matching #\( .. then the icursor position will be set to this location for a second to indicate to the user the matching paren, and then placed back to the original position. The second question that I have is how I might unbind the TAB key in my entry widget so that hitting TAB will not move focus to the next widget in the window. I'd like TAB to invoke my auto-completion routine (using Control-Space at the moment). Thanks for you help. Mike __________________________________________ Yahoo! DSL Something to write home about. Just $16.99/mo. or less. dsl.yahoo.com

1 0