BeginDocでEAccesViolation？ (ID:41429)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 プリンタについて質問させていただきます。 環境は Xp-Pro SP3, Delphi 2009 Update3 です HelpにあるPrinter関数のコード例の下記の「BeginDoc」文でEAccessViolationが発生します。 { now, print the pages } with Printer do begin BeginDoc; for I := Start to Stop do begin PageControl1.Pages[I].PaintTo(Handle, 10, 10); if I <> Stop then NewPage; end; EndDoc; end; Printerは、Canon IP-4200で通常使うプリンターになっています。 他のプログラムでは正常に印刷可能です。 いろいろ調べてみたのですが、原因不明です。 どのような対処を行えば解決できるか教えていただければ幸いです。