喫茶XRAYトップページ

[スレッド全体]
[9537] Re4:プリンタドライバの情報をDEVMODE構造体から取得返信　削除
2016/1/12 (火) 10:56:59 taki
▼ Mr.XRAYさん
 
> (昔は，この手の質問がいっぱいあったんですよね --- 遠い目)

マスター　もう少しお付き合いください。

プリンタ関係のサンプルプログラムの記事を読み直してみて、分かったことも
多くあるのですが、色々と混乱して分からなくなってしまいました。

具体的な例にしての質問です。

パソコンに2台のプリンタが接続されています。
インクジェットと連続帳票専用プリンタです。

「通常使うプリンタ」(デフォルトのプリンタ) は、OSに登録（定義）されている
プリンタで、色々なアプリ（メモ帳、Word、Execl等）で印刷する時に自動で
選択されているプリンタですね。
インクジェットプリンタでプリンタ番号を2としてください。
プロパティはA4用紙・縦です。

連続帳票印刷アプリは連続帳票専用のプリンタを使います。
専用プリンタのプリンタ番号を3としてください。プロパティは連続用紙（かな？）
連続帳票印刷アプリを起動直後は、OSの「通常使うプリンタ」のままではダメ
（無駄紙大量発生）なので、帳票印刷する前に使用するプリンタの変更が
必要になります。

そのプリンタの変更を人間ができる場合は、「PrinterSetupDialog」でプリンタを
連続帳票専用プリンタに変更すれば、プロパティも連続用紙に変わってくれる？
（多分）ので、後は印刷すれば良い事になります。

でも、通常は「無駄紙大量発生」を防ぐため、使用するプリンタの変更をアプリの
コードで行いますよね。

そのコードが

Printer.PrinterIndex := 3;
// または
//Printer.PrinterIndex := Printer.Printers.indexof('OKI XXXX');
// OKI XXXX は帳票プリンタの名前（仮称）

Printer.GetPrinter(ADevice, ADriver, APort, ADeviceMode);
Printer.SetPrinter(ADevice, ADriver, APort, 0);
Printer.GetPrinter(ADevice, ADriver, APort, ADeviceMode);
// これで連続帳票専用プリンタ（仮称 OKI XXXX）に変更できたのでしょうか？
この時に、プロパティも連続用紙に変わっているのでしょうか？

無事に連続帳票の印刷が済んでアプリを終了したら、「通常使うプリンタ」は
インクジェットに戻っているのでしょうか？（上記コードはアプリ内だけ有効？）

自分で試せばいいのですが、プリンタが1台しかないもので…。

[9538] 通常使用するプリンタ返信　削除
2016/1/12 (火) 11:55:14 Mr.XRAY
▼ takiさん

> マスター　もう少しお付き合いください。

やだ !! ハハハッ
 
> // これで連続帳票専用プリンタ（仮称 OKI XXXX）に変更できたのでしょうか？
> この時に、プロパティも連続用紙に変わっているのでしょうか？

なりません．プリンタの設定ダイアログで設定した場合はなります．
上のコードのように，DEVMODE 構造で設定する場合は，設定のコードが必要です．

> 無事に連続帳票の印刷が済んでアプリを終了したら、「通常使うプリンタ」は
> インクジェットに戻っているのでしょうか？（上記コードはアプリ内だけ有効？）

戻っています．
Delphi の Printer オブジェクトで操作した内容は，そのアプリだけで
有効です．ただし，Windows 10 では様子がかわったようです．

[ Windows10 通常使うプリンターが・・・]
http://mrxray.on.coocan.jp/bbs/DelphiBBS/mrxray_delphifan_coffe.cgi?tree=s9486#9486
 
> 自分で試せばいいのですが、プリンタが1台しかないもので…。

プリンタドライバをインストールすればテストできます．
しかし，物理的にプリンタが接続されていません．そこで「一時停止」にして
テストします．
結果は，印刷スプールにあります．
これは，DEKO さんとこにあるやつを利用すると確認できます．
ん ? 何というやつだったかな ? 調べてみます．

# 当サイトにもサンプルを掲載していたのですが，
# 削除しました．わざわざ自分で作成する必要はないと思って... (^^;

また，富士ゼロックス社の DocuWorks（ドキュワークス）も便利です．
DocuWorks はここのお客さんに教わったものです．


[9539] 印刷スプールを表示するツール返信　削除
2016/1/12 (火) 11:59:13 Mr.XRAY
> ん ? 何というやつだったかな ? 調べてみます．

こいつですね．
[スプールファイル変換ツール]
http://ht-deko.com/junkbox.html#SPLCONV

これの [ファイル][プレビュー] で印刷結果を確認することができます．
細い罫線は，拡大しないと確認が難しいです．

[9540] プリンタ，印刷の設定返信　削除
2016/1/12 (火) 12:10:25 Mr.XRAY
> なりません．プリンタの設定ダイアログで設定した場合はなります．
> 上のコードのように，DEVMODE 構造で設定する場合は，設定のコードが必要です．

