首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

直接打印picturebox中的控件和图片,该如何解决

2012-01-20 
直接打印picturebox中的控件和图片我要做一个厂牌的打印程序,打印A4纸大小(210*297),因为超出窗体最大高度

直接打印picturebox中的控件和图片
我要做一个厂牌的打印程序,打印A4纸大小(210*297),因为超出窗体最大高度,所以把文字和照片放在picturebox中.
        请问高手,如何直接打印picturebox中的控件和图片,因为我如果用BitBlt保存成位图再打印,感觉失真严重。

[解决办法]
Printer.PaintPicture Picture1.Picture, 0, 0
Printer.EndDoc
[解决办法]
Picture.Print方法打印
[解决办法]
需要另一个 PictureBox 过度(控件转成图形象素),另,会使用屏幕字体,不是太好看。

Picture1.SetFocus
Picture2.AutoRedraw = True
rv = SendMessage(Picture1.hwnd, WM_PAINT, Picture2.hDC, 0)
rv = SendMessage(Picture1.hwnd, WM_PRINT, Picture2.hDC, _
PRF_CHILDREN + PRF_CLIENT + PRF_OWNED)
Picture2.Picture = Picture2.Image
Picture2.AutoRedraw = False

Printer.Print " "
Printer.PaintPicture Picture2.Picture, 0, 0
Printer.EndDoc

[解决办法]
顶一下....没做过这个
[解决办法]
先把label和image的内容画到PICTURE上面去.
label的文本用TEXTOUT输出到PICTURE,image上的图片用PICTURE.PAINTPICTURE贴上去

picture的AUTOREDRAW要为TRUE,贴图和贴字完成之后用PICTURE.REFRESH刷新一下
[解决办法]
关注中...

热点排行