[リストへもどる]
一括表示

投稿時間:2003/08/19(Tue) 15:23
投稿者名:ヘイロー
Eメール:f_aitk@yahoo.co.jp
URL :
タイトル:
DataReportでのプリンタ設定の変更について
 WinMe,VB6 SP5,Access97
上記環境で開発しております。
今現在、帳票やはがき印刷をDataReportで作成しております。
印刷ボタンをFromに貼り付けて、印刷ボタンをクリックしたあと、
showメゾットで、DataReportをプレビューさせてから左上にある
プリンタのボタンで印刷させております。
プレビューをさせるとき、用紙の設定がデフォルトプリンタに依存
されてしまします。
このHPに掲載されています用紙の変更方法をshowメゾットの前に
記述してもうまくいきません。
DataReportでも使えるデフォルトプリンタの用紙のサイズと印刷の向き
を変更する方法を教えてください。
よろしくお願いします。

投稿時間:2003/08/20(Wed) 10:57
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: DataReportでのプリンタ設定の変更について
DataReport では試して降りませんが
>★ - Tiff形式のファイルを印刷する方法 - 初めの一歩 08/15-15:16 No.5429
の質問と同様かと思います。
SetPrinter API 等を使って事前に設定を変更しておけばできると思います。

DataReport でも試して見たら、設定が反映されました。
(DataReport は今回初めて使ったので貴方が試された状況と同じかどうか解りませんが。)

Private Sub Command1_Click()
    Dim Ret As Long
    '用紙サイズ=A3 用紙の向き=縦  印刷部数=1 拡大率=200%
    Ret = fPrinterDevModeSet(vbPRPSA3, vbPRORPortrait, 1, 200)
    DataReport1.Show
  ’  DataReport1.PrintReport False, rptRangeAllPages
End Sub

自作関数 fPrinterDevModeSet は下記よりコピーして標準モジュールにペーストして下さい。

投稿時間:2003/08/20(Wed) 14:33
投稿者名:ヘイロー
Eメール:f_aitk@yahoo.co.jp
URL :
タイトル:
Re^2: DataReportでのプリンタ設定の変更について
ありがとうございました。
自分のプログラムでも設定が反映されました。
今回、APIでVBの苦手とするところをカバーしてくれることを初めて知りましたが
まだまだ、APIについて無知です。
よろしければ、VB6 SP5 で API の使い方が載っている分かり易い参考書を
ご存知でしたら教えて頂けないでしょうか?
よろしくお願いします。

投稿時間:2003/08/20(Wed) 14:53
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re^3: DataReportでのプリンタ設定の変更について
> よろしければ、VB6 SP5 で API の使い方が載っている分かり易い参考書を
> ご存知でしたら教えて頂けないでしょうか?

私の使っているAPIの参考書
発行所 (株)秀和システム 著者 河北潤二
Windows98 APIリファレンス for Visual basic Programmers
上記以外では、お薦めできる本は見た事がありません。

又は
VB付属のヘルプ(MSDN ライブラリ visual Studio 6.0)
の目次を開くと[プラットフォーム SDK]がありますのでそれを開いて下さい。
[プラットフォーム SDK (日本語)]がありますのでそれを開くと
ある程度分類されていますので見当をつけて調べて見て下さい。

BitBlt ならグラフィック/マルチメディアサービスをクリックして
GDI をクリックしてビットマップ・リファレンス・関数と順にクリック
するとビットマップに関する関数の一覧がでてきます。

関数名が解れば、関数名でWebで検索すれば、大抵見つかります。

投稿時間:2003/08/20(Wed) 15:44
投稿者名:ヘイロー
Eメール:f_aitk@yahoo.co.jp
URL :
タイトル:
Re^4: DataReportでのプリンタ設定の変更について
ありがとうございます。
いろいろと探してみます。