Redisplay-Window

(defmethod redisplay-window ((pane paint-pane)

&optional box)

;; This method is called automatically whenever the

;; window needs to be redisplayed.

(cg:erase-contents-box pane

(or box (cg:page-box pane)))

(dolist (object (buffer-objects pane))

(draw-object object pane))(dolist (object (buffer-selections pane))

(highlight-object object pane)))

Previous slide

Next slide

Back to first slide

View graphic version