print invert image

I try to print inverted image.
if i use:
printer.PaintPicture Picture:=Picture1.Picture, X1:=1, Y1:=1 _
, opcode:=vbDstInvert
I get black rectangle from printer.

So I tried to use BitBlt. but I can only invert from one PictureBox to another
and I only know how to print pictureBox.picture which do not change by the Bitblt

tnx for any advice

Try passing the following:

printer.PaintPicture Picture:=Picture1.Image, X1:=1, Y1:=1, opcode:=vbDstInvert

I read this on another message board!

The Image property apparently is the actual current image displayed, the Picture property is the source file (I think)

:)

I tried it but printing Picture1.Image or Picture1.Picture give the same result:
printout of the original picture uneffected bay BitBlt

you have to create temporary pictue. run bitblt to this picture handler and the put it to pictue1.picture

Or just clean the target by assigning it to null