プリンタを印刷ダイアログで切り替えて使うには？

解決

komin 2008-02-06 20:37:54 No: 29674

久しぶりの書き込みです。
今、あるプログラムの印刷部分を作っているのですが、フォームにPrintDialogを配置し、印刷ボタンのイベントに以下のように書いています。

if PrintDialog1.Execute then Quickrep1.Print;

このコードだと、印刷ダイアログで使用するプリンタを変更しても印刷時には反映されず、デフォルトプリンターから印刷されてしまいます。どんなコードを書いたら良いのでしょうか？

ofZ 2008-02-08 01:24:39 No: 29675

QR2.0, QR3.62 あたりは、これでいいはず
QuickRep1.PrinterSetup;
if QuickRep1.Tag = 0 then Quickrep1.Print;

komin 2008-02-08 17:50:01 No: 29676

なるほど、こういう方法があったんですね。不勉強でした。
ありがとうございました。