ltk-user

ltk-user@common-lisp.net

259 discussions

[ltk-user] Scale command option help
by Peter Santiago 23 Feb '09

23 Feb '09

Hello, I was wondering if someone could tell me where I'm going wrong in my code: (defun nomogui () (with-ltk () (let* ((s0 (make-instance 'scale :label "X-ri" :digits 6 :orientation 'horizontal :troughcolor "#000099" :resolution .001 :from 1.4 :to 1.6))) (configure s0 :command (lambda (val) (print 'hello) (if (< 1.5 val) (configure s0 :troughcolor "#990000") (configure s0 :troughcolor "#009900")))) (pack s0)))) Basically I just want to be able to change the troughcolor of the scale based on its value. Any help?

1 0

[ltk-user] Displaying mouse pointer coordinates
by christopher melen 01 Jan '09

01 Jan '09

Hi, I'm trying to display the coordinates of the mouse pointer. My app consists of a canvas and a 'statusbar', both of which are contained in a toplevel. The statusbar (which is just a frame containing another canvas) contains text displaying the current position of the mouse pointer, and this is updated as the pointer moves. What I'm doing is deleting and then recreating the text with the new coordinates, but this results in an unpleasant 'flashing' effect (not so bad on WinXP but terrible on OS X). Is there a more efficient way of doing this? I know there are Tk-based apps which achieve this effect (such as Wavesurfer), so it must be do-able. This is the relevant event handler code - (bind *canvas* "<Motion>" (lambda (evt) (let* ((x (event-x evt)) (y (event-y evt))) (setf *x-coord* x *y-coord* y) (itemdelete *statusbar* *coord-display*) (make-coord-display)))) *canvas* is the main canvas, and *statusbar* the statusbar. *x-coord* and *y-coord* are bound to the current pointer coordinates, which are used by the statusbar's text item (bound to *coord-display*). The function MAKE-COORD-DISPLAY then recreates the text on the statusbar immediately after it has been deleted (hence the flashing). Many thanks in advance for any suggestions. Chris P.S: Also a strange thing happens if I use the above code for a canvas owned by a paned-window - the sash disappears. Odd...

2 2

[ltk-user] reader error using menus on OS X
by Phil Armitage 27 Dec '08

27 Dec '08

Hi, I've been having a problem on OS X whereby selecting menu options (either top level menus or pop-up menus) would throw random, but very regular, reader errors "comma not inside a backquote". At first I thought this was just my code but having ran (ltk:ltktest), I can verify that the same problem occurs here too. My system is OS X 10.5.6 and the error can be triggered in both SBCL 1.0.23 and CCL 1.2. The error does not seem to occur on any Linux or Windows box I've tested on. Note that to recreate the problem it may be necessary to select menu options several times. For example, I just ran LTKTEST and generated the error on the first click of File->Load. Running a second time it took 15 attempts before it triggered again. Unfortunately my users are managing to trigger the error quite regularly! My attempts at tracking this down have been rather useless...has anyone else worked out hot to fix the problem? Many thanks, -- Phil Armitage http://phil.nullable.eu/

2 4

[ltk-user] ltk spanish tutorial
by Felip Alàez Nadal 19 Dec '08

19 Dec '08

Hello Peter: I've been writting a little spanish ltk tutorial in my blog http://lispinspain.blogspot.com . At the moment I've written 3 posts about It and It seems usable for the people. Maybe It could be useful for somebody in the list to know It. Thanks. -- Felip Alàez Nadal

2 1

[ltk-user] Setting wm-title
by Jud Leonard 19 Dec '08

19 Dec '08

I've been having trouble setting the window title using wm-title, apparently because ltk was never creating "." as the widget path. I patched it as follows: (defmethod wm-title ((w widget) title) (format-wish "wm title ~a {~a}" (if (master w) (widget-path w) ".") title) w) which seems to work. It wasn't clear to me whether this is the right fix if one has multiple top level windows, and I didn't know whether a similar fix should be applied to other wm- functions. Can you advise? Jud

3 2

[ltk-user] tk_getOpenFile, tk_getSaveFile dialogs
by Victor 29 Oct '08

29 Oct '08

Hello, I would like to know whether there are any bindings to the tk_getOpenFile and tk_getSaveFile dialogs in the LTK? TK commands documentation: - http://tcl.tk/man/tcl8.4/TkCmd/getOpenFile.htm With best regards, Victor -- реклама ----------------------------------------------------------- Домен БЕСПЛАТНО! С хостинг-планом на http://www.hostpro.ua

2 2

[ltk-user] problem with place manager
by Phil Armitage 16 Sep '08

16 Sep '08

Hi, I'm trying to use the place manager but am running into a problem. LTk implements the optional width and height parameters to the place manager through the use of keyword arguments and a conditional in the format-wish call. However, the two calls to tk-number are made without a check to see if the relevant parameter was supplied. Am I right in thinking this is a bug or am I just mis-using this method? Many thanks! -- Phil Armitage http://phil.nullable.eu/

3 2

[ltk-user] [PATCH] file encoding support for LTK-0.91
by Masayuki Onjo 11 Sep '08

11 Sep '08

Hi, all. Tcl/Tk support some encodings via fconfigure options. I made a patch to add "fconfigure -encoding ..." for LTK-0.91. This patch + following configuration, I've success to use UTF-8 with CLISP + LTK. #+clisp (system::set-default-file-encoding charset:utf-8) (setf ltk:*default-file-encoding* "utf-8") (setf ltk:*init-wish-hook* (list (lambda () (ltk:send-wish "fconfigure stdout -encoding utf-8") (ltk:send-wish "fconfigure stdin -encoding utf-8")))) Regards, -- Masayuki Onjo

