我做了一个画图程序,用的是image控件,我在form的show事件中在image上用moveto,lineto等函数作图,现在图做好了,需要打印,请问如何打印呢?

解决方案 »

  1.   

    printer.canvas:=Image1.canvas;
    Printer.print;
      

  2.   

    试试:
    Printer.BeginDoc;
    Printer.Canvas.StretchDraw(MyRect1,Image1.Picture.Bitmap);
    Printer.EndDoc ;注释:MyRect1是图片要打印到打印机画布上的矩形空间,
    调整MyRect1大小,以适应你的打印输出比例,
    同时需要注意,你的 Form显示图片的分辨率与打印机的分辨率是相差挺大的。这个也可以打印:
    Printer.Canvas.CopyRect(MyRect1,Image1.Picture.Bitmap.Canvas,MyRect2) ;