DrawImageDataメソッド

BMP、DIB、JPEG、TIFF、PNG、EMF形式のイメージデータを描画します。  

[構文]
 
レポートライブラリOCX
 
Object.DrawImageData (sx, sy, ex, ey, dpi, backmode, image, imagelength, imagedata)
 
レポートライブラリ.NETコントロール
 
long Object.DrawImageData (sx, sy, ex, ey, dpi, backmode, image, imagelength, imagedata)
 

設定項目

内容

Object

 

オブジェクトへの参照を表すオブジェクト式

sx

long

描画する領域の左上X座標(1/100mm単位)

sy

long

描画する領域の左上Y座標(1/100mm単位)

ex

long

描画する領域の右下X座標(1/100mm単位)

ey

long

描画する領域の右下Y座標(1/100mm単位)

dpi

long

解像度(0〜10000)

backmode

long

透過モード(設定値参照)

imagelength

long

イメージデータの長さ(バイト数)

imagedata

Byte配列

イメージデータ

 
[エラーコード]
 

内容

1011

描画エラー

1029

Startを行ってください

1132

イメージデータエラー

 
[設定値]
 
backmodeには次の値を指定します。
 

定数

内容

JV_TRANSPARENT

1

透過

JV_OPAQUE

2

上書き

 
[解説]
 
dpi を0にすると、イメージは sxsyexey のサイズで描画されます。
imagedata には、Byte配列型変数を使用します。
 
StartメソッドとEnd(Abort)メソッドの間で実行します。
 
DrawImageDataメソッドは、メモリ上に読み込まれたイメージデータを描画する時に使います。
ファイルに保存されたイメージを描画する時は、DrawImageメソッドを使います。
 
対応イメージ形式
 
※ヘルプの「アプリケーション開発/イメージをデータ形式で設定」に言語ごとのコーディングサンプルがあります。
   
[コーディング例]
 
レポートライブラリ.NETコントロール
 
Dim fileNo As Integer                      'ファイル番号
Dim imageLength As Long
Dim imageData() As Byte
Dim imgDpiAs Long
Dim backmodeAs Long
Dim imageFileName As String
    
imgDpi = 0        '枠サイズ指定
backmode = JV_OPAQUE   '上書き
imageFileName = "c:\images\cup.dib"
fileNo = FreeFile                          'ファイル番号取得
Open imageFileName For Binary As #fileNo  'ファイルオープン
imageLength = FileLen(imgFileName)
ReDim imageData(imageLength) As Byte
Get #fileNo, , imageData
Close #fileNo
Call Jvrlib.DrawImageData(10000, 7700, 13500, 10500, imgDpi, backmode, imageLength, imageData) 
 
レポートライブラリ.NETコントロール
 
Dim fileNo As Integer                      'ファイル番号
Dim imageLength As Long
Dim imageData() As Byte
Dim imgDpiAs Long
Dim backmodeAs Long
Dim imageFileName As String
    
imgDpi = 0        '枠サイズ指定
backmode = JV_OPAQUE   '上書き
imageFileName = "c:\images\cup.dib"
fileNo = FreeFile                          'ファイル番号取得
Open imageFileName For Binary As #fileNo  'ファイルオープン
imageLength = FileLen(imgFileName)
ReDim imageData(imageLength) As Byte
Get #fileNo, , imageData
Close #fileNo
ret = Jvrlib.DrawImageData(10000, 7700, 13500, 10500, imgDpi, backmode, imageLength, imageData)