Printing Controls on a Picturebox

[Karl Blessing]

I have an ActiveX control that is ran on IE, which uses two picture boxes for scrolling methods, then inside of the inner picture box , are a bunch of other ActiveX controls I created, how can I print everything on the innerpicture box, I keep getting an error of &quot;Invalid Picture&quot; when doing<br><br>Printer.PainPicture InnerBox.Picture, 0, 0<br>Printer.EndDoc <p>Karl<br><a href=mailto:kb244@kb244.com>kb244@kb244.com</a><br><a href=

http://kb244.com>

</a><br>Experienced in : C++(both VC++ and Borland),VB1(dos) thru VB6, Delphi 3 pro, HTML, Visual InterDev 6(ASP(WebProgramming/Vbscript)<br>

http://www.brainbench.com/transcript.jsp?pid=629151

 

[markSaunders]

at the risk of being shouted at - your text reads
[tt]Printer.PainPicture....[/tt]
and the [tt]t[/tt] is missing from the [tt].PaintPicture[/tt] - I only mention it as you may have cut & pasted the code?

 

[Karl Blessing]

it was typed in. if it were mispelled the compiler would have yelled at me. In any case I have this so far (PaintPicture says its an invalid picture, So I tried bitblt)

with the bitblt, I get a zero return(error) so I cant figuree out how to do it.

this is an actual cut/paste
[tt]
Public Sub PrintMe()
#Const De_bug = True

Dim lres As Long

lres = BitBlt(Printer.hDC, _
0, 0, _
InnerBox.ScaleWidth, _
InnerBox.ScaleHeight, _
InnerBox.hDC, _
0, _
0, _
&HCC0020 _
)
Printer.EndDoc

#If De_bug Then
MsgBox lres
#End If


End Sub
[/tt]