Hello.
I now use CLX and trying to load/save pixmap from/to file.
Folloing are my code.
(defvar *window*)
(defvar *gcontext*)
(defun save-pixmap-file (&optional (file "pixmap")
&key (x 0) (y 0) (width 200) (height 200))
" get pixmap on *window* and save it to file "
(XLIB:write-bitmap-file
file
(XLIB:get-image *window* :x x :y y :width width :height height)
:sorceress))
(defun load-pixmap-file (&optional (file "pixmap") &key (x 0) (y 0))
" read pixmap from file and put it on *window* "
(XLIB:PUT-IMAGE *window* *gcontext*
(XLIB:read-bitmap-file file)
:x x :y y))
this program is VERY SLOW.
Does any one know the faster way to load/save pixmap ?
thank you.
--
Mathmatical Systems Institute Inc. Hisao Kuroda
6F AM BLDG. 2-5-3 Shinjuku, Shinjuku-Ku 301, 1-22-2 Kyonan-cho
Tokyo, Japan 160 Musashino-shi,
E-mail : ······@msi.co.jp (Kuroda,Hisao) Tokyo, Japan 180
Everybody's got something to hide except me and my //GS.