clear bitmap created for a snip->cached-image-snip conversion
svn: r15656
This commit is contained in:
parent
32353b76d2
commit
2850d101f3
|
@ -295,6 +295,7 @@
|
||||||
(inexact->exact (floor w))
|
(inexact->exact (floor w))
|
||||||
(inexact->exact (floor h)))]
|
(inexact->exact (floor h)))]
|
||||||
[bdc (make-object bitmap-dc% bmp)])
|
[bdc (make-object bitmap-dc% bmp)])
|
||||||
|
(send bdc clear)
|
||||||
(send snp draw bdc 0 0 0 0 w h 0 0 'no-caret)
|
(send snp draw bdc 0 0 0 0 w h 0 0 'no-caret)
|
||||||
(send bdc set-bitmap #f)
|
(send bdc set-bitmap #f)
|
||||||
(bitmaps->cache-image-snip bmp
|
(bitmaps->cache-image-snip bmp
|
||||||
|
|
Loading…
Reference in New Issue
Block a user