From: Karsten Poeck/OuB/Zentrale/DeuBa

Subject: Antwort: Re: Re(2): ACL to MCL

Date: 1996-10-21 6:14

Hello,

_>routines are dissimilar.  This is where I need some help.  Karsten, the young
>lady who wrote the German MCL to ACL graphic code has responded, and I have >asked for the English version of her code as a reference. Still, I need to go
Actually I am a male and now 30 years old.
>That is exactly the major limitation to the MCL graphics package: THERE IS >NOTHING LIKE A BMP WINDOW, e.g. a window which "remembers" what you have
Well there are pictures in MCL, this is something like a bmp file. I no longer have access to mcl, but try something like: (defclass picture-view +the-mcl-view-with-scrolll-bars .. ((my-picture ....)) Put the picture-view in a window and define (defmethod view-draw-contents ((me picture-view)) (when (valid-picture-p (....) (draw-picture ...)) Then you a something like (defmethod save-the-picture ((me picture-view)) (start-picture me) <All your drawing commands> (let ((pict (get-picture me))) (store-the-pict-handle me pict)) ....) Karsten