Delphi Tips 
-----------------------------

0104  D1   D2   D3   D4   D5   D6   D7   3.1   95   98    作成: 1999/02/08 osamu rev 1.1
   B1   B3   B4   B5   B6   B7   NT3   NT4   2K   XP  更新: 1999/02/08 osamu 編集
QuickReport で Canvas プロパティを使う

QRPrinter.NewPage は、Windows API とか Printer の NewPage とは若干意味合いが異なって、「新しいページの前に」指定する必要があるようです。座標指定は、0.1mm 単位の座標指定を QRPrinter.XPos()、QRPrinter.YPos()でプリンタの物理座標に変換して指定すれば印刷できると思います。

procedure TForm1.Button1Click(Sender: TObject);
begin
  with QuickRep1.QRPrinter do begin
    BeginDoc;
    NewPage;
    Canvas.TextOut(XPos(300), YPos(300), 'test');
    EndDoc;
  end;
end;
参照: [Delphi-ML:21024] <印刷>

[新規作成] [最新の情報に更新]

How To
Lounge
KeyWords


Tips
Delphi
Home
Osamu Takeuchi osamu@big.or.jp