| Posted: March 28 2007 at 1:43am | IP Logged
|
|
|
Hi
I use morovia barcode activex demo version on vb. i have 2 pictureboxes on a form(their width and height is same and i sent picture2 back) and other controls(like labels) and 8 barcodes on picture1
before printing picture1 and barcodes i make form.visible=true and i see everything is ok. when i print form.picture and barcodes, i can print form+barcode1 but i cant print other barcodes. what is wrong?
code is like this:
Form8.Visible = True DoEvents Form8.Picture1.SetFocus Form8.Picture2.AutoRedraw = True rv = SendMessage(Form8.Picture1.hwnd, WM_PAINT, Form8.Picture2.hDC, 0) rv = SendMessage(Form8.Picture1.hwnd, WM_PRINT, Form8.Picture2.hDC, _ PRF_CHILDREN + PRF_CLIENT + PRF_OWNED) Form8.Picture2.Picture = Form8.Picture2.Image Form8.Picture2.AutoRedraw = False Printer.PaintPicture Form8.Picture2.Picture, 0, 0 Printer.PaintPicture Form8.MrvBarcode1.Picture, 0, 0 Printer.PaintPicture Form8.MrvBarcode2.Picture, 3960, 1020 Printer.PaintPicture Form8.MrvBarcode3.Picture, 0, 3960 Printer.PaintPicture Form8.MrvBarcode4.Picture, 3960, 4920 Printer.PaintPicture Form8.MrvBarcode5.Picture, 0, 8040 Printer.PaintPicture Form8.MrvBarcode6.Picture, 3960, 9000 Printer.PaintPicture Form8.MrvBarcode7.Picture, 0, 12240 Printer.PaintPicture Form8.MrvBarcode8.Picture, 3960, 13440 Printer.EndDoc Unload Form8 Set Form8 = Nothing
|