名前
題名
▼ 小豚丸さん > ▼ Mr.XRAYさん > > > > QuickRep1.PrinterSettings.ColorOption :=　//白黒は１　カラーは２ > > > > ColorOptionというのがあるのですか． > > 3.0にはないですね． > > ところで，このコードはどこで実行しているのでしょうか． > > > > ボタンクリック時のイベントに > > with repform.QuickRep1 do begin > > //PrinterSetup; > QRPrinter.PrintSetup; > > //QRPrinter.aPrinterSettings > > with PrinterSettings do begin > // with QRPrinter.PrintSetup do begin > > //PrinterIndex := repform.QuickRep1.UserPrinterSettings.PrinterIndex; > // PaperSize := Cumstom; > // Orientation := poLandscape; > // Title := '報告書'; > > ColorOption := repForm.QuickRep1.UserPrinterSettings.ColorOption; > > OutputBin := repForm.QuickRep1.UserPrinterSettings.OutputBin; > > end; > > Print; > end; > > あともう一つ > > with repform.QuickRep1 do begin > PrinterSetup; > //白黒は１　カラーは２ > repForm.QuickRep1.PrinterSettings.ColorOption := repForm.QuickRep1.UserPrinterSettings.ColorOption; //ColorOption; > //下トレイ１はFirst=Upper　　手差しはManual 自動の場合はAuto > repForm.QuickRep1.PrinterSettings.OutputBin := repForm.QuickRep1.UserPrinterSettings.OutputBin; //QRPrntr.TQRBin(DMBIN_MANUAL); > > // repForm.QuickRep1.PrinterSettings.ApplySettings; > > print; > end; > > すみません、いろいろ試行錯誤に、コメントにしたりして、ごちゃごちゃに > なっています。 > >
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link