SET CURRENT PRINTER

4D v18

SET CURRENT PRINTER


SET CURRENT PRINTER ( printerName )

引数	型	説明
printerName	文字	使用されるプリンター名

説明

SET CURRENT PRINTER コマンドは現行の4Dアプリケーションでの印刷に使用するプリンターを指定するために使用します。

printerName に選択するプリンター名を渡します。使用できるプリンターの一覧を取得するには、このコマンドの前に PRINTERS LIST コマンドを使用します。
printerName に空の文字列を渡すと、システムに定義されたカレントプリンターが使用されます。

SET CURRENT PRINTER を使ってシステムの汎用 PDF プリンターを指定してPDFを出力することができます。この時に使用する値は OS および 4D のバージョンに依存します。

Windows 8 以前:
4Dは Windows上で PDFドキュメントの印刷を容易にするために、PDFCreatorドライバーに依存します (WindowsにおけるPDFCreatorドライバーの統合参照)。PDFドキュメントを印刷するには、printerName にPDFCreatorドライバーがインストールした仮想プリンターの名前を渡します。仮想プリンター名はデフォルトで "PDFCreator" です。この名前はドライバーのインストール時に変更できます。4Dが自動で仮想プリンター名を検索して使用できるように、printerNameに次の定数 (Print Optionsテーマ) を渡してください:

定数	型	値
PDFCreator Printer name	文字列	PDFCreator

Windows 10 以降:
Windows 10 にはネイティブの PDF 印刷ドライバーがあり、PDFCreator などのサードパーティードライバーを使用せずとも 4D から直接 PDF を出力できるようになりました。
ドライバー名は "Microsoft Print to PDF" です (WindowsにおけるPDFCreatorドライバーの統合の例題参照)。

OS X および Windows 10 以降 (4D v15 R5 64-bit 以降):
Print Options テーマの定数によって、OS にかかわらず自動で汎用 PDF プリンターを指定することができます。

定数

型

値

Generic PDF driver

文字列

_4d_pdf_printer

OS X上では、デフォルトドライバーをカレントプリンターに設定します。このドライバーは表示されず、PRINTERS LISTによって返される一覧にも含まれていません。PDFドキュメントのパスはSET PRINT OPTIONを使用して設定されている必要があり、そうでない場合にはエラー3107が返されると言う点に注意して下さい。

Windows上では、Winodws PDFドライバー("Microsoft Print to PDF"という名前)をカレントプリンターに設定します。この定数はPDFオプションが有効化されているWindows 10でのみ有効です。他のバージョンのWindowsやPDFドライバーが使用できないWindowsでは、このコマンドは何もせず、OK変素は0に設定されます。

SET CURRENT PRINTER コマンドは、利用可能なオプションが選択したプリンタに対応するように、必ず SET PRINT OPTION コマンドよりも前に呼び出してください。それに対し、SET CURRENT PRINTER コマンドは、_o_PAGE SETUP コマンドの後で呼び出さなければなりません。これを行わないと、印刷設定が失われます。

このコマンドは PRINT SELECTION、PRINT RECORD、Print form、および QR REPORT コマンドと一緒に使用することができ、デザインモードを含め、4Dにおけるすべての印刷に対して適用されます。
指定した設定が失われないようにするには、必要に応じて印刷コマンドは必ず引数 > を用いて呼び出さなければなりません。

システム変数およびセット

プリンターの選択が正しく実行されると、システム変数OKに1が設定されます。そうでない場合 (例えば指定したプリンターが見つからない場合など) は、システム変数OKは0に設定され、カレントプリンターは変更されません。

例題

Windows 10 上でのPDF ドキュメントの作成は、以下のようにします:

 C_TEXT($pdfpath)

 $pdfpath:=System folder(Desktop)+"test.pdf"

 SET CURRENT PRINTER(Generic PDF driver)

 SET PRINT OPTION(Destination option;3;$pdfpath)

 ALL RECORDS([Table_1])

 PRINT SELECTION([Table_1];*)

 SET CURRENT PRINTER("")

参照

Get current printer
PRINTERS LIST