Re: Adobe SVG Viewer

Marco,

I pulled a wrong fragment of code in my previous post.

....
(defclass image-pane-2 (output-pane)
  ()
  (:default-initargs
   :display-callback 'draw-image-2))

(defun draw-image-2 (pane x y width height)
  (declare (ignore x y width height))
  (let ((parent-hwnd 
           (slot-value                      
             (capi-internals:representation pane) 
                 'win32:hwnd)))
 ...

The pane in draw-image-2 is the port
I referenced in the second let in my original post. 
A case of old code and my noticing the naming
discrepancy, my apologies.  I don't have time to glue
all this back together but I hope this gets you off
the ground.

Jeff

__________________________________________________
Do you Yahoo!?
Yahoo! Mail Plus - Powerful. Affordable. Sign up now.
http://mailplus.yahoo.com