DrawPolygonメソッド

多角形を描画します。
 
[構文]
 
レポートライブラリOCX
 
Object.DrawPolygon (close, mode, points)
 
レポートライブラリ.NETコントロール
 
long Object.DrawPolygon (close, mode, points)
 

設定項目

内容

Object

 

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

close

long

多角形の種類(設定値参照)

mode

long

線の種類(設定値参照)

points

string

描画する多角形の座標(1/100mm単位)

 
[エラーコード]
 

内容

1011

描画エラー

1029

Startを行ってください

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

定数

内容

JV_POLY_CLOSE  

1

閉じる

JV_POLY_OPEN

0

閉じない  

 
modeには次の値を指定します。
 

定数

内容

JV_POLYGON   

1

直線

JV_BEZIER

0

曲線   

  
[解説]
 
points には、座標をXYの順に、データ間をカンマで区切って指定します。
多角形のプロパティは、LineWidthプロパティ(線の幅)、LineStyleプロパティ(線の種類)、FillPatternプロパティ(塗り潰しパターン)、OutLineプロパティ(輪郭線)を使って設定します。 各プロパティは、改ページでページが変わった時には再設定が必要です。
 
StartメソッドとEnd(Abort)メソッドの間で実行します。
 
[コーディング例]
 
レポートライブラリOCX
 
''ベジェ曲線に囲まれた図形の描画
Jvr.FrColor = RGB(128, 128, 0) '前景色
Jvr.BkColor = RGB(128, 255, 0) '背景色
Jvr.FillPattern = 39 '塗り潰しパターン
polymode = JV_BEZIER
pclose = JV_POLY_CLOSE
polypoint = "1000,4000,2000,4000,2500,4500,2000,5000,1000,5000"
Jvr.DrawPolygon(pclose, polymode, polypoint)
 
''ベジェ曲線を描画
Jvr.FrColor = RGB(0, 0, 0) '前景色
Jvr.LineWidth = 100 '線の幅を1mmにする
pclose = JV_POLY_OPEN
polypoint = "5000,4000,6000,4000,6500,4500,6000,5000,5000,5000"
Jvr.DrawPolygon(pclose, polymode, polypoint)
 
レポートライブラリ.NETコントロール
 
''ベジェ曲線に囲まれた図形の描画
Jvr.FrColor = RGB(128, 128, 0) '前景色
Jvr.BkColor = RGB(128, 255, 0) '背景色
Jvr.FillPattern = 39 '塗り潰しパターン
polymode = JV_BEZIER
pclose = JV_POLY_CLOSE
polypoint = "1000,4000,2000,4000,2500,4500,2000,5000,1000,5000"
ret = Jvr.DrawPolygon(pclose, polymode, polypoint)
 
''ベジェ曲線を描画
Jvr.FrColor = RGB(0, 0, 0) '前景色
Jvr.LineWidth = 100 '線の幅を1mmにする
pclose = JV_POLY_OPEN
polypoint = "5000,4000,6000,4000,6500,4500,6000,5000,5000,5000"
ret = Jvr.DrawPolygon(pclose, polymode, polypoint)