🚀 go-pugleaf

こん○○は！モーリ＠ITC-SYSTEMです。

>クリスタルレポートのAPIを使用して、動的にプリンターを変更したのですが、
>レポートファイルでは用紙を横で指定しているのに縦になって印刷
>されてしまいます。

   PE・・・で始まるエンジン関数のことでしょうか？

>APIを使用して、動的に用紙を横または、縦を指定できないでしょうか？


>また、APIを使用せず、クリスタルレポートオブジェクトのみ（VB５だけ）で
>動的にプリンターの指定および用紙の縦横指定をできるでしょうか？

これは、クリレポのActiveX、プリントエンジン関数に限らず、
Ｗｉｎ３２ＡＰＩのＧｅｔＰｒｉｎｔｅｒとＳｅｔＰｒｉｎｔｅｒを用いてやらない
と、正確なプリンタドライバ名とかが
取得されていないため、用紙縦横がうまく設定できません。
で、その取得できた値を、ＰＥＳｅｌｅｃｔＰｒｉｎｔｅｒを用いて出力先を指定し
てあげます。
ＡｃｔｉｖｅＸのプロパティでも同様。
これは、ＶＢ５迄とＤｅｌｐｈｉ２迄（Ｄｅｌｐｈｉ３は未確認）では
通常のＰｒｉｎｔｅｒ系のオブジェクトのプロパティでは正確にこの情報が取得でき
ませんので、
Ｗｉｎ３２ＡＰＩのＧｅｔＰｒｉｎｔｅｒとＳｅｔＰｒｉｎｔｅｒを用いてやってみ
てはいかがでしょうか？

*************************************************
                毛 利 邦 是  E-mail : mouri@itc-system.co.jp
*************************************************

こん○○は！モーリ＠ITC-SYSTEMです。
追記です。

ＰｒｉｎｔｅｒＤｉａｌｏｇでユーザー様に変更していただくとベストです。
ユーザー様はそのソフトのみを使用しているわけではありません。
本の1時間前はレーザープリンタを通常使用するプリンタとして使用していたが、
現在の通常使うプリンタはドットプリンタに成っているという場合もあります。
そうすると”印字がおかしい”とかいってサポート電話がかかってくるでしょう？
だから、常に印字前に、ユーザー様にＰｒｉｎｔｅｒ設定ダイアログでプリンタの
変更をしていただき、出力するようなアプリを開発されたほうがよろしいかと思いま
す。
私は仕事でそういう風に作成しました。

*************************************************
                毛 利 邦 是  E-mail : mouri@itc-system.co.jp
*************************************************