关于打印的问题

Question

小弟编写了如下代码：
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs,printers, StdCtrls, Buttons, ExtCtrls;type
  TForm1 = class(TForm)
    Image1: TImage;
    BitBtn1: TBitBtn;
    procedure FormCreate(Sender: TObject);
    procedure BitBtn1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
begin
image1.Canvas.Ellipse(0,0,100,100);
end;procedure TForm1.BitBtn1Click(Sender: TObject);
begin
printer.BeginDoc;
printer.Canvas.CopyRect(rect(0,0,100,100),image1.Canvas,rect(0,0,100,100));
printer.EndDoc ;
end;end.点击bitbtn1 后 打印机走纸 但去不能打出任何图像；
打印机是利盟z32型，
小弟确保打印机有墨，并且可以正常打印word文档；
问题何在?

Answer 1

没有考虑边框,试试image1.Canvas.Ellipse(0,0,50,50);

Answer 2

要不就把线条画粗点看看:image1.Canvas.Pen.Width