Ch 34, Printing

alniv · May 14th, 2011, 05:38 AM

Hello.
Can someone help.
Ch.34 Printing sample: Src\ch34\printbooklet
Everything works fine, but PrintDialog (dlgPrint) will not print.

Thanks
Alex

Rod Stephens · May 14th, 2011, 11:37 AM

Hi Alex,

I don't understand what you're saying. Do you mean it displays the dialog but when you click the dialog's Print button it doesn't print?

alniv · May 14th, 2011, 04:09 PM

Hi Rod.
Thank you for your quick answer.

the answer is YES.

On Src\Ch34 is 2 samples: printSimple and printBooklet.
on both samples there is 3 options:Print now,Print Preview & Print Dialog
If you press Print on Print now & Print Preview at will print
on Print Dialog at will show the Dialog, but if you press Print at will not Print

Regards
Alex

Rod Stephens · May 14th, 2011, 05:09 PM

The only thing I can think of is that you need to set the dialog's Document property to a PrintDocument. You won't be able to tell if you haven't because that dialog doesn't display a preview (unlike the PrintPreview dialog).

Let me know if that's the problem and if that's in the book's original code (I'm not at the right computer right now) and I'll post a note on the book's web site.

If that isn't it, then I have to suspect something wrong with the control. (Hopefully I just forgot to set the Dialog property.)

alniv · May 15th, 2011, 04:27 AM

Hi Rod.

I am running the book's original code samples and my own code with Win7,VB 2010 and HP5610 printer.
all the same. printDialog will not fire (will not print).
As "direct print" or print previaw" will print with no problems and the code is the same code, I agree with you that is noting wrong with code, the problen
is with the control.
The tool property: "Document" show "(None)" and can not be changed.

to make the story short, I found in the MSDN a way to over come the problem.
Remove the line " dlgPrint.ShowDialog()" from the samples
and add the following:
If dlgPrint.ShowDialoge(Me)=Windows.Forms.DialogResul t.OK Then
m_PrintDocument.Print()
End If

Best Regards & enjoy your weekend.
Alex

N.B: I would like to thank you for the outstanding book which is a bible for me in VB 2010.

Rod Stephens · May 15th, 2011, 08:45 AM

That sounds familiar. Thanks for posting in case others need this.

Quote:

N.B: I would like to thank you for the outstanding book which is a bible for me in VB 2010.

I'm glad you're finding it useful. Post a review!