[リストへもどる]
一括表示
投稿時間：2003/08/15(Fri) 15:16
投稿者名：初めの一歩
Ｅメール：
ＵＲＬ　：
タイトル：Tiff形式のファイルを印刷する方法
初めて投稿します。

Tiff形式のファイルを印刷したいのですが、本HPの印刷関係項に関連付けされているアプリケーションから印刷する方法が記載されていましたのでその方法で行おうとしました。
印刷の設定をダイアログボックスを表示させ作業者に設定させてから印刷しようとしたのですが、
その設定が反映されません。
良い方法をご存知の方、教えて下さい。
よろしくお願いします。

投稿時間：2003/08/16(Sat) 10:32
投稿者名：花ちゃん
Ｅメール：
ＵＲＬ　：
タイトル：Re: Tiff形式のファイルを印刷する方法
> 初めて投稿します。
なら、ここのはじめにお読み下さいを読んでからご利用下さい。
又、注意事項には目を通しておいて下さい。
一般的にマルチポストはマナー違反になりここでは禁止しております。
返信や解決報告は投稿されたすべての掲示板にして下さい。

> Tiff形式のファイルを印刷したいのですが、本HPの印刷関係項に関連付けされているアプリケーションから印刷する方法が記載されていましたのでその方法で行おうとしました。
> 印刷の設定をダイアログボックスを表示させ作業者に設定させてから印刷しようとしたのですが、
> その設定が反映されません。

要は、印刷時の用紙設定がしたいと言う事じゃないのですか？
OSが書いてないので反映されるかどうか解りませんが下記を試して下さい。
Private Sub Command1_Click()
    Printer.PaperSize = 66　　'A2
    Debug.Print "プリンター用紙サイズ(幅)  　： " & Printer.ScaleX(Printer.Width, vbTwips, vbMillimeters)
    Debug.Print "プリンター用紙サイズ(高さ)　： " & Printer.ScaleX(Printer.Height, vbTwips, vbMillimeters)
End Sub

投稿時間：2003/08/18(Mon) 14:31
投稿者名：初めの一歩
Ｅメール：なし
ＵＲＬ　：
タイトル：Re^2: Tiff形式のファイルを印刷する方法
返信ありがとうございます。
最初にはじめにお読み下さいを確認したかったことに加え、
マナーに関して認識不足で申し訳ありません。
以後気を付けます。
取り急ぎ、お詫び致します。

投稿時間：2003/08/18(Mon) 17:40
投稿者名：初めの一歩
Ｅメール：なし
ＵＲＬ　：
タイトル：Re^2: Tiff形式のファイルを印刷する方法
使用OSはWin98とWin2000です
Win98では
　Printer.PaperSize = 66
で値が不正というエラーが発生してしまいました
Win2000では
　Printer.PaperSize = 66
この指定の後に
　Printer.Print
で文字列を印刷したら用紙サイズがA2で印刷されました
しかしTif形式のファイルを印刷したいために
Printer.PaperSizeの後に
　ShellExecute
を記述して印刷すると初期設定（A4）で印刷されてしまいます
　Printer.PaintPicture
もTif形式では使用できず方法がわかりません
ご存知の方教えて下さい

投稿時間：2003/08/18(Mon) 21:50
投稿者名：花ちゃん
Ｅメール：
ＵＲＬ　：
タイトル：Re^3: Tiff形式のファイルを印刷する方法
> Win98では
> 　Printer.PaperSize = 66
> で値が不正というエラーが発生してしまいました
A2の用紙が印刷できるプリンターが通常使うプリンターになっていますか？


> Win2000では
> 　Printer.PaperSize = 66
> この指定の後に
> 　Printer.Print
> で文字列を印刷したら用紙サイズがA2で印刷されました
> しかしTif形式のファイルを印刷したいために
> Printer.PaperSizeの後に
> 　ShellExecute
> を記述して印刷すると初期設定（A4）で印刷されてしまいます
関連付け起動ではどのアプリが設定されているのですか？その時のそのアプリのプリンターの
設定が有効になるかと思うのですが。

> 　Printer.PaintPicture
> もTif形式では使用できず方法がわかりません
> ご存知の方教えて下さい

ここの 画像ファイルを印刷する ではだめですか？

投稿時間：2003/08/19(Tue) 16:40
投稿者名：初めの一歩
Ｅメール：なし
ＵＲＬ　：
タイトル：Re^4: Tiff形式のファイルを印刷する方法
返信ありがとうございます。

> A2の用紙が印刷できるプリンターが通常使うプリンターになっていますか？
　　　なっています。
　　　Printer.PaperSizeをコメントにしてShellExecute
　　　を行っても何も印刷されませんでした。
　　　データが送られていないようです。

> 関連付け起動ではどのアプリが設定されているのですか？その時のそのアプリのプリンターの
> 設定が有効になるかと思うのですが。
　　　アプリはイメージングです。

> ここの 画像ファイルを印刷する ではだめですか？
　　　PictureBoxにTifファイルは読み込めなかったので使用出来ませんでした。
　　　読み込めればこの方法でも良いのですが。

投稿時間：2003/08/19(Tue) 17:38
投稿者名：花ちゃん
Ｅメール：
ＵＲＬ　：
タイトル：Re^5: Tiff形式のファイルを印刷する方法
>アプリはイメージングです。
ならVBからイメージングを操作してみたら

Private Sub Command1_Click()
    ImgEdit1.Image = "c:\test.tif"
    ImgEdit1.Zoom = 100
    ImgEdit1.Display
    ImgAdmin1.Image = ImgEdit1.Image
    ImgAdmin1.ShowPrintDialog Form1.hWnd
    ImgEdit1.PrintImage
End Sub

又は、Wordに画像を読み込みそれを印刷して見てはどうでしょうか？

又は　APIを使ってプリンターの設定を事前に変更しておけばできるようです。
APIを使ってプリンターの設定は　No.5477 の投稿を見て下さい。

投稿時間：2003/08/20(Wed) 19:14
投稿者名：初めの一歩
Ｅメール：なし
ＵＲＬ　：
タイトル：Re^6: Tiff形式のファイルを印刷する方法
いろいろと助言、ありがとうございます。

複数人が使用することになるためイメージングに固定することは出来ないこともあり、ＡＰＩを使用した方法を検討したいと思いますが、No.5477に記載のアドレスにアクセス出来ませんでした。
fPrinterDevModeSetのコードを教えて頂きたくお願いします。

投稿時間：2003/08/22(Fri) 10:41
投稿者名：花ちゃん
Ｅメール：
ＵＲＬ　：
タイトル：Re^7: Tiff形式のファイルを印刷
> fPrinterDevModeSetのコードを教えて頂きたくお願いします。

再度UPしておきましたが、DLされたものと思い今は、削除しております。

http://www.bcap.co.jp/hanafusa/VBHLP/Sampleitiran.htm
の　No.２４２ にあります。

投稿時間：2003/08/22(Fri) 13:31
投稿者名：初めの一歩
Ｅメール：なし
ＵＲＬ　：
タイトル：Re^8: Tiff形式のファイルを印刷
> http://www.bcap.co.jp/hanafusa/VBHLP/Sampleitiran.htm
> の　No.２４２ にあります。

    情報ありがとうございます。検討してみます。