On 5/23/06, Frank Goenninger frgo@mac.com wrote:
Hi all:
Am 23.05.2006 um 21:06 schrieb Ken Tilton:
- find the function tk-format-now and monkey with the debug stuff
so that any message to Tk with the word "bitmap" in it gets printed, and see if you can catch the output and post that.
I get:
tk> .f332.cv334 create bitmap 140 140 -bitmap "@\0dev\Celtk\ \x1.xbm"
That works. Then changing the name to something it will not find, I get:
Error: Tcl error: error reading bitmap file "\0dev\Celtk\xoxox1.xbm"
This has to be adapted to Linux-style path names:
"/the/path/to/the/file/1.xbm"
Thanks. Pardon my OS-centrism. Like this?:
(mk-bitmap :coords (list 140 140) :bitmap (conc$ "@" (namestring (make-pathname :directory '(:absolute "0dev" "Celtk") :name "x1" :type "xbm"))))
kenny