TIFFファイルのタグ情報

フウセンウナギ 2007-05-09 22:05:01 No: 136349

WindowsXP SP2
VB2005
フレームワーク2.0

モノクロのビットマップ画像を読み込み、
FAX送信できる形式(CCITT Group3)のTIFFファイルに変換します。
以下のようにしました。

'ビットマップオブジェクト
Dim bmp As New Bitmap("C:\test.bmp")
'パラメータ
'→CCITT Group3
Dim Para As System.Drawing.Imaging.EncoderParameters = _
                        New System.Drawing.Imaging.EncoderParameters(2)
Para.Param(0) = New System.Drawing.Imaging.EncoderParameter( _
                        System.Drawing.Imaging.Encoder.ColorDepth, 1)
Para.Param(1) = New System.Drawing.Imaging.EncoderParameter( _
                        System.Drawing.Imaging.Encoder.Compression, _
                        Imaging.EncoderValue.CompressionCCITT3)
'コーデック
Dim Codec As System.Drawing.Imaging.ImageCodecInfo
Codec = GetEncoderInfo("image/tiff")

'ファイル出力
bmp.Save("C:\test.tif", Codec, Para))

これで一応作成はできたのですが、うまくFAX通信できませんでした。
それでTIFFファイルを解析したところ、
タグID：259
タグ名：Compression
タグ値：3（T4Options参照）

で

タグID：292
タグ名：T4Options
タグ値：設定なし

となっていました。

Compressioタグが3の場合、T4Optionsタグが0,1,4,5のいずれかでないとFAX側で正常なファイル
とみなされないようです。

なにかパラメータなどの設定が不足しているのでしょうか？

ちなみにVB6単体でのTIFFファイル出力は分かりませんが、VB6のアクティブレポート
でプレビュー画面からFaxExportCITTメソッドでエクスポートした場合、
T4Optionsタグに"4"がセットされており、正常にFAX送信できました。

また、ドットネット版のアクティブレポート2.0Jで同様のTIFFファイル出力を行うと
やはりT4Optionsの設定がありませんでした。
グレープシティに問い合わせたところ、フレームワークの不具合かもしれないとう回答でした。
ちなみにフレームワークを3.0にしても同じ結果でした。