掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
QuickReportでのプリンタ設定 (ID:39397)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
UserPrinterSettingsを使っているところをみると、QR4かな？ トレイはともかく白黒orカラーは設定されていないかもしれない。 ページ設定や、部数が正しく動作しているなら、下記で動くような 気がしますが、自信なし。 QuickRep1.OnApplyPrinterSettings := QRPrinterSettingsEvent; Print; end; procedure TForm1.QRPrinterSettingsEvent(Sender : TObject; var Cancel : Boolean; DevMode : pointer); var outputBin :Integer; begin //トレイの確認用 // outputBin が以下の値になっているか //First = 1 //Upper = 1 //Lower = 2 //Middle = 3 //Manual = 4 outputBin := PDeviceMode(DevMode)^.dmDefaultSource AND $FF; //おかしいなら設定しなおすしかないのかな？ //バグ？ //白黒 or カラーがこれが動くかどうかわからない if PDeviceMode(DevMode)^.dmFields AND DM_COLOR > 0 then begin DeviceMode(DevMode)^.dmColor := QuickRep1.UserPrinterSettings.ColorOption; end; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.