1 0

Re: [Ecls-list] [ltk-user] LTK and ECLS
by Thomas F. Burdick 19 Aug '08

19 Aug '08

Thanks for the reply and the fix, Juanjo. 2008/8/19 Juan Jose Garcia-Ripoll <juanjose.garciaripoll(a)googlemail.com>: >>> ; loading system definition from /lisp/lib/ltk-0.91/ltk.asd into >>> ; #<ASDF0 package> >>> ;;; Loading "/lisp/lib/ltk-0.91/ltk.asd" >>> ; registering #<SYSTEM LTK 15100376> as LTK >>> ;;; Loading "c:/lisp/lib/ltk-0.91/ltk.lisp" >>> NIL >>>> (setf ltk:*wish-pathname* "c:/Tcl/bin/wish85.exe") >>> "c:/Tcl/bin/wish85.exe" >>>> ;(setf ltk:*debug-tk* t) >>> (ltk:ltktest) >>> >>> #<two-way stream 00f0db68> > > This has been fixed in CVS today. I sent previously a email explaining > the problems, but LTK has to be changed. The line that executes > RUN-PROGRAM should now read similar to the SBCL one, because ECL > implements the :WAIT argument > > #+:ecl(ext:run-program program args :input :stream :output :stream > :error :output :wait wt) Great, we'll change that in the next release.

1 0

Fwd: [Ecls-list] [ltk-user] LTK and ECLS
by Marko Kocić 19 Aug '08

19 Aug '08

---------- Forwarded message ---------- From: Juan Jose Garcia-Ripoll <juanjose.garciaripoll(a)googlemail.com> Date: 2008/8/19 Subject: Fwd: [Ecls-list] [ltk-user] LTK and ECLS To: Marko Kocić <marko.kocic(a)gmail.com>, "Thomas F. Burdick" <tburdick(a)gmail.com> CC of a message I sent to the ECL list. Since I am not subscribed to the LTK list, could any of you forward it? Juanjo ---------- Forwarded message ---------- From: Juan Jose Garcia-Ripoll <juanjose.garciaripoll(a)googlemail.com> Date: Tue, Aug 19, 2008 at 2:36 PM Subject: Re: [Ecls-list] [ltk-user] LTK and ECLS To: Talk about Ltk the Lisp Toolkit <ltk-user(a)common-lisp.net>, The ECL List <ecls-list(a)lists.sourceforge.net> 2008/8/15 Thomas F. Burdick <tburdick(a)gmail.com>: > I'm sending a copy of this to the ECL list, since I can't see what's > going wrong from here, nor can I get ecl to build on my system. [...] Thanks for forwarding this copy. > ECL guys: are the backtraces more usable when loaded from source or > from compiled files? Backtraces are more usable in source files. Compiled files do not keep enough debug information to inspect local variables, blocks, etc. >> ; loading system definition from /lisp/lib/ltk-0.91/ltk.asd into >> ; #<ASDF0 package> >> ;;; Loading "/lisp/lib/ltk-0.91/ltk.asd" >> ; registering #<SYSTEM LTK 15100376> as LTK >> ;;; Loading "c:/lisp/lib/ltk-0.91/ltk.lisp" >> NIL >>> (setf ltk:*wish-pathname* "c:/Tcl/bin/wish85.exe") >> "c:/Tcl/bin/wish85.exe" >>> ;(setf ltk:*debug-tk* t) >> (ltk:ltktest) >> >> #<two-way stream 00f0db68> This has been fixed in CVS today. I sent previously a email explaining the problems, but LTK has to be changed. The line that executes RUN-PROGRAM should now read similar to the SBCL one, because ECL implements the :WAIT argument #+:ecl(ext:run-program program args :input :stream :output :stream :error :output :wait wt) >> Backtrace: LTK:SEND-WISH > ltk::init-wish > lambda > lambda > >> ltk::use-debugger > ltk::use-trivial-debugger > lambda > l >> tk:start-wish > ltk:start-wish > ltk:call-with-ltk > ltk:ltktest > >> si:bytecodes > si:bytecodes > si:bytecodes > > That's not the most helpful backtrace I've ever seen That is because the backtrace only outputs the list of functions. If you run backwards using :p, then you can inspect the variables using :v. However in this case it would not have helped because the error was in the C core, which can only be debugged using GDB. > but it looks like something in send-wish is causing this "Invalid argument" error? RUN-PROGRAM outputs a two-way-stream. If one of the directions is not used, because we only want to write to or read from a child process, it uses a dummy or "null" stream. The problem is that this dummy stream had the wrong type -- it was a broadcast stream --. This has been fixed in CVS, where the dummy stream now is an I/O stream. I am considering the possibility of releasing a patch, since this is serious enough, but would like to wait until I fix other problems that have been reported recently. Sorry for the long delay in this answer, but I was on holidays for a week and a half. Juanjo -- Instituto de Física Fundamental CSIC, Serrano, 113, Madrid 28040 (Spain) http://juanjose.garciaripoll.googlepages.com -- Instituto de Física Fundamental CSIC, Serrano, 113, Madrid 28040 (Spain) http://juanjose.garciaripoll.googlepages.com

1 1

← Newer
1
...
12
13
14
15
16
17
18
...
26
Older →

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

ltk-user