2D_Draw ›› BoxDraw

プログラム言語 FreeBasic


BoxDraw

構文

BoxDraw( x , y , width , height, [ColorPen=0] , [ColorBk=0] , [widthPen= 0], [StylePen=ps_solid],[Alpha= 255])

Function BoxDraw(ByVal x As Long,ByVal y As Long,ByVal w As Long,ByVal h As Long,ByVal ColorPen As Long=0,ByVal ColorBk As Long=0,ByVal widthPen As Long=0,ByVal StylePen As Long=PS_SOLID, ByVal AlPHAPARAM As Long=255) As Integer

内容

四角形を描画するために使います


オプション

x - X 軸方向の位置

y - Y 軸方向の位置

width - 長方形の幅

height - 長方形の高さ

ColorPen - 長方形の境界線の色
色の順番はBGR(青、緑、赤)、&hff0000:青、&h00ff00:緑、&h0000ff:赤

ColorBk - 長方形を塗りつぶす色 (値が-1の場合は透明色)

widthPen - 境界線の太さ

StylePen - 境界線の様式。以下のいずれかを指定できます:

PS_SOLID 実線の境界線
PS_DASH 破線の境界線。このスタイルは、ペンの幅が、装置の単位(ピクセル)で、境界線の太さと等しいか、細い場合にのみ、有効です。
PS_DOT 点線の境界線。このスタイルは、ペンの幅が、装置の単位(ピクセル)で、境界線の太さと等しいか、細い場合にのみ、有効です。
PS_DASHDOT 破線と点線を交互に描く境界線。このスタイルは、ペンの幅が、装置の単位(ピクセル)で、境界線の太さと等しいか、細い場合にのみ、有効です。
PS_DASHDOTDOT 破線と二重点が交互になる境界線。このスタイルは、ペンの幅が、装置の単位(ピクセル)で、境界線の太さと等しいか、細い場合にのみ、有効です。
PS_NULL 境界線が見えなくなります。
PS_INSIDEFRAME (Windowsのみ)実線の境界線。GDI(Graphics Device Interface)の描画関数でこのスタイルを使うと、ペンの太さを考慮して、図のサイズは、長方形の範囲に入るように、圧縮されます。 これは幾何学的ペンにのみ適用されます。

Alpha - 透明度(0〜255)


例1:

#Include "window9.bi"
Var hwnd=OpenWindow("",100,100,300,300)
WindowStartDraw(hwnd) '描画を開始
  BoxDraw(40,40,200,200,255,255) ' 長方形を描画
  BoxDraw(65,65,150,150,50000,50000) ' 長方形2を描画
StopDraw '描画を終了
Do : Loop until WaitEvent= EventClose


例2:

#Include "window9.bi"
Var hwnd=OpenWindow("",100,100,300,300)
WindowStartDraw(hwnd) '描画を開始
  'BoxDraw(0,0,300,300,&hffffff,&hffffff) ' 背景を白にする
  FillRectDraw(0,0,&hffffff) ' 背景を白にする
  BoxDraw(40,40,200,200,255,255) ' 外側長方形を描画:赤
  BoxDraw(65,65,150,150,50000,50000) ' 内側長方形2 を描画:草緑 十進50000→16進c350
  BoxDraw(90,90,100,100,&hff0000,&hff0000) ' 最内側長方形3 を描画:青 色の順番はBGR(青、緑、赤)
  'BoxDraw(90,90,100,100,&h00ff00,&h00ff00) ' 最内側長方形3 を描画:緑 色の順番はBGR(青、緑、赤)
  'BoxDraw(90,90,100,100,&h0000ff,&h0000ff) ' 最内側長方形3 を描画:赤 色の順番はBGR(青、緑、赤)
StopDraw '描画を終了
Do : Loop until WaitEvent= EventClose

背景白にする



http://mneniya.ucoz.ru/

←リンク元に戻る Window9 トップに戻る FreeBASIC マニュアル トップに戻る
ロシア語オリジナル:https://users.freebasic-portal.de/freebasicru/window9lib/window9.html