FillRect 長方形の描画

VBの宣言:

Declare Function FillRect Lib "user32" ( _
    ByVal hDC As Long, _
    ByRef r As RECT, _
    ByVal hBrush As Long) As Long

説明:

長方形を描画する。

長方形は、hBrushで指定したブラシによって塗りつぶされる。

引数の意味は以下の通り。
hDC 描画先のデバイスを識別するデバイスコンテキストのハンドル。
r 描画する長方形の座標。
hBrush 塗りつぶしに使用するブラシ。

戻り値は、関数の実行に成功したか否かを表す真偽値である。

VBのサンプル:

FillRectを使用して、矩形領域を網掛けで塗りつぶす。
Private Sub Command1_Click()

    Dim hWhiteBrush As Long
    Dim r As RECT
    
    r.left = 0
    r.top = 0
    r.right = 200
    r.bottom = 100

    hWhiteBrush = CreateHatchBrush(HS_DIAGCROSS, vbWhite)
    FillRect Picture1.hDC, r, hWhiteBrush
    DeleteObject hWhiteBrush

End Sub

(original text:1999/09/08 更新)

本ドキュメントの内容は保証しません。本ドキュメントによって生じた結果について、一切の責任を負いません。