プリンタの設定ダイアログ，あるいは印刷ダイアログを表示して設定させない，
コードで，自動で設定したい場合に，DEVMODE 構造体で設定する，
ということになります．

どちらの方法にするかは，開発するアプリによります．
ダイアログを表示すると，使用者によっては，余計な操作をしてしまう
可能性があります．DEVMODE 構造体で設定すれば確実ということになります．
ただし，コーディングは面倒ということになります．

[9543] Re:プリンタ，印刷の設定返信　削除
2016/1/12 (火) 14:15:03 taki
▼ Mr.XRAYさん
> > なりません．プリンタの設定ダイアログで設定した場合はなります．
> > 上のコードのように，DEVMODE 構造で設定する場合は，設定のコードが必要です．
>
> プリンタの設定ダイアログ，あるいは印刷ダイアログを表示して設定させない，
> コードで，自動で設定したい場合に，DEVMODE 構造体で設定する，
> ということになります．
>
> どちらの方法にするかは，開発するアプリによります．
> ダイアログを表示すると，使用者によっては，余計な操作をしてしまう
> 可能性があります．DEVMODE 構造体で設定すれば確実ということになります．
> ただし，コーディングは面倒ということになります．

なるほど。
この３行は呪文みたいなものですか。このコードに続いてプロパティを変更する
コードを書く必要があるのですね。
「013_プリンタのプロパティ設定」の「03_コードでプロパティを設定」のように。

Printer.SetPrinter(ADevice, ADriver, APort, 0);でプロパティの内容を初期化しないと
プリンターのプロパティの内容は個々のプリンターで違うので、DocumentProperties関数で
うまく書き込めないのでしょうね。
確かに面倒です。
そういう意味ではPrinterSetupDialogはすごいですね。プリンターの一覧作成からプロパティの
獲得、変更までやってくれるのだから。


スプールファイル変換ツール「splconv」は面白そうですね。早速ダウンロードしました。
readme.txtにメタファイルで出力とあるのでその辺は…。

富士ゼロックス社の DocuWorks（ドキュワークス）は以前インストールしていたかもしれません。
認知症が進んでるみたいで、物忘れが激しい。

[9545] Re:通常使用するプリンタ返信　削除
2016/1/16 (土) 00:07:10 Sara
▼ Mr.XRAYさん　こんばんわ

> 有効です．ただし，Windows 10 では様子がかわったようです．
>
> [ Windows10 通常使うプリンターが・・・]
> http://mrxray.on.coocan.jp/bbs/DelphiBBS/mrxray_delphifan_coffe.cgi?tree=s9486#9486

Windows10 10240までは上記のLinkで言っている設定がありません・・・
Windows10 10586からのようです。

ちなみに、アップグレード後に注意事項等は表示されません。
自分で気づけと・・・（設定値はやはりＯＮでした）
もちろん、すぐにＯＦＦにしましたが・・・
[9546] Re2:通常使用するプリンタ返信　削除
2016/1/16 (土) 14:58:00 Mr.XRAY
▼ Saraさん

> Windows10 10240までは上記のLinkで言っている設定がありません・・・
> Windows10 10586からのようです。

おおっ，これは貴重な情報です．
Windows10 10586 もまだまだという感じがします．

教訓 : 慌てて新しい Windows は導入しないこと．

[9541] お付き合い返信　削除
2016/1/12 (火) 12:28:06 Mr.XRAY
> マスター　もう少しお付き合いください。

これは結婚を前提にしてのことでしょうか ? なんてね．
ほら，昔，付き合っている女性に言われたことないですか ?
「私は貴方のなんなの ?」

で，彼女にこんなことを書いたメモを渡したでしょう ?

以下の希望するどれかに○を付けてください．
  1. 単なる女友達
  2. 女友達以上，恋人未満
  3. 婚約者
  4. 妻
  5. 今から別れる彼女

[9542] Re:お付き合い返信　削除
2016/1/12 (火) 14:13:44 taki
▼ Mr.XRAYさん
> > マスター　もう少しお付き合いください。
>
> これは結婚を前提にしてのことでしょうか ? なんてね．
> ほら，昔，付き合っている女性に言われたことないですか ?
> 「私は貴方のなんなの ?」
>
> で，彼女にこんなことを書いたメモを渡したでしょう ?
>
> 以下の希望するどれかに○を付けてください．
>   1. 単なる女友達
>   2. 女友達以上，恋人未満
>   3. 婚約者
>   4. 妻
>   5. 今から別れる彼女

残念ながら、おじさんはそんなことを言われたことがありません。

マスターはモテモテだったんでしょうね。

[9544] Re2:お付き合い返信　削除
2016/1/12 (火) 15:56:45 Mr.XRAY
▼ takiさん

> マスターはモテモテだったんでしょうね。

んなわけありません !

で，このメモの話は本当らしいです．実際の内容は記憶です．
違っていると思います．
山岳会の同期の友人で，そういう方がいたそうです．
で，5. に○を付けられて，あわてて追いかけたそうです．

結果的に，その女性と結婚したそうです．めでたし，めでたし．

[▼次のスレッド]
INCM/CMT
Cyclamen v3.82