Drukowanie

Dlaczego pomimo zastosowania takiego kodu:

procedure TPrzegladZlecenForm.DrukujClick(Sender: TObject);
  begin
   with Printer do
    begin
      BeginDoc;
      przyjeteZleceniaListView.Canvas.Font.Size := 22;
      przyjeteZleceniaListView.PaintTo(Handle,10,10);
      EndDoc;
    end;
  end;

wydruk jest tak maly ze nic nie widac....

nie drukowalem poki co, ale <ort>niewiem</ort> czy nie drukujesz kwadratu o rozmiarach 10x10 pixeli