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 更新)
本ドキュメントの内容は保証しません。本ドキュメントによって生じた結果について、一切の責任を負いません。